以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] FTP连接  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87403)

--  作者:lzzhx
--  发布时间:2016/7/11 9:12:00
--  [求助] FTP连接
服务器用Seru-v搭建,用户ID= “Userpic” , 用户名 = “FTP-fjywglxtzhx3”  密码= “123”  根目录 = "D:\\Ftpfjywglxt\\UserPicture"

用下面代码怎么也连不上服务器,用专用的ftp软件连接没有问题

Dim ftp1 As New FtpClient
ftp1.Host="196.128.1.100"
ftp1.Account = "Userpic"
ftp1.Password = "123"
ftp1.DeleteEnabled =False \'禁用删除文件按钮
ftp1.RenameEnabled = False \'禁用重命名文件按钮
ftp1.RootDir = "D:\\Ftpfjywglxt\\UserPicture" \'设置根目录
ftp1.OpenManager()

--  作者:lzzhx
--  发布时间:2016/7/11 9:31:00
--  
服务器的windows防火墙是关闭的
--  作者:大红袍
--  发布时间:2016/7/11 9:54:00
--  

这样写试试,看报什么错。

 

Dim ftp1 As New FtpClient
ftp1.Host="196.128.1.100"
ftp1.Account = "Userpic"
ftp1.Password = "123"
ftp1.OpenManager()

--  作者:lzzhx
--  发布时间:2016/7/11 9:59:00
--  
不好意思,我把192.168.1.100写成196.128.1.100了

每次连接后都要显示
[09:55:07] 正在进入目录[/D:\\Ftpfjywglxt\\UserPicture/]
[09:55:07] [/D:\\Ftpfjywglxt\\UserPicture/]进入失败,550 /D/Ftpfjywglxt/UserPicture: No such file or directory.

再按一次刷新,才显示
[09:56:25] 服务器连接成功,用时:0.182秒


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

--  作者:大红袍
--  发布时间:2016/7/11 10:28:00
--  
Dim ftp1 As New FtpClient
ftp1.Host="196.128.1.100"
ftp1.Account = "Userpic"
ftp1.Password = "123"
ftp1.DeleteEnabled =False \'禁用删除文件按钮
ftp1.RenameEnabled = False \'禁用重命名文件按钮
ftp1.RootDir = "/" \'设置根目录
ftp1.OpenManager()

--  作者:lzzhx
--  发布时间:2016/7/11 11:19:00
--  
e.Col.DataCol.FTPClient.Host= dt.DataRows(0)("FTP内网地址")   \'dt.DataRows(0)("FTP内网地址") = "192.168.1.100"

在CellButtonClick全局事件中写的上述代码在执行时提示:

未将对象引用设置到对象的实例

--  作者:大红袍
--  发布时间:2016/7/11 12:20:00
--  

 你这一列,必须在列属性那里设置成ftp列

 

 http://www.foxtable.com/webhelp/scr/1407.htm

 


--  作者:大红袍
--  发布时间:2016/7/11 12:22:00
--  

或者是,你在AfterOpenProject事件指定

 

http://www.foxtable.com/webhelp/scr/1477.htm