| 发表于:2007-01-24 11:47:301楼 得分:100 |
cstring cserror; hinternet hintsession = 0; hinternet hftpsession = 0; bool bsuccess = false; hintsession = internetopen(null, internet_open_type_direct, null, null, null); if ( null == hintsession ) { cserror = _t( "无法访问网络! "); goto error_exit; } hftpsession = internetconnect( hintsession, m_csftpip, m_lftport, m_csftpusr, m_csftpswd, internet_service_ftp, 0, 0); if ( null == hftpsession ) { cserror = _t( "无法连接 ftp 服务器! "); goto error_exit; } if ( m_csftprdir.isempty() ) // 远程目录为空,设为根目录 { m_csftprdir = "/ "; bsuccess = ftpsetcurrentdirectory( hftpsession, m_csftprdir); if ( !bsuccess ) { cserror = _t( "无法设置当前目录 "); goto error_exit; } } else { // 分析目录,不存在则创建,暂缺,待补 2007-01-07 bsuccess = ftpsetcurrentdirectory( hftpsession, m_csftprdir); if ( !bsuccess ) { cserror = _t( "远程目录不存在! "); goto error_exit; } } /////////////////////////////// 可在这里实现上传,用ftpputfile 对于你的指定文件夹可进行遍历,调用ftpputfile 上传每一个 /////////////////////////////// internetclosehandle(hftpsession); internetclosehandle(hintsession); messagebox( _t( "连接成功,上传配置正确 "), _t( "提示 "), mb_ok ¦ mb_iconinformation ); return ; error_exit: if ( hftpsession ) { internetclosehandle(hftpsession); } if ( hintsession ) { internetclosehandle(hintsession); } messagebox( cserror, _t( "提示 "), mb_ok ¦ mb_iconinformation ); return ; 至于定时处理结合你的项目应该很好实现,不多说了 | | |
|