查看单个帖子
C.K dEsIgn
 
C.K dEsIgn 的头像
待认证激活
 
资 料:
注册日期: Sep 2001
帖子: 1,624 声望值: 0
精华: 0,解答: 1
#29 旧 2005-06-03, 10:43:27 默认
C.K dEsIgn 当前离线  

引用:
作者: hitme
加上md 和move
代码:
::/ * get htm&gif * /
for /f "delims=" %%i in (tmp.txt) do (
				setlocal ENABLEDELAYEDEXPANSION
				set n=%%i
				curl -o !n!.htm http://www.wulffmorgenthaler.com/thestrip.asp?cDay=!n:~-2!^&cMonth=!n:~4,2!^&cYear=!n:~0,4!
				md !n:~0,4!-!n:~4,2! 2>nul
				for /f "tokens=4 delims==" %%j in ('findstr "log" *.htm') do (
							set m=%%j
							curl -o !m:~11,4!-!m:~9,2!-!m:~7,2!.gif http://www.wulffmorgenthaler.com/!m:~1,-5!
							move !m:~11,4!-!m:~9,2!-!m:~7,2!.gif !n:~0,4!-!n:~4,2!				)

				del *.htm
				endlocal
)




::/ * clean * /
del tmp.txt
关于条件重命名,改过的剪切去别处啊,如果一定要cmd完成
加个过滤,以下就是只对 XXddmmyyyy.gif 文件改名
代码:
for /f %%i in ('dir /b *.gif^|findstr /r "^[a-z]"') do (
	setlocal ENABLEDELAYEDEXPANSION
	set n=%%i
	ren %%i !n:~4,2!-!n:~2,2!-!n:~6,4!.gif
	endlocal
	)

试了,真是厉害啊, 一次就搞定了~~~ 佩服佩服