Foxtable(狐表)用户栏目专家坐堂 → FTP下载文件成功后,怎么样重命名


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

主题:FTP下载文件成功后,怎么样重命名

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


加好友 发短信
等级:童狐 帖子:255 积分:2280 威望:0 精华:0 注册:2020/6/28 8:43:00
FTP下载文件成功后,怎么样重命名  发帖心情 Post By:2020/11/7 9:10:00 [只看该作者]

如题目,利用FTP下载内部服务器上的文件后,怎么样对文件重命名?

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


加好友 发短信
等级:超级版主 帖子:107479 积分:546674 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/7 9:35:00 [只看该作者]

使用代码下载,可以任意指定名称:http://www.foxtable.com/webhelp/topics/1410.htm

Dim ftp1 As new ftpclient
ftp1.host=
"196.128.143.28"
ftp1.Account = 
"foxuser"
ftp1.password = 
"138238110"
If 
ftp1.Download("\photo\Desert.jpg","c:\data\Desert.jpg") = True Then
    
Messagebox.show("下载完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
    
Messagebox.show("下载失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

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


加好友 发短信
等级:童狐 帖子:255 积分:2280 威望:0 精华:0 注册:2020/6/28 8:43:00
  发帖心情 Post By:2020/11/7 10:40:00 [只看该作者]

如下,不行啊!!

 

    Dim lr As WinForm.ListViewRow = lvw.Current
    If lr IsNot Nothing Then
        If lr.Text = "暂时没有文件"
            MessageBox.Show("暂时没有文件")
            Return
        End If
        Dim Dow As String = e.Form.Controls("下载路径").text
        If Dow IsNot Nothing Then
            e.Form.text = "ftp管理器  文件下载中...."
            If ftp.Download(path & "\" & lr.text,Dow & "\" & lr.text,True) = True Then  '若下载成功
                file = Dow & "\" & lr.text  '定义一个用于下载后文件路径与名称的变量
               
                e.Form.text = "ftp管理器"
                MessageBox.Show("下载成功!","提醒")
                If rck.Checked = True Then '如果下载后重命名的复选框被打勾
              
                    ftp.Rename(Dow & "\" & lr.text,name2)   '则下载后重新命名
                    End If

            Else
                MessageBox.Show("下载失败!","提醒")
                e.Form.text = "ftp管理器"
            End If
        Else


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


加好友 发短信
等级:超级版主 帖子:107479 积分:546674 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/7 10:49:00 [只看该作者]

要重命名本地的文件?还是重命名ftp服务器上的文件?

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


加好友 发短信
等级:童狐 帖子:255 积分:2280 威望:0 精华:0 注册:2020/6/28 8:43:00
  发帖心情 Post By:2020/11/7 10:59:00 [只看该作者]

是下载到本地以后的.

 

服务器上的不重命名.

 

下载到本地后,对本地的文件重命名.

 

 


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


加好友 发短信
等级:超级版主 帖子:107479 积分:546674 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/7 11:20:00 [只看该作者]

直接在这里使用新的名称保存就行了呀

If ftp.Download(path & "\" & lr.text,Dow & "\" & lr.text,True) = True Then  '若下载成功

ftp.Rename是改服务器的,不需要

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


加好友 发短信
等级:童狐 帖子:255 积分:2280 威望:0 精华:0 注册:2020/6/28 8:43:00
  发帖心情 Post By:2020/11/7 13:45:00 [只看该作者]

谢谢!

 回到顶部