如何无界面更改桌面主题？

jsdn2000

在百度上搜索得到的有相应的批处理代码，将其修改为Au3版本测试后只是修改Windows窗体的外观样式，并不是Themes桌面主题样式，已经在论坛中找到更改桌面主题的方法：
ShellExecute("C:\WINDOWS\Resources\Themes\Luna.theme")
但是此种方式是有界面的方式，想在自己的维护通道里添加一个无界面的方式来修改桌面主题，不用重启立即生效，希望做过的朋友可以提供一下思路。
下面的批处理代码只能修改窗体的Style，不能修改Themes:
echo off
::路径的\为\\，这是注册表路径，必须为\\，主题名一定要全路径 *.msstyles
set 主题路径="C:\\WINDOWS\\Resources\\Themes\\XP-VISTA-MAC\\XP-VISTA-MAC.msstyles"
echo Windows Registry Editor Version 5.00 >%temp%\theme.dll
echo [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ThemeManager] >>%temp%\theme.dll
echo "WCreatedUser"="1" >>%temp%\theme.dll
echo "ThemeActive"="1" >>%temp%\theme.dll
echo "LoadedBefore"="1" >>%temp%\theme.dll
echo "LastUserLangID"="2052" >>%temp%\theme.dll
echo "DllName"=%主题路径% >>%temp%\theme.dll
echo "ColorName"="NormalColor" >>%temp%\theme.dll
echo "SizeName"="NormalSize" >>%temp%\theme.dll
regedit /s %temp%\theme.dll
net stop Themes
net start themes