Foxtable(狐表)用户栏目专家坐堂 → 如何直接打开FTP上的文件?


  共有2046人关注过本帖树形打印复制链接

主题:如何直接打开FTP上的文件?

帅哥哟,离线,有人找我吗?
l20j07
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:41 积分:437 威望:0 精华:0 注册:2017/2/6 0:34:00
如何直接打开FTP上的文件?  发帖心情 Post By:2017/6/26 17:04:00 [只看该作者]

 

MessageBox.show(e.Row(1))
Dim ftp1 As New FtpClient
ftp1.Host="10.**.**.*0"
ftp1.Account = "y*****r"
ftp1.Password = "y********56"
ftp1.UTF8 = False
ftp1.Changedir("\")

MessageBox.show(ftp1.Download(e.Row(1),"E:\桌面\111.pdf"))

 

 

第二列中都是FTP文件的地址,比如“00运行二处FTP\01 技术规程\07 KIC事故规程 op02\01 38号机组\02 KIC事故规程 WORD\FQ3-OP02-AC-U1 极限事故堆芯监视规程 001 01版\FQ3-OP02-AC-U1 极限事故堆芯监视规程 001 01版\FQ3-OP02-AC-U1 极限事故堆芯监视规程 001 01版\348定值手册清单0601.pdf

 

但是每次运行都失败,能看出原因么?


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/26 18:16:00 [只看该作者]

试试

 

Dim ftp As FTPClient = e.Col.DataCol.FTPClient
msgbox(ftp.RootDir & e.Row("第二列"))
If ftp.Download(ftp.RootDir & e.Row("第二列"), ProjectPath & "temp.jpg", true) Then
    msgbox("下载成功")
Else
    msgbox("下载失败")
End If


 回到顶部