Foxtable(狐表)用户栏目专家坐堂 → [求助]文件名获取问题


  共有6063人关注过本帖平板打印复制链接

主题:[求助]文件名获取问题

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


加好友 发短信
等级:婴狐 帖子:22 积分:244 威望:0 精华:0 注册:2013/3/24 14:37:00
[求助]文件名获取问题  发帖心情 Post By:2013/3/30 15:28:00 [只看该作者]

我想把件a文件夹里没有,而b文件夹里有的图片复制到a文件夹里,以下是我的代码,但是提示找不到文件,该怎么修改??
For Each File As String In FileSys.GetFiles("E:\works\工件管理系统\photos")
    If Filesys.FileExists("E:\File.jpg") Then
        Dim a=1
    Else
        FileSys.CopyFile("E:\works\工件管理系统\photos\File.jpg","E:\works\工件管理系统\pictures\File.jpg")
    End If
Next
[此贴子已经被作者于2013-3-30 15:27:58编辑过]

 回到顶部