For Each GridViewRow As GridViewRow In GridView2.Rows
<pre>Dim dz = New DataTable() dz.Columns.Add(New DataColumn("Hostname", GetType(String))) dz.Columns.Add(New DataColumn("Port", GetType(String))) dz.Columns.Add(New DataColumn("Status", GetType(String))) Dim row = dz.NewRow() row("Hostname") = "host1" row("Port") = 7777 dz.Rows.Add(row) row = dz.NewRow() row("Hostname") = "host2" row("Port") = 8888 dz.Rows.Add(row) For Each GridViewRow As GridViewRow In GridView2.Rows Dim ping = New Ping() Dim result As PingReply = Nothing Dim status As IPStatus Dim hos As String = GridViewRow.Cells(1).Text.ToString() Dim po As String = GridViewRow.Cells(2).Text.ToString() Try result = ping.Send(hos, po) status = result.Status If status = IPStatus.DestinationHostUnreachable Then Else row("Status") = result.Status End If Catch ex As Exception End Try Next dz.AcceptChanges() GridView2.DataSource = dz GridView2.DataBind()
DataTable
DataGridView
GridView2
row
GridViewRow
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)