XP窗口最小化后任务栏不可见之解决方案备忘（剽之于Google)

拷贝如下代码，另存后缀为.vbs文件，运行之即可。

代码：

js 代码

1. 'xp_taskbar_desktop_fixall.vbs - Repairs the Taskbar when minimized programs don't show.   
2. '?Kelly Theriot and Doug Knox - 8/22/2003   
3. Set WSHShell = WScript.CreateObject("WScript.Shell")   
4. Message = "To work correctly, the script will close" & vbCR   
5. Message = Message & "and restart the Windows Explorer shell." & vbCR   
6. Message = Message & "This will not harm your system." & vbCR & vbCR   
7. Message = Message & "Continue?"  
8. X = MsgBox(Message, vbYesNo, "Notice")   
9. If X = 6 Then   
10. On Error Resume Next   
11. WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2\"  
12. WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\StreamMRU\"  
13. WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop\"  
14. WshShell.RegDelete "HKCU\Software\Microsoft\Internet Explorer\Explorer Bars\{32683183-48a0-441b-a342-7c2a440a9478}\BarSize"  
15. P1 = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"  
16. WshShell.RegWrite p1 & "NoBandCustomize", 0, "REG_DWORD"  
17. WshShell.RegWrite p1 & "NoMovingBands", 0, "REG_DWORD"  
18. WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"  
19. WshShell.RegWrite p1 & "NoSetTaskbar", 0, "REG_DWORD"  
20. WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"  
21. WshShell.RegWrite p1 & "NoSaveSettings",0,"REG_DWORD"  
22. WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"  
23. WshShell.RegWrite p1 & "NoSetTaskbar",0,"REG_DWORD"  
24. WshShell.RegWrite p1 & "NoActiveDesktop",0,"REG_DWORD"  
25. WshShell.RegWrite p1 & "ClassicShell",0,"REG_DWORD"  
26. p1 = "HKCU\Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\LocalUser\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"  
27. WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"  
28. WshShell.RegDelete p1 & "NoMovingBands"  
29. p1 = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell"  
30. WshShell.RegWrite p1, "explorer.exe", "REG_SZ"  
31. p1 = "HKCU\Software\Microsoft\Internet Explorer\Explorer Bars\{32683183-48a0-441b-a342-7c2a440a9478}\"  
32. WshShell.RegDelete p1 & "BarSize"  
33. WshShell.RegWrite p1, "Media Band", "REG_SZ"  
34. On Error Goto 0  
35. For Each Process in GetObject("winmgmts:"). _  
36. ExecQuery ("select * from Win32_Process where name='explorer.exe'")  
37.    Process.terminate(0)  
38. Next  
39. MsgBox "Finished." & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "Done"  
40. Else  
41. MsgBox "No changes were made to your system." & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "User Cancelled"   
42. End If