iT邦幫忙

0

請問一下 各位大大,在AD裡面,我想要大量搬移D:\裡面的資料匣以及刪除!!(VBS)

我假如再D:\裡面有一個資料匣123,但是裡面有很多.TXT的檔案,我想要刪除不要的或者一動特定的檔案到D:\456資料匣,請問各位大大該怎麼寫,我是程式菜鳥!謝謝各位大大的指教!

2 個回答

8
魯大
iT邦高手 1 級 ‧ 2009-10-21 17:19:13
最佳解答

先給你一個移動的方法,做參考..

<pre class="c" name="code">
Option Explicit

Private FSO
Private SourceDir
Private SourcePath
Private TargetPath

Set FSO = CreateObject("Scripting.FileSystemObject")
SourceDir = FSO.GetFolder("D:\123").Path
TargetPath = FSO.GetFolder("D:\456").Path
SourcePath = FSO.BuildPath(SourceDir, "*.txt")
FSO.MoveFile SourcePath, TargetPath & "\"
Set FSO = Nothing

這是把「d:\123」資料夾裡的所有TXT檔移動到「D:\456」資料夾內
但是如果你要移動的TXT檔是特定的,不是全部
那你可以利用萬用字元「*」或「?」來表示
例如:00*.TXT -> 00開頭的所有txt檔

謝謝這位大大的幫忙,我修改一下應該就可以用了!謝謝您!

tom6507 iT邦大師 1 級 ‧ 2009-10-22 08:37:15 檢舉

除了學校的功課外,我還是不瞭解這樣用跟批次檔有何差別.....

6
ycl8000
iT邦高手 1 級 ‧ 2009-10-21 08:26:43

1.del d:\123\*.txt (刪除d:\123底下所有.txt的檔案)
2.mvoe d:\123\xxx.txt d:\456 (移動d:\123\xxx.txt 到d:\456)

這位大哥,您是來亂的嗎?您這樣誰都知道吧!我是要問VBS要怎麼寫!

這邊有另外一個大大,所提供的資料大量刪除,http://ithelp.ithome.com.tw/question/10009001

ycl8000 iT邦高手 1 級 ‧ 2009-10-21 12:00:51 檢舉

拍謝,因為我不知道為什麼用簡單指令可以解決的事情, 非得需要用到VBS, 你可以說明一下嗎?

misadm iT邦高手 10 級 ‧ 2009-10-22 08:22:21 檢舉

我也很好奇,為什麼一定要用 VBS,很想了解樓主的需求耶!

我要發表回答

立即登入回答