iT邦幫忙

DAY 12
5

WSH研習記錄系列 第 14

WSH研習記錄--檔案操作篇(移動檔案)

前幾篇提到檔案的複製
當然是不可忘記
檔案也是可以做移動的..
移動檔案(MoveFile方法)
在DOS指令裡,要移動檔案的話,要使用「MOVE」這個指令
現在用WSH則是使用「MoveFile」
DOS裡的「MOVE」指令可以使用萬用字元,當然「MoveFile」也是可以使用萬用字元
看個例子:

Option Explicit
Private FSO
Private ThisPath
Private DesktopPath
Private Shell

Set FSO = CreateObject("Scripting.FileSystemObject")
ThisPath = WScript.ScriptFullName
DesktopPath = CreateObject("Wscript.Shell").SpecialFolders("Desktop")
FSO.MoveFile ThisPath, DesktopPath & "\"
Set Shell = CreateObject("Shell.Application")
Shell.MinimizeAll
Shell.Explore FSO.GetFolder(".").Path
MsgBox "檔案已動。" & vbCrLF & "請確認。" , vbInformation
Set FSO = Nothing
Set Shell = Nothing

這個是說,將檔案移動到桌面上
移動的過程中,將所有畫面縮到最小
所以在這裡除了使用「MoveFile」
還使用了「Shell」的「MinimizeAll」這個屬性功能

提供給有需要的人..


上一篇
WSH研習記錄--檔案操作應用篇
下一篇
WSH研習記錄--檔案操作篇(刪除檔案)
系列文
WSH研習記錄42

尚未有邦友留言

立即登入留言