This script will turn all balloon tips off. (VBScript)

'vista_balloontips.vbs - Disables

Dim WSHShell, n, MyBox, p, itemtype, Title
Message = "This script will Disable Balloon Descriptions." & vbCr
Message = Message & "You may need to LogOff and On for this to take effect." & vbCr & vbCr
Message = Message & "Continue?"

X = MsgBox(Message, vbYesNo + vbQuestion, "Paul's XP and Vista Tweaks")
If X = 6 Then

Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
p = p & "TaskbarNoNotification"
itemtype = "REG_DWORD"
n = 0

WSHShell.RegWrite p, n, itemtype
Title = "All balloon Descriptions are now Disabled." & vbCR
Title = Title & "You may need to log off and on" & vbCR
Title = Title & "for the change to take effect." & vbcr & vbcr
Title = Title & "Ths script was downloaded from www.paulsxp.com."
MyBox = MsgBox(Title,64,"Finished")
End If

Download


Back to Line 19