Restore IE and OE Default Title Bar. (VBScript)
| Dim pmShell, oe_id, oe_id2, oe_tit_key Set pmShell = CreateObject("WScript.Shell") On Error Resume Next oe_id = "HKCU\Identities\Default User id" oe_id2 = pmShell.RegRead(oe_id) oe_tit_key = "HKCU\Identities\" & oe_id2 & "\Software\Microsoft\Outlook Express\5.0\Windowtitle" pmShell.RegDelete oe_tit_key pmShell.Run("rundll32.exe iedkcs32.dll,Clear") MsgBox "Default Title Bar has been Restored.", vb, "Finished" |