Foxtable(狐表)用户栏目专家坐堂 → [求助]重命名失败


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

主题:[求助]重命名失败

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


加好友 发短信
等级:童狐 帖子:283 积分:2776 威望:0 精华:0 注册:2012/10/26 0:45:00
[求助]重命名失败  发帖心情 Post By:2019/2/26 9:38:00 [只看该作者]

老师,我用Rename无法重命名,找不到原因,请老师指点一下
Dim ftpx As New FtpClient  '定义一个名为:ftpx的ftp客户端
ftpx.Host="xxxxx"
ftpx.Account = "xxx"
ftpx.Password = "xxx"
Dim fxs As List(of String)
fxs = ftpx.GetFileList("\images_1")
Dim f2 As String
Dim f3 As String
For Each fx As String In fxs
    f2 = fx.Substring(0,fx.length-4)
    f3 = f2 & "-" & _xtyhid & ".png"
    Output.Show("f2:" & f2 & "   fx:" & fx & "  f3" & f3)
    If ftpx.FileExists("\images_1\" & fx) Then
        If ftpx.Rename("\images_1\" & fx,"\images_1\" & f3)  Then
            
        Else
            Output.Show("重命名失败")
        End If
    Else
        output.show("没有这个文件")
    End If
Next


图片点击可在新窗口打开查看此主题相关图片如下:重命名失败.png
图片点击可在新窗口打开查看


[此贴子已经被作者于2019/2/26 9:41:26编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/2/26 9:59:00 [只看该作者]

我测试了一下,代码没问题。

 

你看看是否你ftp权限的设置有问题,比如不允许修改文件等。

 

你打开ftp管理器,重命名,看是否报错

 

Dim ftpx As New FtpClient  '定义一个名为:ftpx的ftp客户端
ftpx.Host="127.0.0.1"
ftpx.Account = "test"
ftpx.Password = "test"
ftpx.OpenManager


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


加好友 发短信
等级:童狐 帖子:283 积分:2776 威望:0 精华:0 注册:2012/10/26 0:45:00
回复:(有点甜)我测试了一下,代码没问题。 ...  发帖心情 Post By:2019/2/26 10:20:00 [只看该作者]

还真是权限不够,谢谢老师!

 回到顶部