Foxtable(狐表)用户栏目专家坐堂 → [求助] FTP连接


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

主题:[求助] FTP连接

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
[求助] FTP连接  发帖心情 Post By:2016/7/11 9:12:00 [只看该作者]

服务器用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
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/7/11 9:31:00 [只看该作者]

服务器的windows防火墙是关闭的

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By: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
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By: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
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/7/11 11:19:00 [只看该作者]

e.Col.DataCol.FTPClient.Host= dt.DataRows(0)("FTP内网地址")   'dt.DataRows(0)("FTP内网地址") = "192.168.1.100"

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

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

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/11 12:20:00 [只看该作者]

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

 

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/11 12:22:00 [只看该作者]

或者是,你在AfterOpenProject事件指定

 

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

 


 回到顶部