
ayuda para realizar ping a las ip de un listview
Publicado por Benjamin Eliecer (8 intervenciones) el 10/01/2022 17:03:28
hola a todos como están, soy nuevo en el foro, escribo para una ayuda sucede que tengo un listview con direcciones ip, entonces realice un código pero este solo funciona cuando selecciono una fila la idea es que automáticamente realice ping en un cierto intervalo de tiempo.
1
2
3
4
5
6
7
8
9
10
11
12
Public Sub PingPlayers()
Dim p As New Ping
Try
Dim Rst As PingReply = p.Send(Me.LNetgames.SelectedItems(0).SubItems(5).Text)
Dim Datos As New StringBuilder
Datos.Append(Rst.RoundtripTime)
Me.LNetgames.SelectedItems(0).SubItems(0).Text = Datos.ToString
Catch ex As Exception
Me.LNetgames.SelectedItems(0).SubItems(0).Text = ex.ToString
End Try
End Sub
Valora esta pregunta


0