任务栏不见了

今天遇到个奇怪的问题,我电脑开机后发现任务栏不见了。开始还以为一不小心用鼠标拖走了,解除锁定后拖了半天也没拖出来,真活见鬼了,关机前还好好呢,怎么突然任务栏就没了。试了N多方法均无效,求助google找到了不知哪位神人写的vbs一下子解决了。遇到这种疑难杂症还真头疼,如果哪位网友的任务栏消失了不知道怎么解决,那么不妨试试这个脚本,脚本的主要作用是修改任务栏设置为默认值,可以放心使用。“纯中药 无副作用”将一下代码另存为vbs格式双击运行即可

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

《任务栏不见了》有8个想法

  1. 不过俺们从来还没有遇到此等怪事呢。

    “纯中药 无副作用”,其实这是一种误解,事实上并非如此。西药有一定的毒副作用,中药同样也免不了;区别在于前者被明明白白地告知,而后者消费者不得而知。

发表评论

电子邮件地址不会被公开。 必填项已用*标注