我的系統(tǒng)是win xp的某天開機(jī)忽然發(fā)現(xiàn)我的任務(wù)蘭不能顯示正在運(yùn)行的程序。在任務(wù)管理器可以顯示,清各位高手幫忙指點(diǎn)以下。

熱心網(wǎng)友

Set WSHShell = WScript。CreateObject("WScript。Shell")Message = "本腳本用于修復(fù)Windows XP中當(dāng)最小化程序時(shí),無法在任務(wù)欄顯示圖標(biāo)的問題。"& vbCR & vbCRMessage = Message & "為了正常工作,本腳本將關(guān)閉和重啟 Windows Explorer 外殼,這個(gè)操作不會(huì)損壞你的系統(tǒng)。" & vbCR & vbCRMessage = Message & "請(qǐng)關(guān)閉所有殺毒軟件的實(shí)時(shí)監(jiān)控!并保存所有打開的文件。"& vbCR & vbCRMessage = Message & "是否繼續(xù)?"X = MsgBox(Message, vbYesNo+vbExclamation, "注意")If X = 6 Then On Error Resume NextWshShell。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\本地User\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, "媒體區(qū)", "REG_SZ"On Error Goto 0For Each Process in GetObject("winmgmts:")。 _ExecQuery ("select * from Win32_Process where name='explorer。exe'") Process。terminate(0)NextMsgBox "完成!" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "完成"ElseMsgBox "沒有對(duì)你的系統(tǒng)進(jìn)行任何改變。" & vbcr & vbcr & "?Kelly Theriot and Doug Knox", 4096, "用戶取消了"End If復(fù)制所有代碼到記事本,后綴名為vbs,保存后運(yùn)行上傳了一個(gè),0積分下載的,不會(huì)要分的。

熱心網(wǎng)友

1右擊任務(wù)欄空白處-屬性-選定"快速啟動(dòng)欄",2.右擊任務(wù)欄空白處-工具欄-選定'快速啟動(dòng)",如不行,可能系統(tǒng)文件受損,重裝下系統(tǒng).