|
|
本帖最后由 liangxm 于 2011-11-23 12:36 编辑
#include <FTPEx.au3>
$server = '10.2.10.7' ;服务器
$name = 'test' ;用户名
$pass = '123456' ;密码
$s_LocalFile = "D:\ITS\liangxm.txt" ;本地上传文件
$s_RemoteFile = "\liangxm.txt" ;上传服务器文件
$nSize = InetGetSize("ftp://test:123456@10.2.10.7/1.txt")
MsgBox(0,"提示框","文件大小:" & $nSize)
;$nSize = InetGetSize("ftp://test:123456@10.2.10.7/1.txt")
;MsgBox(0,"提示框","文件大小:" & $nSize)
$Open = _FTP_Open('MyFTP') ;打开一个FTP会话
$Conn = _FTP_Connect($Open,$server,$name,$pass) ;连接到ftp服务器
MsgBox(0,"连接",$Conn)
$ftp_upload = _FTP_FilePut($Conn,$s_LocalFile,$s_RemoteFile) ;上传文件
;$ftp_upload = _FTP_FilePut($Conn,"D:\ITS\liangxm.txt","\Remote Debugger\liangxm.txt") ;上传文件
MsgBox(0,"上传",$ftp_upload)
$Ftpc = _FTP_Close($Open) ;关闭 _FTP_Open 打开的回话
------------------------------------------------------------------------------------------------------------
测了一下，内网ftp没有问题，把ip，账号，密码换成外网的就有问题了：
InetGetSize（）取不到大小
Conn = _FTP_Connect不为0，说明账号密码应该没有问题，已经连上ftp了
$ftp_upload = _FTP_FilePut这个一直0，说明没有上传成功/连另一个外网ftp直接运行到此卡住不动
不知道这样内网ftp可以，外网ftp不行一般问题会出现在哪？好像这个也没有多的什么返回值，debug信息，不知道是哪里的问题。 |
|
|手机版|小黑屋|AUTOIT CN
( 鲁ICP备19019924号-1 )谷歌
百度
发表于 2011-11-23 12:32:56
