. : : ClassiClub ForuM : : .

会员中心 论坛帮助 日历事件 标记论坛已读
返回   精品技术论坛 » 技术论坛 » 『软件使用』 » 专题:命令正则

『软件使用』: 电脑软件推荐, 电脑软件使用, 经验分享



发表新主题 关闭主题
 
主题工具
hitme
 
hitme 的头像
支柱会员
 
资 料:
注册日期: Oct 2001
帖子: 6,489 声望值: 2
精华: 38,解答: 6
#1 旧 2005-07-02, 13:48:55 默认 【原创】cmd脚本----tree命令的htm版
hitme 当前离线  

2005.7.3更新

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

tree命令的htm版

htm,css都没搞过,现学的,高手奸笑了

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

代码:
@echo off
del tree.htm 2>nul 

echo ===============tree命令的htm版===============
echo.
echo              by hitme 2005.7.3 hitme@xiahaixiao.com
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
for /f "skip=2 delims=" %%i in ('tree') 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
上传的附件
文件类型: rar tree_htm.rar (884 字节, 109 次查看)

此帖于 2005-07-03 10:51:00 被 hitme 编辑. .
526400
 
526400 的头像
游客
 
资 料:
注册日期: Dec 2000
帖子: 2,039 声望值: 3
精华: 0
#2 旧 2005-07-02, 14:24:30 默认
526400 当前离线  

不錯,以後方便多了
BTW:精華貼還真多~,羨慕
Liangjh
 
Liangjh 的头像
待认证激活
 
资 料:
注册日期: Jun 2004
帖子: 1,410 声望值: 2
精华: 11
#3 旧 2005-07-02, 15:09:20 默认
Liangjh 当前离线  

ok,真是pl

我看应该加精啊


找找看
hitme
 
hitme 的头像
支柱会员
 
资 料:
注册日期: Oct 2001
帖子: 6,489 声望值: 2
精华: 38,解答: 6
#4 旧 2005-07-02, 20:21:58 默认
hitme 当前离线  

遇到了如下困难:
1.tree命令输出,显示出来每层行对齐,行偏移却有出入
2.tree命令以字母序显示,而不是深度
3.连续空格在htm中显示为1个空格,替换为全角空格,解决
4.css部分,a.link置最前时,只去除了部分下划线,百思不解,放后面就好了。。。

坚持,逐一克服
坚持就能胜利,质量瞧水平,结果靠坚持

此帖于 2005-07-02 21:01:03 被 hitme 编辑. .
Limpo
 
Limpo 的头像
热心会员
 
资 料:
注册日期: Mar 2001
帖子: 8,420 声望值: 5
精华: 1,解答: 18
#5 旧 2005-07-02, 22:28:09 默认
Limpo 当前离线  

真强,这也要搞,我傻呀,把这个文件放到了 c:\ ,结果半天不出来!

空格用“&nbsp;”
ping
 
ping 的头像
热心会员
 
资 料:
注册日期: Feb 2002
帖子: 1,945 声望值: 6
精华: 0,解答: 2
#6 旧 2005-07-02, 22:40:33 默认
ping 当前离线  

又出一个强悍的dd,羡慕&佩服!


有多少能力 就办多少事!
hitme
 
hitme 的头像
支柱会员
 
资 料:
注册日期: Oct 2001
帖子: 6,489 声望值: 2
精华: 38,解答: 6
#7 旧 2005-07-03, 09:20:27 默认
hitme 当前离线  

引用:
作者: Limpo
真强,这也要搞,我傻呀,把这个文件放到了 c:\ ,结果半天不出来!

空格用“&nbsp;”
这个好,谢谢,hoho

顶楼更新升级一下
1.提升了一点点效率
2.各层目录完全对齐,美观
3.第6层目录处,修正bug一个
4.一些无关紧要的修改

建议更新
badboy
 
badboy 的头像
封禁用户
 
资 料:
注册日期: Sep 2001
帖子: 6,694 声望值: 0
精华: 0,解答: 1
#8 旧 2005-07-03, 09:59:54 默认
badboy 当前离线  

听好玩, 再加上目录的大小就更好了.
醉狐
 
醉狐 的头像
超级会员
 
资 料:
注册日期: Apr 2002
帖子: 1,743 声望值: 3
精华: 13,解答: 8
#9 旧 2005-07-03, 11:24:30 默认
醉狐 当前离线  

果然高手。


我向星星许了个愿。我并不是真的相信它,但是反正也是免费的,而且也没有证据证明它不灵。
sunny200
 
sunny200 的头像
热心会员
 
资 料:
注册日期: Aug 2002
帖子: 5,063 声望值: 7
精华: 1,解答: 1
#10 旧 2005-07-03, 12:17:31 默认
sunny200 当前离线  

好主意
谢谢分享这么好的技术


谣言止于智者,聊天止于呵呵
mwenyuan
 
mwenyuan 的头像
终极会员
 
资 料:
注册日期: Sep 2001
帖子: 11,617 声望值: 4
精华: 5,解答: 51
#11 旧 2005-07-03, 13:09:49 默认
mwenyuan 当前离线  

感觉稍稍复杂一点的东西用VBS做也许更加有效率一些,没想到CMD还能干这个
chinester
 
chinester 的头像
核心会员
 
资 料:
注册日期: Oct 2001
帖子: 3,011 声望值: 3
精华: 2,解答: 31
#12 旧 2005-07-03, 14:51:50 默认
chinester 当前离线  

好用。高人。


你太有才了.- -|
Yili
 
Yili 的头像
待认证激活
 
资 料:
注册日期: Feb 2002
帖子: 1,347 声望值: 0
精华: 0,解答: 1
#13 旧 2005-07-04, 09:01:54 默认
Yili 当前离线  

太强了!收下了,谢谢分享
Michael.S
 
Michael.S 的头像
『精品学堂』版主
 
资 料:
注册日期: Dec 2000
帖子: 4,136 声望值: 3
精华: 5
#14 旧 2005-07-04, 20:50:20 默认
Michael.S 当前离线  

有问题

EN XP SP1
上传的图像
文件类型: png tree.png (19.6 KB, 232 次查看)


I DON'T BITE ::::::: OFTEN!
我的小窝
hitme
 
hitme 的头像
支柱会员
 
资 料:
注册日期: Oct 2001
帖子: 6,489 声望值: 2
精华: 38,解答: 6
#15 旧 2005-07-05, 10:47:43 默认
hitme 当前离线  

引用:
作者: aaronsxf
有问题

EN XP SP1
点击进入正确么?可能是编码选择的问题
发表新主题 关闭主题

主题工具

论坛规则  发帖规则
不可以发表主题
不可以回复帖子
不可以上传附件
不可以编辑自己的帖子
论坛启用 vB 代码
版面启用 表情符号
版面启用 [IMG] 代码
版面禁用 HTML 代码


所有时间均为北京时间, 现在的时间是 02:13:53.

本论坛带宽由迅通网络提供
SSL证书由TrustAsia提供

Copyright © 2000 - 2019 ClassiClub Forum All Rights Reserved.
粤ICP备09123456号