Dim fs
sourcefile = "F:\123.txt"
targetfolder="F:\456.txt"
set fs=createobject("scripting.filesystemobject")
fs.getfile(sourcefile).copy(targetfolder)
MsgBox "複制成功"
Dim fs
sourcefile = "F:\123.txt"
targetfolder="F:\456.txt"
set fs=createobject("scripting.filesystemobject")
fs.getfile(sourcefile).copy(targetfolder)
MsgBox "複制成功"
![【SCADA】KingIOServer采集傑控OPC UA伺服器資料測試[圖]](data:image/gif;base64,R0lGODlhAQABAIAAAP///wAAACwAAAAAAQABAAACAkQBADs=)