|
||
|
*停權中*
加入日期: Oct 2008
文章: 25
|
有辦法只刪除資料夾而不刪檔案嗎?
有辦法大量批次只刪除特定名稱資料夾，
而不刪除資料夾內檔案， 且檔案只會留在被刪除資料夾的上層資料夾? 此文章於 2010-04-02 01:53 PM 被 無腦之人只會砲 編輯. |
|||||||
2010-04-02, 01:46 PM
#1
|
|
|
*停權中*
加入日期: Oct 2008
文章: 25
|
引用:
一千多個資料夾 就需要一千多次 剪下 貼上 難道真的沒辦法嗎 或者 可以一次大量特定要刪除資料夾內檔案移置上一層資料夾 |
|
|
2010-04-02, 03:31 PM
#3
|
|
|
New Member
加入日期: Jan 2006
文章: 7
|
引用:
一般來說:用 BT 下載一堆謎片，也有相同的問題... |
|
|
2010-04-02, 03:43 PM
#4
|
|
|
Power Member
 加入日期: Feb 2005
文章: 576
|
這個簡單，把這些資料夾全部移入某個資料夾下，
然後在這個上層資料夾當中使用檔案搜尋， 過濾條件則設定為「*.*」，也就是所有檔案都包含在內， 這樣就能將所有不同資料夾檔案列在同一畫面中， 最後「剪下」...然後貼到你想要存放的資料夾下， 就能一次提取這些不同資料夾下的所有檔案。 等到檔案提取完畢，這些資料夾就變成空資料夾，滑鼠右鍵..刪除..搞定收工。 |
|
2010-04-02, 04:08 PM
#5
|
|
|
Basic Member
加入日期: Jul 2008
文章: 23
|
基本上還是得有複製或移動的動作
|
|
2010-04-02, 05:04 PM
#6
|
|
|
Regular Member
 加入日期: Aug 2005
文章: 72
|
引用:
這招比較厲害... 或是你吃飽太閒，用小程式copy也可以 ---純文字檔改成123.vbs--- urfile = "c:\test" '上層目錄 Set FSO = CreateObject("Scripting.FileSystemObject") Set WS = WScript.CreateObject("WScript.Shell") Set p_fld = FSO.GetFolder(urfile) Set c_fld = p_fld.Subfolders For Each x_files in c_fld srcfld = fso.GetAbsolutePathName(x_files) WS.run "xcopy " & srcfld & " /e " & urfile 'FSO.Copyfile srcfld & "\*", urfile Next -- |
|
|
2010-04-03, 09:03 AM
#7
|
|
