26-10-12, 02:45 PM
amgadtamer كتب :GethostbyName تم إلغاؤها وتم إستخدام GetHostEntry
إليك هذه الدالة التى سوف تقوم بإرجاع رقم ال ipv4
PHP كود :
Function GetIpAddresss(ByVal hostname As String) As String
Dim ip As String = Nothing
Dim i As Integer
For i = 0 To Dns.GetHostEntry(hostname).AddressList.Length - 1
If Dns.GetHostEntry(hostname).AddressList(i).IsIPv6LinkLocal = False Then
ip = Dns.GetHostEntry(hostname).AddressList(i).ToString()
End If
Next
Return ip
End Function
اشكرك أخى امجد
ولكنت معلش إستحمل كثرة أسئلتى وسوء فهمى
انا دلوقتى قمت بوضع الدالة فى المشروع طيب اريد وضع IP فى تكست بوكس وجربت انى استدعى الدالة GetIpAddresss بيظهر لى خطأ
كذلك قمت داخل الدالة بوضع هذا الجزء TextBox1.Text = ip ولم تظهر قيمة الـ ip داخل التكست بوكس - فهل من الممكن مساعدتى فى ذلك ؟
