cmd脚本----tree命令的htm版

进入目录，一层层点，嫌烦
tree命令只给看看。。不给点。。。我就是要点

tree命令的htm版

根目录下运行，测试，保存为tree_htm.cmd运行

代码:

@echo off
del tree.htm 2>nul 

echo ===============tree命令的htm版===============
echo.
echo              by hitme 2005.7.3 [e-mail]
echo.
echo 可直接点击进入6层内目录，完美主义者请自行修改
echo =============================================
echo.
echo 请稍候.............

 >end.htm echo ^<head^>
>>end.htm echo ^<meta http-equiv="Content-Type" content="text/html^; charset=gb2312" ^/^>
>>end.htm echo ^<style type="text/css"^> 
>>end.htm echo ^<!-- 
>>end.htm echo a:active { text-decoration: none ; color: red ; font-size: 12pt } 
>>end.htm echo a:visited { text-decoration: none ; color: green ; font-size: 12pt }
>>end.htm echo a:link { text-decoration: none ; font-size: 12pt } 
>>end.htm echo --^> 
>>end.htm echo ^</style^> 
>>end.htm echo ^</head^>
>>end.htm echo ^<body^>

setlocal  ENABLEDELAYEDEXPANSION
#单引号''中的就是具体的cmd命令
for /f "skip=2 delims=" %%i in ('tree /f') do (
	set n=%%i

	if "!n:~1,1!"==":" set n0=!n:~0,2!

	if "!n:~1,1!"=="—" (set n1=!n:~2!
				set n2=
				set n3=
				set n4=
				set n5=
				set n6=
				set n7=)
	if "!n:~4,1!"=="—" (set n2=!n:~5!
				set n3=
				set n4=
				set n5=
				set n6=
				set n7=)
	if "!n:~5,1!"=="—" (set n2=!n:~6!
				set n3=
				set n4=
				set n5=
				set n6=
				set n7=)

	if "!n:~7,1!"=="—" (set n3=!n:~8!
				set n4=
				set n5=
				set n6=
				set n7=)
	if "!n:~8,1!"=="—" (set n3=!n:~9!
				set n4=
				set n5=
				set n6=
				set n7=)
	if "!n:~9,1!"=="—" (set n3=!n:~10!
				set n4=
				set n5=
				set n6=
				set n7=)

	if "!n:~10,1!"=="—" (set n4=!n:~11!
				set n5=
				set n6=
				set n7=)

	if "!n:~11,1!"=="—" (set n4=!n:~12!
				set n5=
				set n6=
				set n7=)

	if "!n:~12,1!"=="—" (set n4=!n:~13!
				set n5=
				set n6=
				set n7=)


	  if "!n:~13,1!"=="—" (set n5=!n:~14!
				set n6=
				set n7=)
	if "!n:~14,1!"=="—" (set n5=!n:~15!
				set n6=
				set n7=)
	if "!n:~15,1!"=="—" (set n5=!n:~16!
				set n6=
				set n7=)
	if "!n:~16,1!"=="—" (set n5=!n:~17!
				set n6=
				set n7=)

	if "!n:~17,1!"=="—" (set n6=!n:~18!)
	if "!n:~18,1!"=="—" (set n6=!n:~19!)
	if "!n:~19,1!"=="—" (set n6=!n:~20!)
	if "!n:~20,1!"=="—" (set n6=!n:~21!)

	set n=!n: =^&nbsp;!


	>>end.htm echo ^<a href="!n0!\!n1!\!n2!\!n3!\!n4!\!n5!\!n6!" target="_blank"^>!n!^</a^> 
	>>end.htm echo ^</br^> 

)
for /f "delims=" %%i in (end.htm) do (
	set x=%%i
	      for /l %%a in (1,1,5) do (
				  set x=!x:\\=\!        
	)
	echo !x!>>tree.htm
)
endlocal

del end.htm
start tree.htm