buongiorno ad html.it e a tutti gli utenti del forum, ho un problema un pò strano di facilissima risoluzione per voi , ma che a me sta complicado un pò le cose...
vi posto un po di codice
codice:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim indirizzoip As String
Dim stringanegativa As String = "0.0.0.0"
Dim i As Integer
indirizzoip = TextBox1.Text
If indirizzoip <> stringanegativa Then
For i = 1 To TextBox3.Text
sleep(1000)
If My.Computer.Network.Ping(indirizzoip) Then
TextBox2.Text = TextBox2.Text & indirizzoip & " " & Now & " [ OK ]" & vbCrLf
Label2.Text = "[ OK ]"
labelok = labelok + 1
TextBox5.Text = labelok
resindirizzoip = 1
Else
TextBox2.Text = TextBox2.Text & indirizzoip & " " & Now & " [ OFFLINE ]" & vbCrLf
Label2.Text = "[ OFFLINE ]"
labelfalliti = labelfalliti + 1
TextBox4.Text = labelfalliti
resindirizzoip = 0
End If
Next i
End If
End Sub
E tutto funzionante, il problema strano e che, se faccio ad es. 2 cicli le operazioni dentro l'if
tipo le stampe nelle textbox vengono eseguite a fine ciclo for.
che cosa strana