請問，如何在VBA中執行DOS rename 的命令

Handoome　发表于：2013-05-18 15:38:07 　

请教高手我想要在access vba中执行一个外部的命令如rename 将一个档案的名字改成另一个该如何做 ?
我用 Shell ("rename unpack unpack.exe") 不行

漏蛧尐魚℡ 发表于：2013-05-18 15:42:22

用fso试试看呢

叶海峰发表于：2013-05-18 20:52:41

name 原有文件名称含路径 as 新文件名称含路径

殷小宝发表于：2013-05-18 22:11:56

Function renameFile (oldFileName As String,newFilename as String)
If dir(oldFileName) <> "" Then

If (GetAttr(oldFileName) And vbArchive) <> 0 Then ‘判断oldFileName是档案文件

Docmd.Rename oldfilename,,newfilename ’重命名为newfilename

End If
End Function

总记录：3篇页次：1/1 9 1 :