對岸有人寫成批次檔
~把下面複製到批次檔裡執行~
就會產生一個叫做
命令行幫助信息.HTA
直接打開就有所有指令說明..
-------------------------------------------------------------------------------
@echo off
title 命令提示符－命令行幫助信息生成器 - code
zh159@bbs.cn-dos.net 2008-4-26
set Name=命令行幫助信息
echo.
echo 請稍等...
>%Name%.hta echo ^<html lang="zh-tw"^>
>>%Name%.hta echo ^<meta http-equiv="Content-Type" content="text/html; charset=Big-5"^>
>>%Name%.hta echo ^<title^>命令提示符－命令行幫助信息 - code
zh159@bbs.cn-dos.net 2008-4-26^</title^>
>>%Name%.hta echo ^<HTA:APPLICATION
>>%Name%.hta echo APPLICATIONNAME="命令提示符－命令行幫助信息"
>>%Name%.hta echo SCROLL="no"
>>%Name%.hta echo INNERBORDER="no"
>>%Name%.hta echo /^>
>>%Name%.hta echo ^<script language="VBScript"^>
>>%Name%.hta echo window.resizeTo 900, 660
>>%Name%.hta echo ileft=(window.screen.width-900)/2
>>%Name%.hta echo itop=(window.screen.height-660)/2-15
>>%Name%.hta echo window.moveTo ileft,itop
>>%Name%.hta echo ^</script^>
>>%Name%.hta echo ^<style^>
>>%Name%.hta echo a:link {color: #000000; font:18px Tahoma; text-decoration:none;}
>>%Name%.hta echo a:visited {color: #000000; font:18px Tahoma; text-decoration:none;}
>>%Name%.hta echo a:hover {color: #ffffff; background-color:0000ff;}
>>%Name%.hta echo a:active {color: #ff0000; background-color:ffffff;}
>>%Name%.hta echo em {font:18px Tahoma; color:0000ff;}^</style^>
>>%Name%.hta echo ^</style^>
>>%Name%.hta echo ^<body style="FILTER: progid:DXImageTransform.Microsoft.Gradient(gradientType=0,startColorStr=#10bfff,endColorStr=#007db2);color:#ffffff;"^>
>>%Name%.hta echo ^<table width="100%%" height="100%%" align="center" border="0" cellspacing="0" cellpadding="1" style="border: solid 1 #ffffff;"^>
>>%Name%.hta echo ^<tr^>
>>%Name%.hta echo ^<td width="120" height="100%%"^>
>>%Name%.hta echo ^<span style="width:100%%;height:100%%; overflow-y: auto;"^>
>>%Name%.hta echo ^<table align="left"^>^<tr^>^<td^>
>>%Name%.hta echo 命令列表^<br^>
echo.
for /f %%i in ('help^|findstr /i "^[a-z]"') do (
set/a n+=1
call set/p= 共 %%n%% 個命令，正在處理...<nul
set /p= <nul
>>%Name%.hta echo. ^<a href="#%%i"^>%%i^</a^>^<br^>
)
>>%Name%.hta echo ^<td^>^<tr^>^</table^>
>>%Name%.hta echo ^</span^>
>>%Name%.hta echo ^</td^>
>>%Name%.hta echo ^<td^>
>>%Name%.hta echo ^<span style="width:100%%;height:100%%; overflow-y: auto;"^>
>>%Name%.hta echo ^<table align="left" style="font:15px Fixedsys;"^>^<tr^>^<td^>
echo.&echo.
echo 序號 - 命令名稱
for /f %%i in ('help^|findstr /i "^[a-z]"') do (
set/a m+=1
call echo %%m%%. - %%i
>>%Name%.hta echo ^</p^>^<a name="#%%i"^>^</a^>^<em^>^<u^>%%i^</u^>^</em^>^<br^>
for /f "delims=" %%f in ('%%i/?') do (
set "str=%%f"
setlocal EnableDelayedExpansion
set str=!str: = !
set str=!str:^<=^<!
set str=!str:^>=^>!
>>%Name%.hta echo. !str!^<br^>
endlocal
)
)
>>%Name%.hta echo ^<td^>^<tr^>^</table^>
>>%Name%.hta echo ^</span^>
>>%Name%.hta echo ^</td^>
>>%Name%.hta echo ^</tr^>
>>%Name%.hta echo ^</table^>
>>%Name%.hta echo ^</body^>
>>%Name%.hta echo ^</html^>
echo.
echo 完成！按任意鍵打開「%Name%.hta」。
pause>nul
start %Name%.hta
exit
生成過程中加了變色處理，速度慢了N多CODE: [Copy to clipboard]
--------------------------------------------------------------------------------
::code
zh159@bbs.cn-dos.net 2008-4-26
@echo off
title 命令提示符－命令行幫助信息生成器 - code
zh159@bbs.cn-dos.net 2008-4-26
set Name=命令行幫助信息
echo.
echo 請稍等...
>%Name%.hta echo ^<html^>
>>%Name%.hta echo ^<title^>命令提示符－命令行幫助信息 - code
zh159@bbs.cn-dos.net 2008-4-26^</title^>
>>%Name%.hta echo ^<HTA:APPLICATION
>>%Name%.hta echo APPLICATIONNAME="命令提示符－命令行幫助信息"
>>%Name%.hta echo SCROLL="no"
>>%Name%.hta echo INNERBORDER="no"
>>%Name%.hta echo /^>
>>%Name%.hta echo ^<script language="VBScript"^>
>>%Name%.hta echo window.resizeTo 900, 660
>>%Name%.hta echo ileft=(window.screen.width-900)/2
>>%Name%.hta echo itop=(window.screen.height-660)/2-15
>>%Name%.hta echo window.moveTo ileft,itop
>>%Name%.hta echo ^</script^>
>>%Name%.hta echo ^<style^>
>>%Name%.hta echo a:link {color: #000000; font:18px Tahoma; text-decoration:none;}
>>%Name%.hta echo a:visited {color: #000000; font:18px Tahoma; text-decoration:none;}
>>%Name%.hta echo a:hover {color: #ffffff; background-color:0000ff;}
>>%Name%.hta echo a:active {color: #ff0000; background-color:ffffff;}
>>%Name%.hta echo em {font:18px Tahoma; color:0000ff;}^</style^>
>>%Name%.hta echo ^</style^>
>>%Name%.hta echo ^<body style="FILTER: progid:DXImageTransform.Microsoft.Gradient(gradientType=0,startColorStr=#10bfff,endColorStr=#007db2);color:#ffffff;"^>
>>%Name%.hta echo ^<table width="100%%" height="100%%" align="center" border="0" cellspacing="0" cellpadding="1" style="border: solid 1 #ffffff;"^>
>>%Name%.hta echo ^<tr^>
>>%Name%.hta echo ^<td width="120" height="100%%"^>
>>%Name%.hta echo ^<span style="width:100%%;height:100%%; overflow-y: auto;"^>
>>%Name%.hta echo ^<table align="left"^>^<tr^>^<td^>
>>%Name%.hta echo 命令列表^<br^>
echo.
for /f %%i in ('help^|findstr /i "^[a-z]"') do (
set/a n+=1
call set/p= 共 %%n%% 個命令，正在處理...<nul
set /p= <nul
>>%Name%.hta echo. ^<a href="#%%i"^>%%i^</a^>^<br^>
)
>>%Name%.hta echo ^<td^>^<tr^>^</table^>
>>%Name%.hta echo ^</span^>
>>%Name%.hta echo ^</td^>
>>%Name%.hta echo ^<td^>
>>%Name%.hta echo ^<span style="width:100%%;height:100%%; overflow-y: auto;"^>
>>%Name%.hta echo ^<table align="left" style="font:15px Fixedsys;"^>^<tr^>^<td^>
echo.&echo.
echo 序號 - 命令名稱
for /f %%i in ('help^|findstr /i "^[a-z]"') do (
set/a m+=1
rem call echo %%m%%. - %%i
setlocal EnableDelayedExpansion
set /p= <nul&set /p= <nul>"!m!. - %%i"&findstr /a:c .* "!m!. - %%i*" 2>nul&set /p= <nul
endlocal
>>%Name%.hta echo ^</p^>^<a name="#%%i"^>^</a^>^<em^>^<u^>%%i^</u^>^</em^>^<br^>
for /f "delims=" %%f in ('%%i/?') do (
set "str=%%f"
setlocal EnableDelayedExpansion
set str=!str: = !
set str=!str:^<=^<!
set str=!str:^>=^>!
>>%Name%.hta echo. !str!^<br^>
endlocal
)
setlocal EnableDelayedExpansion
set /p= <nul&findstr /a:a .* "!m!. - %%i*" 2>nul&echo.&del /q "!m!. - %%i" 2>nul
endlocal
)
>>%Name%.hta echo ^<td^>^<tr^>^</table^>
>>%Name%.hta echo ^</span^>
>>%Name%.hta echo ^</td^>
>>%Name%.hta echo ^</tr^>
>>%Name%.hta echo ^</table^>
>>%Name%.hta echo ^</body^>
>>%Name%.hta echo ^</html^>
echo.
echo 完成！按任意鍵打開「%Name%.hta」。
pause>nul
start %Name%.hta
exit
