中国DOS联盟

如何将当前目录 a.txt 重命名为 b.ini ?
感谢两位的解答,问题其实很简单.
但是就是没有搜索到这个方法,所以厚真脸皮发了一帖.
这几种办法,高明!

[ Last edited by huzixuan on 2007-6-17 at 02:41 PM ]

Set objFSO = CreateObject("Scripting.FileSystemObject")
'方法一
'objFSO.MoveFile "a.txt","b.ini"
'方法二
Set objFile = objFSO.getFile("a.txt")
objFile.Name = "b.ini"

Set objFile = Nothing
Set objFSO = Nothing

方法三：（变相）

Set WshShell = CreateObject("Wscript.Shell")

WshShell.Run "cmd /c ren a.txt b.ini"

收藏了

方法四：

Set oShell = CreateObject("WScript.Shell")

    sCurrentDir = oShell.CurrentDirectory

    sFileName = "b.bmp"

    sOldName = sCurrentDir & "\" & sFileName

    sNewName = sCurrentDir & "\c.bmp"

GetObject("Winmgmts:CIM_DataFile.Name='" & sOldName & "'").ReName sNewName

你们真强啊!学习啊!