[scluay]

   

[الشاكي لله]

اخي انت ليش معقد روحك ؟؟


انا كاتب لك فوق كود لجلب الايبي ومافي اسهل منه

PHP كود :

Dim LocalIP As IPAddress = Dns.GetHostAddresses("").Where(Function(ip) ip.AddressFamily = AddressFamily.InterNetwork).First() 


واذا تبي تخليه في textbox :-

PHP كود :

Textbox1.Text = LocalIP.ToString() 


[scluay]

السلام عليكم شباب ما اعرف كيف اشكركم
البرنامج تطبق ومشكورين جدا جدا

[ѕαLσσσмx]

استدعي مكتبة النت

PHP كود :

Imports System.Net 


PHP كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



        Dim hostr As New IPHostEntry
        hostr = Dns.GetHostByName("")
        For Each nn In hostr.AddressList
            MsgBox(nn.ToString)
        Next


    End Sub 


[scluay]

مشكورين جميعا كيف الحصول على s/n