@echo off

for /f "tokens=2,*" %%i in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Personal"') do (
set user_doc=%%j
)
echo %user_doc%

md "%user_doc%\bz"

net use Z: \\192.168.0.254\ad 123456 /user:administrator

copy Z:\img.jpg %user_doc%\bz

net use Z: /del > nul

reg add "hkcu\control panel\desktop" /v Wallpaper /d "%user_doc%\bz\img.jpg" /f
reg add "hkcu\control panel\desktop" /v WallpaperStyle /t REG_DWORD /d 2 /f
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters

taskkill /f /im explorer.exe
cmd /c start explorer
复制代码

@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
复制代码