|
|
|
|
|
Cara Ubah Registered Owner dan Organization |
|
|
Friday, 01 August 2008 |
|
Untuk mengubah Registered Owner dan Registered Organization yang terlihat pada system properties adalah dengan mengubah value yang ada di registry. Cara merubahnya : Buka regedit, lalu cari di HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion. Setelah masuk ke path itu lalu cari string RegisteredOwner dan RegisteredOrganization. Dobel klik pada masing2 string itu lalu isi value data sesuai dengan dinginkan. Setelah selesai tutup saja regedit nya. Perubahan akan dapat langsung terlihat di system properties.
Ada lagi cara lain yang lebih gampang daripada harus ngubek-ubek registry. Gini lho...
1. Buka Notepad
2. Copy code dibawah ini, lalu paste di notepad
|
Option Explicit
Set ws = WScript.CreateObject("WScript.Shell")
Dim ws, t, p1, p2, n, g, cn, cg, vbdefaultbutton
Dim itemtype
p1 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
n = ws.RegRead(p1 & "RegisteredOwner")
g = ws.RegRead(p1 & "RegisteredOrganization")
t = "Change Owner and Organization"
cn = InputBox("Masukkan Nama Owner", t, n)
If cn <> "" Then
ws.RegWrite p1 & "RegisteredOwner", cn
End If
cg = InputBox("Masukkan Nama Organisasi", t, g)
If cg <> "" Then
ws.RegWrite p1 & "RegisteredOrganization", cg
End If
Dim MyBox
MyBox = MsgBox("Proses Selesai! Liat hasilnya di system properties", 64,"Done") |
3. Save as dengan nama "Owner.vbs" (tanpa tanda kutip)
4. Jalankan (Dobel klik) Owner.vbs yang baru saja dibuat.
5. Senyum deh... 
|
|
