Skillcs TEAM
ATENTIE!!! Sa deschis SubForumul V.I.P (only Administrator, Moderatori, V.I.P)
|
Nou pe simpatie:
Adelinadia
 | Femeie
25 ani
Mures
cauta Barbat
27 - 71 ani |
|
|
Skillcs TEAMInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
|
|
scrie codul asta in notepad:
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"
salvati ca renamerun.vbs si rulati
va aparea fereastra asta in care inlocuiti "@explorer.exe,-7023" cu ce vreti ex mangacs.3xforum.ro
|
|
| |
|
