转载自 dongs365最终编辑 dongs365自动将目录下所有文件生成超链接网页(2种方法)
‘将以下内容另存为“生成超链接.bat ”:
‘在C盘新建一个名为kk文件夹,kk文件夹内再新建k1.htm,k2.htm,k3.htm。
代码1:
==================================================================
@echo off
setlocal
set LISTFILE=list.htm
echo MAKING LISTFILE … (PLEASE WAIT)
rem 这里是输出网页的头部,其中^符号表示后一个字符没有特殊含义,按普通字符处理。
echo ^<head^>^<style type=text/css^>A:link{FONT-SIZE:9pt;COLOR:#000000;TEXT-DECORATION: none} > %LISTFILE%
echo A:visited{FONT-SIZE:9pt;COLOR:#000000;TEXT-DECORATION:none}A:hover{COLOR:#ff0000; >> %LISTFILE%
echo TEXT-DECORATION: underline}BODY{FONT-SIZE:9pt}TABLE{FONT-SIZE:9pt}^</style^>^</head^> >> %LISTFILE%
echo [PROCESSED BY %0]^<br^> >> %LISTFILE%
rem 这里是最主要的部分,其实就是使用dir命令以最简单的形式列出当前目录下(包括子目录)的所有的文件
rem 然后使用for来把它转换为超链接的形式,有兴趣可以敲一下这个命令,看看会出现什么样的结果:“dir *.* /a:-d/s/b”
for /f “tokens=* delims=” %%i in (‘dir *.* /a:-d/s/b’) do (
echo ^<a href=”%%i” target=_blank^>%%i^</a^>^<br^> >> %LISTFILE%
)
start .\%LISTFILE%
‘打开list.htm,效果:
[PROCESSED BY “C:\kk\生成超链接.bat”]
C:\kk\生成超链接.bat
C:\kk\k1.htm
C:\kk\k2.htm
C:\kk\k3.htm
C:\kk\list.htm
代码2:
==============================================================================
::for %a in (*.html) do echo “<a href=%a>%a</a>” >index.html
type head.txt >>index.html
for /d %%a in (*.*) do (
echo ^<a href=%%a/index.html^>%%a^</a^> >>index.html
echo ^<br^> >>index.html
echo ^<br^> >>index.html
cd %%a
call c:\html.bat
cd ..
)
for %%b in (*) do (
echo ^<a href=%%b^>%%b^</a^> >>index.html
echo ^<br^> >>index.html
echo ^<br^> >>index.html
)
type end.txt >>index.html
打开index.html 看一下效果吧
评论前必须登录!
注册