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


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

主题：[求助] 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

 
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 4 次数据查询