以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  无法使用代码从FTP下载  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93259)

--  作者:山中树人100
--  发布时间:2016/11/24 6:55:00
--  无法使用代码从FTP下载
测试过连接没有问题,上传也没有问题,filexists也能找到该文件,但就是不能下载,也没有提示错误,请指点哪里写错了,代码如下:
Dim ftp1 As new ftpclient
ftp1.host="112.74.132.110"
ftp1.Account = "12345678"
ftp1.password = "12345678"
ftp1.UTF8 = True
If ftp1.Connected = False \'如果FTP没有连接
    If ftp1.Connect Then \'连接FTP
        If ftp1.FileExists("\\查询\\1111.docx") Then \'
            If ftp1.download("\\查询\\1111.docx","C:\\Users\\Administrator.3LXF76DS7R0IFRW\\Desktop\\测试成功.docx",True) = True Then
                Messagebox.show("下载完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
            Else
                Messagebox.show("下载失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
            End If
        Else
            messagebox.Show("此文件不存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        End If
    Else
        Messagebox.show("连接FTP失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    End If
End If

[此贴子已经被作者于2016/11/24 7:01:34编辑过]

--  作者:有点蓝
--  发布时间:2016/11/24 8:44:00
--  
确认存在这样的一个目录路径:C:\\Users\\Administrator.3LXF76DS7R0IFRW\\Desktop\\

拷贝到资源管理器能打开这个目录吗

--  作者:有点青
--  发布时间:2016/11/24 8:53:00
--  
 如果提示下载成功的话,就是已经下载下来了,你去对应的文件夹查看。