我的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, ＂完成＂
老大，这是什么程序啊，看不懂
就是把箭头后面的全部复制到写字板
然后保存取名为xxx.vbs，然后执行
|
|
设为首页
加入收藏
联系我们
打印本文 
返回顶部 
加入收藏 
关闭窗口
