Sabtu, 10 April 2010

Menangani Virus Tanpa Anti Virus

sahabat kulo iki aku ada sedikit yang aku tahu kalo regedit kita kena virus
task manager,run,folder option,pokoknya timbulnya gejala virus
iki aku ada sedikit penawarnya buat nyembuhin sistem windowsnya
copy jimat dibawah ini ke dalam notepad lalu save dengan extensi vbs(*.vbs)
misal dodol.vbs
selamat mencoba...........

On error resume next
Dim Reg
Set Reg = CreateObject("WScript.Shell")

if msgbox("Kembalikan menu Run ?" , VbOkCancel) = VbOK then
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoRun", "0", "REG_DWORD"
end if

if msgbox("Enable Registry Tool ?" , VbOkCancel) = VbOK then
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\System\DisableRegistryTools", "0", "REG_DWORD"
end if

if msgbox("Perlihatkan file hidden" , VbOkCancel) = VbOK then
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\Advanced\Hidden", "1", "REG_DWORD"
end if

if msgbox("Kembalikan menu Find" , VbOkCancel) = VbOK then
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoFind", "0", "REG_DWORD"
end if

if msgbox("Kembalikan menu Option" , VbOkCancel) = VbOK then
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoFolderOptions", "0", "REG_DWORD"
end if

if msgbox("Enable Taskmanager" , VbOkCancel) = VbOK then
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\System\DisableTaskMgr", "0", "REG_DWORD"
end if
_________________

Tidak ada komentar: