This script will Disable low disk space warning message. (VBScript)

'Disable Low disk space warning message

Dim WSHShell, MyBox, Title
Message = "This script will Disable low disk space warning message." & 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")

WshShell.RegWrite "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoLowDiskSpaceChecks", 1, "REG_DWORD"
Title = "Low disk space warning message is Disabled." & vbCr & vbCr
Title = Title & "Ths script was downloaded from www.paulsxp.com."
MyBox = MsgBox(Title,64,"Finished")
End If

Download


Back to Line 49