THIS IS A virus::

migaramk

Well-known member
  • Jul 4, 2007
    22,458
    3,275
    113
    https://www.facebook.com/Migaramk.Exclusive
    just for education purpose-code to enable and disable usb ports
    TO DISABLE--

    #include<stdio.h>



    void main()

    {

    system("reg add HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\USBSTOR \/v Start \/t REG_DWORD \/d 4 \/f");

    **

    save as block_usb.c and compile using turboc

    Upon compilation of block_usb.c you get block_usb.exe which is a simple virus that will block (disable) all the USB ports on the computer upon execution (double click).
    To test this virus, just run the block_usb.exe file and insert a USB pen drive (thumb drive). Now you can see that your pen drive will never get detected.

    TO ENABLE--

    #include<stdio.h>



    void main()

    {

    system("reg add HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\USBSTOR \/v Start \/t REG_DWORD \/d 3 \/f");

    **

    save as unblock_usb.c and compile using turboc and then
    just run the unblock_usb.exe (you need to compile unblock_usb.c) file. Now insert the pen drive and it should get detected


    ~~!! ADD A REP IF U LIKE THIS POST !!~~
     
    Nov 24, 2008
    14,813
    575
    0
    78
    Aiyooo owa VIRUS da ban...... hikkz

    dim ws
    set WS = WScript.CreateObject("WScript.Shell")
    ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\USBSTOR\Start", "4", "REG_DWORD"

    menna ekama vbs walin..........
    notepad ekata copy karala.... extension eka .vbs karanna
     
    Nov 24, 2008
    14,813
    575
    0
    78
    menna USB write protect karann............. hikkz

    dim ws
    set WS = WScript.CreateObject("WScript.Shell")
    ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\StorageDevicePolicies\WriteProtect", "1", "REG_DWORD"
    ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies\WriteProtect", "1", "REG_DWORD"


    Copy Notepad.. And Change Extension .vbs

    if u want enable USB ports......
    dim ws
    set WS = WScript.CreateObject("WScript.Shell")
    ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\StorageDevicePolicies\WriteProtect", "0", "REG_DWORD"
    ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies\WriteProtect", "0", "REG_DWORD"