以文本方式查看主题

-  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=81015)

--  作者:kolen
--  发布时间:2016/2/16 14:49:00
--  [求助]模仿内置FTP,想自制一个类似的,求教“重命名”按钮该如何写代码?
模仿内置FTP,想自制一个类似的,求教“重命名”按钮该如何写代码?
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160216144626.jpg
图片点击可在新窗口打开查看

--  作者:kolen
--  发布时间:2016/2/16 14:51:00
--  
本页地址:http://www.foxtable.com/help/topics/2829.htm
老师,这一条看了,主要难点,现在是如果给服务器上的文件重命名。有什么函数

--  作者:大红袍
--  发布时间:2016/2/16 15:01:00
--  

重命名,不是有函数么?

 

Rename

用于重命名文件或目录,语法:

Rename(currentName, newName)

currentName:要重命名的文件或目录,含路径。
newName:新的名称,含路径。

如果重命名成功,则返回True,否则返回False.

示例

重命名文件:

Dim ftp1 As New FtpClient
ftp1.Host=
"196.128.143.28"
ftp1.Account =
"foxuser"
ftp1.Password =
"138238110"
If
ftp1.Rename("\\Photo\\Desert.jpg","\\Photo\\Desert1.jpg") Then
   
Messagebox.show("重命名文件成功!")
End If


--  作者:kolen
--  发布时间:2016/2/16 15:10:00
--  
图片点击可在新窗口打开查看谢谢老师!