联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
Dim WshShell Set WshShell=WScript.CreateObject("WScript.Shell") WshShell.Run "rundll32 shell32.dll,Control_RunDLL MMSYS.CPL" WScript.Sleep 1000 WshShell.SendKeys "i{ENTER}"
reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced /v ShowSuperHidden /t REG_DWORD /d 0 /f
REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Applets\SysTray /v Services /t REG_DWORD /d 31 /f taskkill /f /im explorer.exe start explorer.exe