军生吧 关注:60贴子:2,018
  • 14回复贴,共1

页面最小化后,任务栏中没有图标

只看楼主收藏回复

页面最小化后,任务栏中没有图标
把下面这段代码复制到记事本中,然后重命名后缀改为VBS的。然后双击就可以了。 
'xp_taskbar_desktop_fixall.vbs - Repairs the Taskbar when minimized programs don't show. 
'?Kelly Theriot and Doug Knox - 8/22/2003 
'翻译: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 "完成!" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "完成" 

Else 

MsgBox "没有对你的系统进行任何改变。" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "用户取消了" 

End If


回复
1楼2006-10-23 21:42
    • 59.46.1.*
    牛人


    回复
    2楼2008-11-22 12:40
      • 220.192.148.*
      真的很厉


      回复
      3楼2008-11-25 11:32
        • 222.216.246.*
        很厉害,谢谢


        回复
        4楼2008-11-27 14:15
          • 123.117.219.*
          牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢。牛逼!谢谢


          回复
          5楼2008-12-19 08:46
            非常的好


            回复
            6楼2008-12-23 01:04
              • 58.218.185.*
              我的机子上还是无法运


              回复
              7楼2008-12-24 15:40
                • 222.190.124.*
                没用啊,怎么办?


                回复
                8楼2009-04-06 13:18
                  • 60.209.30.*
                  厉害


                  回复
                  9楼2009-04-08 15:21
                    怎么弄的?五体投地啊,花了我一上午没弄好,以为中病毒了,按你说的2秒钟就好了


                    回复
                    10楼2010-11-26 11:53
                      怎么弄的啊,我电脑的任务栏也显示不了


                      回复
                      11楼2011-11-28 20:06
                        急啊,教教我


                        回复
                        12楼2011-11-28 20:07
                          怎么弄的啊 任务栏..


                          回复
                          13楼2011-11-28 20:11
                            多谢多谢


                            回复
                            14楼2012-03-11 12:29
                              必须顶了


                              回复
                              15楼2014-06-12 09:46