shqf

@echo off
set name=%~n0
set num=%name:~4%
if not "%num%" == "0" (echo 你已经运行本程序%num%次了&&goto count)

:count
set /a num=%num%+1
copy %0 test%num%.bat>nul
echo 欢迎光临 WWW.bathome.net
echo 按任意键结束本程序...&pause>nul
del %0
复制代码

[ 本帖最后由 shqf 于 2008-10-24 21:41 编辑 ]

shqf

之前一直认为批处理是难以改写文本文件的，最多会在文尾添加一句，但那样在本题中文本文件会越来越长。细细体会了

for /f "usebackq delims=" %%a in ("%~0") do (
   if not defined flag (set flag=a&echo ::%n%>"%~0") else echo %%a>>"%~0"
)
复制代码

这一句，知道文件第一句也是可以改写的。那如果在文件中间的，能改写吗？

shqf

还真是行的，谢谢指教。

[ 本帖最后由 shqf 于 2008-10-25 20:00 编辑 ]