我的电脑窗口最小化后不能在任务栏显示,怎么解决?

2024-10-31 11:25:54
推荐回答(1个)
回答1:

可以从网上下载这个软件Taskbar
Repair
Tool
Plus!
用以修复
XP
下任务栏显示不正常的各种问题。
或者:
把箭头后的文本全部复制到notepad,取名xxx.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