yakeyun

回复 1# sditwzh

@echo off
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("""%~f0""","::",,"runas",1)(close)&exit /b
setlocal enabledelayedexpansion
cd /d "%~dp0"
::试例服务器IP:192.168.1.111
::试例服务器用户名:Administrator
::试例服务器用户名登陆密码:Adm1234560
::试例服务器共享文件位置:E:\123\Wallpaper.JPG
net use * /del /y  >nul 2>nul
net use x: \\192.168.1.111\ipe$ "Adm1234560" /user:"admin"   >nul 2>nul
@net time \\192.168.1.111 /set /y  >nul 2>nul
@echo f | xcopy \\192.168.1.111\e\123\Wallpaper.JPG C:\Wallpaper.JPG  /Y >nul 2>nul
reg add "hkcu\control panel\desktop"  /v Wallpaper  /d  C:\Wallpaper.JPG  /f
::壁纸显示方式(0 居中 1 平铺  2  拉伸)
reg add "hkcu\control panel\desktop"  /v WallpaperStyle  /t  REG_DWORD  /d 2  /f
RUNDLL32.EXE USER32.DLL,UpdatePerUserSystemParameters
net use * /del /y  >nul 2>nul
exit
复制代码

yakeyun

回复 3# sditwzh

检查下注册表键值，看看拉伸参数是否修改正确。
有的注册表项需要超级管理权限，这种需要借助NSudo软件提权操作。