[الفيومي116]

تمام الله ينور عليك ويجزيك خير
لكن هو الكود شغال تمام لما اعمل بينج على اي بي واحد
انما انا الفكره اني اعمل متسلسلة بكل الايبي على الشبكة ويحط النتيجة في داتا جريد فيو
فكتبت الكود بالشكل ده :

كود :

Dim IP As String = "192.168.1."
            For I = 0 To 254
                If My.Computer.Network.Ping("192.168.1." & I) Then
                    DataGridView1.Rows.Add()
                    DataGridView1(0, I).Value = I + 1
                    DataGridView1(1, I).Value = ("192.168.1." & I)
                End If
            Next

لكن بيحصل مشكله
Index was out of range. Must be non-negative and less than the size of the collection.