Re: [請問] 100G檔案自動分類
嗯，依照其副檔名自行分類嗎？是否為
*.ini→[ini文件]資料夾、*.mp3→[mp3文件]資料夾…
────────────────────
on error resume next
Set WshShell = WScript.CreateObject("WScript.Shell")
set fso=createobject("scripting.filesystemobject")
set folder=fso.getfolder(WshShell.CurrentDirectory)
set files=folder.files ' 當前目錄的所有文件集合
for each file in files
if file.name<>wscript.scriptname then
if fso.folderexists(fso.GetExtensionName(file) & "文件") then
fso.movefile file, fso.GetExtensionName(file) & "文件\"
else
fso.createfolder (fso.GetExtensionName(file) & "文件")
fso.movefile file, fso.GetExtensionName(file) & "文件\"
end if
else
end if
next
msgbox "已經將所有文件按類型分類。",48+4096,"操作成功"
────────────────────
PS：存成.vbs的檔案，放置於你欲動作的目錄或根目錄下然後執行它即可，
但請小心使用哦！
※ 引述《xup654vu06 (陽光多多豆漿)》之銘言：
: 剛用救援軟體
: 將硬碟內的資料就回
: 雜七雜八的有近100G 93萬筆檔案在同一個資料夾
: 因為檔案量龐大
: 我要各門別類做分類
: 根本動彈不得
: 光移檔或是刪檔連跑都跑不太動
: 有什麼樣的小軟體
: 能夠幫我做到根據副檔名自行分類
: 自行歸類同一個資料夾
: AMD 9750
: 威剛DDR 800 4G
: 技嘉MA78GPM-DS2H
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.171.174.34
推
01/05 15:37, , 1F
01/05 15:37, 1F
※ 編輯: holucanxp 來自: 118.171.174.34 (01/05 15:45)
推
01/05 16:33, , 2F
01/05 16:33, 2F
推
01/05 17:17, , 3F
01/05 17:17, 3F
推
01/05 22:57, , 4F
01/05 22:57, 4F
→
01/05 22:58, , 5F
01/05 22:58, 5F
推
01/06 09:06, , 6F
01/06 09:06, 6F
→
01/06 10:13, , 7F
01/06 10:13, 7F
→
01/06 10:13, , 8F
01/06 10:13, 8F
→
01/06 10:14, , 9F
01/06 10:14, 9F
討論串 (同標題文章)
EZsoft 近期熱門文章
PTT數位生活區 即時熱門文章
