Set objFSO = CreateObject("Scripting.FileSystemObject")objFSO.MoveFile "c:\1.txt", "c:\2.txt"
objFSO.MoveFile "c:\1.txt", "c:\2.txt"