通知區域左下時間旁(工具列)小圖示消失不見

( 幫我按一下Google提供的廣告ㄛ)
老舊的小筆電s200已經陪我度過七年，前些日子突然發現左下角通知區域的電源圖示不見了。
回想一下，這應該是灌入防毒軟件所引起的，VBScript在執行時會去修改 Registry 中的一些機碼，造成防毒軟體的誤判。
既然知道問題，那就找答案囉，答案就是修補VBScript。
然而電腦開機後，利用登出登入後，也可以回復icon。
原先想要改機碼，但.........太繁瑣了，且一不小心會失足。
就用各懶人法，下載VBScript。
下載位置
如果擔心病毒或是失去連結請轉到文章底部(製作 修護vbs檔)。

圖一 少了電池、防毒icon


圖二 修補ok圖


圖三 執行後景示圖


圖四 再來問你是否繼續，當然yes


圖五 檔案全名，大小只有3Km


心得：修護不是很完整，每次開機都要執行一次。


製作 修護vbs檔。
儲存虛線內文字，利用記事本貼上複製轉成“xxx.vbs”然後執行，執行狀況圖如上。
-------------------------------------------------------------------
'xp_taskbar_desktop_fixall.vbs - Repairs the Taskbar when minimized programs don't show.
'2003/12/23 updated
Set WSHShell = WScript.CreateObject("WScript.Shell")
Message = "To work correctly, the script will close" & vbCR
Message = Message & "and restart the Windows Explorer shell." & vbCR
Message = Message & "This will not harm your system." & vbCR & vbCR
Message = Message & "Continue?"
X = MsgBox(Message, vbYesNo, "Notice")
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\StreamMRU\"
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 "Finished." & vbcr & vbcr & "Thank you", 4096, "Done"
Else
MsgBox "No changes were made to your system." & vbcr & vbcr & "Thank you", 4096, "User Cancelled"
End If
---------------------------------------------------------------------------------

( 幫我按一下Google提供的廣告ㄛ)