 |
ForuMania Forumania , Iti ureaza bun venit
|
| Subiectul anterior :: Subiectul urmator |
| Autor |
Mesaj |
Divine Site-Creator

Data inscrierii: 09/Mar/2008 Mesaje: 48
|
Trimis: 16/03/2008 01:59 Titlul subiectului: Rename Run |
|
|
Mergem in Run scriem : Notepad si dam enter apoi in notepad punem acest cod dupa ce ati pus codu si il salvam peste tot pe pc in extenisa .vbs
dupa ce intram in el ne va aparea o ferestestra in care schimbam "@explorer.exe,-7023" cu ce nume dorim noi si dam Ok iar numele de la run este schimbat codu care trebuie sa-l puneti in notepad este asta
| Cod: | 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 = "Schimba numele la Run din Start by Hell Team"
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")
|
|
|
| Sus |
|
 |
misanchik
Data inscrierii: 22/Iul/2012 Mesaje: 5 Localitate: Bulgaria
|
Trimis: 02/08/2012 07:45 Titlul subiectului: |
|
|
| Every good article that I read completes my inner world. Thank you for your. She also contributed its share. |
|
| Sus |
|
 |
|
|
Nu puteti crea un subiect nou in acest forum Nu puteti raspunde in subiectele acestui forum Nu puteti modifica mesajele proprii din acest forum Nu puteti sterge mesajele proprii din acest forum Nu puteti vota in chestionarele din acest forum
|
Powered by phpBB © 2001, 2002 phpBB Group Fa-ti si tu propriul forum GRATUIT, pe www.myforum.ro
|