تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لمعرفة جميع عناوين Ip في الشبكة المحلية
#1
كاتب الموضوع : AhmedEssawy


كود :
Public Shared Function GetAllIP(Optional ByVal args As String() = Nothing) As Integer
'args in the signature is optional, without it
'the function will simply get the hostname
'of the local machine then go from there
Dim strHostName As New String("")
If args.Length = 0 Then
' Getting Ip address of local machine...
' First get the host name of local machine.
strHostName = DNS.GetHostName()
Console.WriteLine("Local Machine's Host Name: " + strHostName)
Else
strHostName = args(0)
End If
' Then using host name, get the IP address list..
Dim ipEntry As IPHostEntry = DNS.GetHostByName(strHostName)
Dim addr As IPAddress() = ipEntry.AddressList
Dim i As Integer = 0
While i < addr.Length
Console.WriteLine("IP Address {0}: {1} ", i, addr(i).ToString())
System.Math.Max(System.Threading.Interlocked.Increment(i), i - 1)
End While
Return 0
End Function
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  لمعرفة هل نعمل ضمن بيئة 32 بت أو 64 بت برمجيا RaggiTech 0 370 17-10-12, 08:59 PM
آخر رد: RaggiTech
  استخدام مجال الأسماء My.Computer لمعرفة هل ازرارالوظائف تستخدم ام لاكزر Ctrl و خلافه RaggiTech 0 358 17-10-12, 06:59 PM
آخر رد: RaggiTech
  نسخ مجلد مع جميع محتوياته RaggiTech 0 391 17-10-12, 06:49 PM
آخر رد: RaggiTech
  معرفة حجم مجلد مع جميع الملفات و المجلدات التي يحتوي عليها باستعمال ال Recursion RaggiTech 0 337 17-10-12, 06:47 PM
آخر رد: RaggiTech
  معرفة العنوان الفيزيائي لكروت الشبكة المثبة على الجهاز RaggiTech 0 583 17-10-12, 06:47 PM
آخر رد: RaggiTech
  لمعرفة نسخة الفريم وورك التي يعمل عليها التطبيق RaggiTech 0 249 17-10-12, 06:18 PM
آخر رد: RaggiTech
  لمعرفة عنوان المجلد MyDocuments RaggiTech 0 235 17-10-12, 06:17 PM
آخر رد: RaggiTech
  لمعرفة رسالة الخطأ الأخيرة بعد استدعاء دالة API (Last Error Message) RaggiTech 0 360 17-10-12, 06:17 PM
آخر رد: RaggiTech
  لمعرفة حجم الذاكرة الحية الخاصة بكل Slot RaggiTech 0 333 17-10-12, 06:17 PM
آخر رد: RaggiTech
  لمعرفة حالة الاتصال بالانترنت RaggiTech 0 361 17-10-12, 06:16 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم