مشروع تخرج

استخدم ال Winsock

ضع كائنMicrosoft Winsock Control 6.0 و سمهWinsock1

ثم ضع الكود التالي :lol:

Private Sub Form_Load()
Dim IP As String
IP = Winsock1.LocalIP
If IP = "127.0.0.1" Then IP = "You aren't connected"
MsgBox IP
End Sub

Moa

شكرا على المشاركة

ولكنى اعتقد انه يوجد طريقة اخرى لمعرفة رقم ال IP . :rolleyes:

اقتباس

ولكنى اعتقد انه يوجد طريقة اخرى لمعرفة رقم ال IP

اخبرنا بهذه الطريقة حتى نستفيد :rolleyes:

تحيه طيبه لك يا اخ محمد وبعد

اذا كنت اعرف هذه الطريقه ما سألت عنها وبما انك عضو ذو مشركات فعالة وجيدة فانى اطلب منك الرد على هذا الؤال من فضلك....

:lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol:

:lol: :lol: :lol: :lol:

ماكنش يتعز وحياتك

:lol: :lol: :lol: :lol: