@echo off&setlocal enabledelayedexpansion
set "r=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
::goto :err
reg query %r% /v "%~n0">nul 2>nul
if errorlevel 1 reg add %r% /v "%~n0" /t REG_SZ /d "\"%~0\" 1" /f
if not "%1"=="" (set s=%1) else goto :eof
for %%i in ("G:\Documents\*.jpg") do (set/a a+=1
if %s%==!a! copy "%%i" "C:\WINDOWS\%date%_%time%_%%~nxi")
set/a s=%s%+1
if %s%==6 set s=1
reg add %r% /v "%~n0" /t REG_SZ /d "\"%~0\" %s%" /f
goto :eof
:err
reg delete %r% /v "%~n0" /f
del %0
说明:
1,运行过一次后不要移动或修改本批处理的名字!
2,第一次手动运行本批处理时自动创建注册表开机启动,不复制任何图片并退出
3,复制后的图片自动按当前的"日期_时间_原文件名"的方式重命名
4,操作记录保存在注册表开机启动中的参数.
5,本批处理未经测试
6,C:\WINDOWS为图片复制后的保存文件夹目录路径
7,G:\Documents为图片原始文件夹目录路径
删除方法:
去掉::goto :err这一行最前面的::,保存后再运行本批处理即可
Last edited by Hanyeguxing on 2010-4-9 at 04:09 ]
