标题: 根据文件名，批量建立文件夹，并把文件放进去 [打印本页]
作者: dddyjq1 时间: 2008-8-21 23:41 标题: 根据文件名，批量建立文件夹，并把文件放进去
一个目录下有几百个TXT
2008-08-18 00:14 3,973 慢性肾盂肾炎.txt
2008-08-18 00:14 15,856 无名氏.txt
2008-08-18 00:14 18,268 EQ.txt
2008-08-11 23:13 10,873 2R.txt
2008-08-18 00:14 6,305 象形文字.txt
2008-08-18 00:14 9,411 崇仁县.txt
2008-08-18 00:14 5,198 出口押汇.txt
2008-08-11 23:13 6,620 3C认证.txt
2008-08-18 00:14 8,321 金降落伞.txt
2008-08-18 00:14 2,712 太极洞.txt
2008-08-18 00:14 6,867 钛晶.txt
2008-08-18 00:14 4,718 糖尿病性肾病.txt
2008-08-18 00:14 1,887 套牢.txt
2008-08-11 23:14 12,931 3K党.txt
2008-08-18 00:14 227 特定交易机构.txt
2008-08-18 00:14 1,503 腾冲火山群.txt
2008-08-18 00:14 443 天舞宝轮.txt
2008-08-18 00:14 1,598 天主教会.txt
2008-08-18 00:14 3,775 填权.txt
2008-08-18 00:14 588 贴现国债.txt
2008-08-18 00:14 823 烃.txt
2008-08-18 00:14 668 同等学力.txt
2008-08-18 00:14 1,567 桐城文庙.txt
2008-08-18 00:14 3,816 阿尔及尔.txt
2008-08-18 00:14 28,147 湖北美术学院.txt
2008-08-11 23:40 7,260 4月19日.txt
2008-08-18 00:14 13,586 对冲基金.txt
2008-08-18 00:14 25,922 狂人日记.txt
2008-08-18 00:14 3,387 包公祠.txt
2008-08-18 00:14 384 抬头.txt
2008-08-18 00:14 3,059 太平湖.txt
2008-08-18 00:14 840 唐代三绝.txt
2008-08-18 00:14 272 特别席位.txt
2008-08-18 00:14 272 特定物.txt
2008-08-18 00:14 389 天然药物化学.txt
2008-08-18 00:14 25,478 天涯.txt
2008-08-18 00:14 167 甜湖.txt
2008-08-18 00:14 2,189 跳空.txt
2008-08-18 00:14 30,374 铁道游击队.txt
2008-08-18 00:14 10,056 同声传译.txt
2008-08-18 00:14 3,412 投放危险物质罪.txt
2008-08-18 00:14 27,574 盂县.txt
想建立以首个字符开头的文件夹，如“慢”、“无”、“E”、“2”的文件夹，并把所有以“慢”、“无”、“E”、“2”开头的文件都放进对应的文件夹，如所有以“天”开头的TXT文件都放进对应的“天”文件夹，请问改如何操作？
作者: HAT 时间: 2008-8-21 23:55
@echo off
setlocal enabledelayedexpansion
for %%a in ("*.txt") do (
set CurFile=%%~na
set FstChar=!CurFile:~0,1!
md !FstChar! 2>nul
move "%%~fa" !FstChar!
)作者: dddyjq1 时间: 2008-8-22 00:12
高，谢了