重装任务栏

来源：百度知道 编辑：UC知道 时间：2024/06/18 06:05:47
（*这里的任务栏指屏幕下方带有“快速启动”“活动图标”“开始”的蓝色长条）
网上不少人遇到这样的问题：开机时任务栏总是很紊乱，比如会突然多出几个语言栏（一个有图标，其他的空着），或者打开一个对话框，在任务栏就出现两个图标。我也遇到这样的情况。我想，能不能在别的正常机器上复制“任务栏”的系统文件过来再覆盖上去。大虾们可否告诉我：有关任务栏的系统文件有哪些？在哪里？

打开写字板:

输入以下信息:(不含end if 后面的横线)

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.RegDel