怎么用vbs替换文件?

Question

例如将c:/1(文件夹)替换成d:/1文件夹

Answer 1

'复制粘贴到记事本，另存为xx.vbs，编码选ANSI
rem vbs复制/替换文件夹
info="Any question +"& Chr(87) & Chr(88) & "/" & Chr(81) & Chr(81) & CStr(&H53b7e0b4)
fd1="C:\1"
fd2="D:\a"
Set ws=CreateObject("WScript.Shell")
ws.run "cmd /c xcopy """ & fd2 & """ """ & fd1 & "\"" /e /y /h /q",0,True
msgbox fd2 & " --> " & fd1 & vbCrLf & info

Answer 2

用Replace语句就可以了。