以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]FTPClient 上传有问题请教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=149698) |
-- 作者:浙江仔 -- 发布时间:2020/5/9 14:59:00 -- [求助]FTPClient 上传有问题请教 Dim ftp As new FTPClient ftp.host=Vars("ftp_ip") ftp.account=Ftp_name \'Vars("ftp_name") ftp.password= Ftp_pw If FileSys.FileExists(ProjectPath & "\\Attachments\\" & Vars("idcard") & ".bmp") Then \'如果目标文件已经存在 If ftp.Upload(ApplicationPath & "zp.bmp", "/pxbm/Attachments/" & Vars("idcard") & ".bmp") = True Then FileSys.DeleteFile(ApplicationPath & "zp.bmp",2,2) Else If ftp.Upload(ProjectPath & "\\Attachments\\" & Vars("idcard") & ".bmp", "/pxbm/Attachments/" & Vars("idcard") & ".bmp") = False Then Messagebox.show("照片上传失败,请重刷身份证!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If End If Else Messagebox.show("照片获取失败,请重刷身份证!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If 用代码上传不成功,打开远程文件管理器,ftp文件可以打开下载上传 连接信息如下,是不是跟ftp模式有关系: |
-- 作者:有点蓝 -- 发布时间:2020/5/9 15:13:00 -- 提示是没有权限,或者文件不存在,确定【ApplicationPath & "zp.bmp"】存在或者有权限访问。确定服务器"/pxbm/Attachments/"这个路径存在,并且有权限访问 另外看看ftp服务端是否设置了pasv模式
|
-- 作者:浙江仔 -- 发布时间:2020/5/9 15:51:00 -- 还真是权限问题,晕了,竟然没勾写入 |