|
A booter est une application qui tente de se connecter à un utilisateur sur une application connecté à Internet. A booter un bon moyen de tester tous les programmes que vous avez codé ou une configuration de sécurité du réseau . Visual Basic 6 langage de programmation de Microsoft peut être utilisé pour créer des applications de booter avec un minimum de code. C'est un langage idéal , car les applications VB n'utilisent pas beaucoup de mémoire et peut se connecter à Internet. Instructions
1 Ouvrez l'application de programmation Visual Basic et créez une nouvelle application. Nommez le fichier afin qu'il puisse être facilement identifié à l'avenir , par exemple " . VB6 Booter"
2 Ajoutez deux zones de texte , trois boutons blancs, deux étiquettes et une minuterie dans l'application . La minuterie permettra de mesurer la quantité de temps le booter s'exécute.
3 place les trois boutons au bas de l'application et placez les deux zones de texte au sommet. Placez la minuterie dans le coin supérieur droit . Nommez le premier bouton sur la gauche "Start ", le deuxième bouton " Stop" et le troisième "Clear ".
4 Cliquez sur l'onglet code source de Visual Studio pour voir le code source de l'application. Ajoutez les lignes suivantes au sommet de la structure du code pour spécifier ce que l'application sera fait.
Importations System.NetImports System.TextImports System.Net.SocketsImports System.Diagnostics
5 Créer une nouvelle classe pour l'application et le sous-programme de la minuterie en ajoutant les lignes de code suivantes.
Classées publique Form1
Private Sub Timer1_Tick ( expéditeur de ByVal comme System.Object , ByVal e As système . EventArgs ) Poignées Timer1.TickTry
ListBox1.Items.Add ( " DatPktS #" + TextBox1.Text + "# S " ) ListBox1.Items.Add ( My.Computer.Info.AvailableVirtualMemory ) UdpClient As New UdpClientDim GLOIP Comme IPAddressDim bytCommand As Byte () = New Byte () {} GLOIP = IPAddress.Parse ( TextBox1.Text ) udpClient.Connect ( GLOIP , TextBox2.Text ) bytCommand = bytCommand.Length ) ListBox1.SelectedIndex + = 1Catch ex As ExceptionMe.Close () End Sub TryEnd
6 Assign sous-routines à chacun des boutons de l'application. Une fois pressé, les boutons exercer la fonction implicite .
Private Sub Button1_Click ( expéditeur de ByVal comme System.Object , ByVal e As System.EventArgs ) Handles Button1.Clicklabel2.forecolor = Color.Limelabel2.text = " actif ! " Timer1.Start ( ) End Sub Private Sub
Button2_Click ( expéditeur de ByVal comme System.Object , ByVal e As System.EventArgs ) Handles Button2.Clicklabel2.forecolor = Color.Redlabel2.text =" arrêté! " Timer1.Stop ( ) End Sub Private Sub
Button3_Click ( expéditeur de ByVal comme System.Object , ByVal e As System.EventArgs ) Handles Button3.ClickListBox1.Items.Clear ( ) End Sub
7 enregistrer le code source et le compiler l'application dans un fichier . exe . Lancez le fichier . Exe . Saisissez l'adresse IP de l'hôte en "zone de texte 1" pour spécifier un emplacement qui doit être démarré. Appuyez sur le bouton "Démarrer " pour lancer le booter .
|
