Foxtable(狐表)用户栏目专家坐堂 → FTP的问题


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

主题:FTP的问题

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


加好友 发短信
等级:六尾狐 帖子:1467 积分:11418 威望:0 精华:0 注册:2013/11/24 22:10:00
FTP的问题  发帖心情 Post By:2016/1/6 15:39:00 [只看该作者]

想请问一下,FTP想把文件从一个目录COPY到另外一个目录要怎么实现?


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


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

移动还好说一点

 

重命名目录:

Dim ftp1 As New FtpClient
ftp1.Host=
"196.128.143.28"
ftp1.Account =
"foxuser"
ftp1.Password =
"138238110"
If
ftp1.Rename("\Key\","\NewKey\") Then
   
Messagebox.show("重命名目录成功!")
End If

写这段帮助的时候,我意外发现Rename还可以移动文件。
例如将文件"jz.png"从photo目录移到到newkey目录:

Dim ftp1 As New FtpClient
ftp1
.Host="196.128.143.28"
ftp1
.Account = "foxuser"
ftp1
.Password = "138238110"
If
ftp1.Rename("\photo\jz.png","\newkey\jz.png") Then
   
Messagebox.show("移动文件成功!")
End If

 

 

 

 


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


加好友 发短信
等级:六尾狐 帖子:1467 积分:11418 威望:0 精华:0 注册:2013/11/24 22:10:00
  发帖心情 Post By:2016/1/6 15:48:00 [只看该作者]

这个我知道啊,但是这个原来的文件就只在移动的目录里了,我想原来的目录也保留,要怎么做呢?

 


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


加好友 发短信
等级:六尾狐 帖子:1467 积分:11418 威望:0 精华:0 注册:2013/11/24 22:10:00
  发帖心情 Post By:2016/1/6 15:49:00 [只看该作者]

不会是要下载下来,然后再上传上去吧。晕啊

 


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


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

拷贝的话,这个就麻烦了,要把文件夹下载下来,再上传上去。

 

如果你用了openQQ的话,这个功能可以用服务器来完成,就是给它发一个拷贝的信息,然后执行一下文件夹拷贝

[此贴子已经被作者于2016/1/6 15:50:03编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1467 积分:11418 威望:0 精华:0 注册:2013/11/24 22:10:00
  发帖心情 Post By:2016/1/6 17:01:00 [只看该作者]

晕啊

 


 回到顶部