Need to Rename your Run, YES! Now you can rename the run as you like.....
Just copy all the below text into the Notepad file:
Option Explicit
Set ws = WScript.CreateObject("WScript.Shell")
Dim ws, t, p1, n, cn, MyBox, Title
Dim itemtype
p1 = "HKCR\CLSID\{2559a1f3-21d7-11d4-bdaf-00c04f60b9f0}\"
n = ws.RegRead(p1 & "LocalizedString")
t = "Change the Name of Run on Start Menu"
cn = InputBox("Type in the name to replace Run with.", t, n)
If cn <> "" Then
ws.RegWrite p1 & "LocalizedString", cn
End If
Title = "Run on the Start Menu has now been renamed."
MyBox = MsgBox(Title,64,"Finished")
After copy all the text into notepad then save as .vbs file....
Example:
After that double click the file your will see this screen:
Type the name as your want!! This example is rename the run as "Don't Click"!
After success:
Wish You all can enjoy it.....^^
After that double click the file your will see this screen: Type the name as your want!! This example is rename the run as "Don't Click"!After success:
Wish You all can enjoy it.....^^
0 comments
Post a Comment