@echo off
echo ================================================================================
echo 功能：将搜索本地磁盘中的音乐文件,并在当前目录下创建一个名为
echo “$music.htm$”文件.
echo 注意：如果当前目录下己存在“$music.htm$”，该文件将被替换。
echo.
echo code by freeants CMD@XP version:1.00
echo ================================================================================
pause>nul|echo 安任意键开始搜索……
cls
graftabl 936>nul
echo 构造Html文件中……
echo ^<html^>>$music$.htm
echo ^<head^>>>$music$.htm
echo ^<title^>by freeants^</title^>>>$music$.htm
echo ^<style type=text/css^>>>$music$.htm
echo ^<!-->>$music$.htm
echo A:link{text-decoration:none;color:#001F00;font-size:10pt; font-family: 宋体;}>>$music$.htm
echo A:visited{text-decoration:none;color:#0000ff;font-size:10pt; font-family: 宋体;}>>$music$.htm
echo A:hover{text-decoration:underline;color:#ff0000;font-size:10pt; font-family: 宋体;}>>$music$.htm
echo body{background-color:#345678;background-image:url("$music$.files\bi.gif");margin:0px;}>>$music$.htm
echo td{font-size:9pt;color:#008B8B;font-family:宋体;background-color:#abcdef;}>>$music$.htm
echo center{font-size:18pt;color:#00BFFF; font-family:方正舒体;}>>$music$.htm
echo --^>>>$music$.htm
echo ^</style^>>>$music$.htm
echo ^</head^>>>$music$.htm
echo ^<body^>>>$music$.htm
echo ^<center^>^<image src="$music$.files\m1.gif"^>^</center^>>>$music$.htm
echo ^<table width=80%% align=center border=0 cellspacing=2 cellpadding=5^>>>$music$.htm
setlocal enabledelayedexpansion
for /f "skip=1 tokens=1 delims=:" %%m in ('wmic logicaldisk where "drivetype=3" get caption') do set pth=!pth! %%m:\*.mp3
for /f "tokens=*" %%i in ('dir/a/s/b/on !pth! 2^>nul ^| sort') do (
set /a sign+=1
set /a num+=1
set num2=00!num!
if !sign! equ 1 echo ^<tr^>>>$music$.htm
if %%~zi geq 1024000 (
set /a size=%%~zi/1024*100/1024
if "!size:~0,-2!" equ "" (set size=0.!size:~-2!) else (set size=!size:~0,-2!.!size:~-2!)
set size=.....大小：^<font style="color:#FF0000;"^>!size!^</font^> MB
) else (
if %%~zi geq 1024 (
set /a size=%%~zi*100/1024
set size=!size:~0,-2!.!size:~-2!
set size=.....大小：^<font style="color:#FF0000;"^>!size!^</font^> ^<font style="color:#FF00FF"^>KB^</font^>
) else (
set size=.....大小：^<font style="color:#FF0000;"^>%%~zi^</font^> ^<font style="color:#FF00FF"^>字节^</font^>
)
)
set name=%%~nxi
echo ^<td^>!num2:~-3!:^<a title="歌曲名：%%~nxi。 文件大小：%%~zi 字节。 修改时间：%%~ti。" href="%%~i"^>!name:~,35!^</a^>!size!^</td^>>>$music$.htm
if !sign! equ 2 (
echo ^</tr^>>>$music$.htm
set sign=0
)
)
if !sign! equ 1 echo ^</tr^>>>$music$.htm
echo ^</table^>>>$music$.htm
echo ^<br^>^<center style="font-size:10pt;font-family:宋体;"^>This page was created by batch file.^ Designed by ^<a href="mailto:freeants@tom.com" style="font-size:10pt;color:#fc8204;cursor:hand;"^>Freeants^</a^>.^</center^>>>$music$.htm
echo ^</body^>>>$music$.htm
echo ^</html^>>>$music$.htm
cls&more +65 "%~0"|debug>nul&graftabl 936>nul
md $music$.files>nul 2>nul©/y $tmp$/b "$music$.files\bi.gif">nul&del/a/f/q $tmp$
copy/y $tmp_$/b "$music$.files\m1.gif">nul&del/a/f/q $tmp_$&start $music$.htm
goto:eof
e0100 47 49 46 38 39 61 10 00 10 00 91 00 00 40 54 78
e0110 4B 62 8C 7B 80 A2 00 00 00 21 F9 04 01 00 00 02
e0120 00 2C 00 00 00 00 10 00 10 00 00 02 23 4C 80 89
e0130 A6 76 0A DC 5B 93 4A 08 25 C3 56 73 ED 65 A0 23
e0140 8E 5B 62 92 67 8A 36 23 17 85 70 3B D7 F6 5D 17
e0150 00 3B
rcx
52
n$tmp$
w
e0100 47 49 46 38 39 61 B1 00 23 00 84 00 00 00 00 00
e0110 33 99 CC 99 99 66 CC CC 66 99 CC FF 99 33 00 FF
e0120 CC 99 99 99 CC 33 66 66 FF 99 33 CC FF FF 66 CC
e0130 FF 33 66 99 66 33 00 99 66 00 66 66 99 33 33 00
e0140 FF FF FF 66 99 CC CC 99 33 CC CC CC CC 99 99 66
e0150 66 33 FF FF FF 00 00 00 00 00 00 00 00 00 00 00
e0160 00 00 00 00 00 00 00 00 00 00 00 00 00 21 F9 04
e0170 01 00 00 17 00 2C 00 00 00 00 B1 00 23 00 00 05
e0180 FE E0 25 8E 64 69 96 08 73 AE 6C EB BE B0 9B 3E
e0190 71 6D DF 78 CB EC 74 EE FF B7 14 0F 48 2C FA 76
e01A0 8C 47 C0 78 54 31 49 48 46 40 F2 AC 5A A1 BB E9
e01B0 35 16 BD 22 B5 5B 5D 40 4A 0D B3 A4 D3 A5 59 87
e01C0 B6 66 A7 E5 8B 64 BE 0E D8 E7 12 F0 9A 04 B0 C3
e01D0 F7 67 63 71 46 68 7E 78 12 0B 74 61 77 8C 8A 80
e01E0 22 7D 77 56 92 2F 68 83 44 59 64 73 89 9C 97 4C
e01F0 7E 77 87 9E 6B 7D 9B 0B A7 0B 04 A7 A3 30 70 AC
e0200 25 A1 84 85 A1 9C 07 0B B6 93 69 78 9D 0B 8F 23
e0210 00 A6 B7 04 C3 07 04 B6 04 39 A6 AD 78 98 B3 79
e0220 88 A7 AA D2 55 CF 88 BE 2B 87 B5 C3 DB D2 AA 38
e0230 53 9C 30 79 BD 40 7E 0C D5 9D 00 EA C3 4C 9B D0
e0240 D7 26 D9 88 D0 DC F5 C8 38 D0 A9 30 A8 44 63 BA
e0250 9B 17 D4 AD DB 56 84 D3 29 78 F1 76 1D B3 47 40
e0260 01 85 7B 3E A2 D5 88 76 0F A2 0D 09 02 01 F2 A9
e0270 47 E4 56 2A 8B 22 B8 3D 2A 46 D2 9E 82 93 46 FE
e0280 44 C2 00 60 92 00 05 1C C0 24 74 23 D1 90 02 4A
e0290 22 2A 4B D4 74 08 E8 40 C9 62 C3 6C D6 4C 39 F4
e02A0 82 82 13 2E 09 B0 74 78 92 E9 C9 97 36 58 1A 23
e02B0 28 E2 29 CF 22 DC A0 92 70 FA 88 D8 30 00 0F 9D
e02C0 DE 04 C2 D2 A6 51 9B 47 4B 34 B5 2A 16 ED 0D 00
e02D0 40 5D 56 65 5A 25 A8 5C B5 4D AF 09 2C 8B 56 41
e02E0 84 B4 64 FB AE 35 61 93 02 D8 B5 88 01 C7 90 EA
e02F0 52 30 E2 BF 83 DF 36 36 CB E7 E4 5F 78 EA 28 68
e0300 66 FA 37 42 04 20 9B D1 76 56 6C 34 B1 DF D3 9E
e0310 3D BF CD DC B7 73 6A D7 9E FD C2 0C 5D 02 00 EA
e0320 DB A3 3F 5B 01 AB 59 B3 6B BF BA 71 F4 76 F8 3B
e0330 B8 D1 DC B7 D5 A1 B6 D1 7B B8 01 E0 96 A1 FF 9E
e0340 BD 99 4F EC D7 C8 2F EF 7E D8 3C 82 CD E7 B2 71
e0350 4C 6E 6E C2 7B F3 DE DE 05 7A 37 DE A2 77 C9 E6
e0360 4C 0D AC FF AE E0 39 05 F6 2B CF 17 8E CF D4 E6
e0370 FC F5 57 08 20 E0 01 02 C0 75 80 7E 5A C5 FE 20
e0380 A0 00 04 FA 84 54 05 07 1E 58 01 05 13 1E 28 50
e0390 6F 2F 0C 28 80 03 0B 2E E8 13 85 9A F1 A6 19 11
e03A0 00 68 78 40 05 04 4C A8 22 82 E7 5D 61 81 05 0D
e03B0 BC A8 8E 03 0E 58 D0 61 83 51 BD A8 E3 09 16 D4
e03C0 E8 A3 8C 2F D2 58 E0 82 17 08 C8 02 8C 48 BE 18
e03D0 63 8C 41 5A B0 57 87 24 EA A8 63 8D 52 0A 29 20
e03E0 87 58 0A 70 05 04 10 34 D0 A5 40 10 24 D9 63 96
e03F0 0E 2C 06 40 97 5C 9E E0 E5 92 31 AA B3 A4 94 2F
e0400 5E 00 67 09 5C D6 69 27 9A 0D E4 29 66 8F 63 02
e0410 C1 E5 9A 7A BE C9 24 93 80 E4 D9 25 24 00 E4 99
e0420 E7 8F 3E 6E B8 D8 9A 10 98 90 28 8C 6C BA C9 A6
e0430 A2 22 88 49 27 9A 5F 0A A4 28 A5 48 FA 28 64 99
e0440 3E 18 AA E8 A9 81 C6 58 E3 1E 4B 92 1A 10 00 34
e0450 D2 08 AB 80 13 08 50 AB AD 2B 9D 6A 42 AC BC 92
e0460 DA AB AB 22 F0 FA C2 8C 53 FE EA C0 AD B5 FE 10
e0470 63 01 7C D2 88 E8 8C B1 AE 21 EC 2F 00 FE 4C 60
e0480 ED 04 EA 5C 7B 6D 02 D7 BE 30 ED 08 BC 96 78 EC
e0490 04 30 1C EB AC 0B D0 D2 A8 2D B9 02 4D C0 2D B9
e04A0 3E 7C 5B 5B B5 DD 86 31 6A 6D EB 62 AB 0E B7 06
e04B0 4C 30 40 02 FF 5A DB C2 B7 E6 5A 9B 6D BD 2D AC
e04C0 BB 12 96 13 1C BB C2 00 06 0C B0 87 BB F0 8A 30
e04D0 41 BF 06 18 61 AE C3 16 E7 4B 71 02 FB 52 DC 2F
e04E0 C0 DC 0E 7C 6E C1 88 6A EB 82 B5 E3 2E 56 B0 CA
e04F0 25 60 3C F1 C5 23 5C 6C 73 C6 44 34 2C 70 C7 F9
e0500 F6 FB EF 00 EA 60 EC EE CF 09 0C 5C AB CE 3B 43
e0510 A2 30 0B 1F D7 50 ED B1 B6 5A 0B 70 09 10 E3 6C
e0520 C6 C5 12 D7 6C 40 C4 56 FB 00 F3 05 D7 46 AD ED
e0530 CF D4 62 4C F2 BF 4C 23 8D 30 CF 4B 5B CC ED DB
e0540 51 89 7D 2D DA 23 6C 1D 31 10 6D 93 00 31 CD 75
e0550 57 DD 35 0E 5F 83 9D EF 00 FE FA 5B B4 09 10 AF
e0560 94 EF 09 85 13 EE F8 CD 55 67 1D 77 AD D5 0E 20
e0570 B9 08 5C 7B BD EE E3 5D 63 1D 73 E6 89 3F 04 CE
e0580 36 E1 85 DF 4D 62 DE 24 58 FB B8 E3 11 93 9C 03
e0590 BD AA 57 5C F7 D6 39 6C 0E AF BF 96 8B 00 71 E2
e05A0 56 34 BE C2 5E B8 5F 5E 84 EF 4C 5B EE 6F C4 9E
e05B0 FB A0 8E AD AC 53 40 FB D6 11 FC 1D 43 E3 84 8F
e05C0 B0 FB D6 CE 3B 7F 85 E5 D2 CF DB 9B 01 09 22 B4
e05D0 9B BF 13 6A 06 3E F4 D1 FB E0 78 05 97 9B EF 7E
e05E0 F7 45 80 1F 03 79 E2 9B 01 C0 8A E6 D7 77 1F 68
e05F0 E1 8B F0 7E FF 08 F9 1E 00 EB 57 05 01 3A AF 3E
e0600 61 38 5F 15 42 00 00 3B
rcx
508
n$tmp_$
w
q
