iT邦幫忙

DAY 21
3

WSH研習記錄系列 第 23

WSH研習記錄--資料夾操作篇(複製、移動 Part II)

前幾篇就講到資料夾的複製及移動
用的是FileSystemObject的CopyFolder方法及MoveFolder方法
今天,我們來試試另一種方法來達成複製及移動
資料夾的複製及移動的方法
除了使用FileSystemObject的CopyFolder方法及MoveFolder方法之外
還可以透過Folder物件的Copy方法及Move方法來進行
來先看個Copy方法的範例:

Option Explicit

Private FSO
Private ThisFolder
Private DesktopPath

Set FSO = CreateObject("Scripting.FileSystemObject")
Set ThisFolder = FSO.GetFolder(".")
DesktopPath = CreateObject("Wscript.Shell").SpecialFolders("Desktop")
ThisFolder.Copy DesktopPath & "\", True

Set FSO = Nothing
Set ThisFolder = Nothing

內容是將目前的資料夾複製到桌面上

來看個Move方法的範例:

Option Explicit

Private FSO
Private ThisFolder
Private DesktopPath

Set FSO = CreateObject("Scripting.FileSystemObject")
Set ThisFolder = FSO.GetFolder("Files")
WScript.Echo ThisFolder
DesktopPath = CreateObject("Wscript.Shell").SpecialFolders("Desktop")
WScript.Echo DesktopPath
ThisFolder.Move DesktopPath & "\"
Set FSO = Nothing
Set ThisFolder = Nothing

將位於同資料夾底下的「files」資料夾移動到桌面..
記得,做移動時,對於資料夾有些限制跟之前所講的一樣
要避免,以免產生錯誤..

提供給有需要的人..


上一篇
WSH研習記錄--資料夾操作篇(刪除整個資料夾)
下一篇
WSH研習記錄--資料夾操作篇(取得資料夾路徑)
系列文
WSH研習記錄42

尚未有邦友留言

立即登入留言