- 帖子
- 3
- 积分
- 109
- 技术
- 0
- 捐助
- 0
- 注册时间
- 2009-5-16
|
嘿嘿,下面这个测试过 可以了 不过就是每次运行一定要按个回车 能把需要手动按回车的去?高手来帮下忙看!
@echo off&setlocal enabledelayedexpansion
rem by 2007-12-10
title 桌面背景更换系统copyright by Dodoy&color 1f
:start
cls&set wjm=&set num=
copy %0 "%userprofile%\「开始」菜单\程序\启动\
echo\&echo 桌面自动更换系统,每天开机后将更换不同桌面。
echo\&echo 如需要自己更换桌面背景请手动修改!!!请按回车键继续....
set /p wjm=
if not "%wjm%"=="" goto loop
:: 获取当前目录下bmp文件的总数
for %%a in (*.bmp) do set /a var+=1
:: 提取一个随机数,范围在文件总数之内
set /a w=%random%%%%var%+1
:: 循环所有bmp文件,每次给num加1,当num的值等于随机数就以这个文件为桌面
for %%a in (\\10.14.80.3\d\背景2008.bmp) do (
set /a num+=1
if !num! equ !w! set wjm=%%a
)
:loop
set wjm=%wjm:"=%
if not exist "%wjm%" (
echo\&echo 你输入的文件名不正确
ping/n 2 127.1>nul
goto start
)
Rem ===================操作注册表=====================
set regadd=reg add "HKEY_CURRENT_USER\Control Panel\Desktop"
%regadd% /v TileWallpaper /d "0" /f>nul
%regadd% /v Wallpaper /d "%wjm%" /f>nul
%regadd% /v WallpaperStyle /d "2" /f>nul
Rem ====================更新==========================
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters |
|