用于修复XP中最小化程序 在任务栏显示图标的vbs脚本

'xp_taskbar_desktop_fixall.vbs - repairs the taskbar when minimized programs don't show.
'?kelly theriot and doug knox - 8/22/2003 加工 加龙ddf3
'翻译：smallfrogs。翻译内容：将英文提示改为简体中文
'来源：microsoft windows xp newsgroup
set wshshell = wscript.createobject("wscript.shell")
message = "本脚本用于修复windows xp中当最小化程序时，无法在任务栏显示图标的问题。"& vbcr & vbcr
message = message & "为了正常工作，本脚本将关闭和重启 windows explorer 外壳，这个操作不会损坏你的系统。" & vbcr & vbcr
message = message & "请关闭所有杀毒软件的实时监控！并保存所有打开的文件。"& vbcr & vbcr
message = message & "是否继续？"
x = msgbox(message, vbyesno+vbexclamation, "注意")
if x = 6 then
on error resume next
wshshell.regdelete "hkcu\software\microsoft\windows\currentversion\explorer\stuckrects2\"
wshshell.regdelete "hkcu\software\microsoft\windows\currentversion\explorer\streamsmru\"
wshshell.regdelete "hkcu\software\microsoft\windows\currentversion\explorer\streams\desktop\"
wshshell.regdelete "hkcu\software\microsoft\internet explorer\explorer bars\{32683183-48a0-441b-a342-7c2a440a9478}\barsize"
p1 = "hkcu\software\microsoft\windows\currentversion\policies\explorer\"
wshshell.regwrite p1 & "nobandcustomize", 0, "reg_dword"
wshshell.regwrite p1 & "nomovingbands", 0, "reg_dword"
wshshell.regwrite p1 & "noclosedragdropbands", 0, "reg_dword"
wshshell.regwrite p1 & "nosettaskbar", 0, "reg_dword"
wshshell.regwrite p1 & "notoolbarsontaskbar", 0, "reg_dword"
wshshell.regwrite p1 & "nosavesettings",0,"reg_dword"
wshshell.regwrite p1 & "notoolbarsontaskbar", 0, "reg_dword"
wshshell.regwrite p1 & "nosettaskbar",0,"reg_dword"
wshshell.regwrite p1 & "noactivedesktop",0,"reg_dword"
wshshell.regwrite p1 & "classicshell",0,"reg_dword"
p1 = "hkcu\software\microsoft\windows\currentversion\group policy objects\localuser\software\microsoft\windows\currentversion\policies\explorer\"
wshshell.regwrite p1 & "noclosedragdropbands", 0, "reg_dword"
wshshell.regdelete p1 & "nomovingbands"
p1 = "hklm\software\microsoft\windows nt\currentversion\winlogon\shell"
wshshell.regwrite p1, "explorer.exe", "reg_sz"
p1 = "hkcu\software\microsoft\internet explorer\explorer bars\{32683183-48a0-441b-a342-7c2a440a9478}\"
wshshell.regdelete p1 & "barsize"
wshshell.regwrite p1, "media band", "reg_sz"
on error goto 0
for each process in getobject("winmgmts:"). _
execquery ("select * from win32_process where name='explorer.exe'")
process.terminate(0)
next
msgbox "完成！powered by ddf3" & vbcr & vbcr & "?kelly theriot and doug knox", 4096, "完成"
else
msgbox "没有对你的系统进行任何改变。" & vbcr & vbcr & "?kelly theriot and doug knox", 4096, "用户取消了"
end if