Set WshShell = CreateObject("WScript.Shell") Var_YN = MsgBox("Enable Run Dialog?", vbYesNo, "I-T[e]ChNoLoGy Corp Ltd") If Var_YN = 6 Then WshShell.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun",0,"REG_DWORD" Else WshShell.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun",1,"REG_DWORD" Var_Ok = MsgBox("Run Dialog is Disabled!", vbOkOnly, "I-T[e]ChNoLoGy Corp Ltd") End If
Cara Membuka RUN yang di Disable oleh Admin
Copy kode dibawah kemudian paste di Notepad lalu simpan dengan nama run.vbs atau nama lain tapi dengan extensi .vbs
thanks sob. . nice info ya
ReplyDeletekunjungin balik ya