This script will speed up the Menu display. (VBScript)
| 'Fast Menu Display On Error Resume Next Dim WSHShell, MyBox, Title Message = "This script will Speed up the Menu Display." & 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\Control Panel\Desktop\MenuShowDelay", 1, "REG_SZ" Title = "Fast Menu Display Enabled!" &vbCr &vbCr Title = Title & "This script was download from www.paulsxp.com" MyBox = MsgBox(Title,64,"Finished") End If |