dim fso set fso = CreateObject("Scripting.FileSystemObject") call fso.MoveFile("C:\Users\Administrator\Desktop\1.txt", "C:\Users\Administrator\Desktop\5.txt") set fso = nothing 复制代码
dim fso set fso = CreateObject("Scripting.FileSystemObject") call fso.MoveFile("C:\Users\Administrator\Desktop\1.txt", "C:\Users\Administrator\Desktop\5.txt") set fso = nothing