السلام عليكم شباب طاب يومكم
اخواني الافاظل نفعنا الله بعلمكم
عندي سؤال
كيف استطيع عن طريق الفجول بيسك ان احصل على الايبي للحاسب والسيريل نمبر (s/n)
اي عنطريق عمل برنامج نستخدم بداخله Environment
او توجد طريقه اخرى
هكذا نحصل على الايبي
PHP كود :
Dim LocalIP As IPAddress = Dns.GetHostAddresses("").Where(Function(ip) ip.AddressFamily = AddressFamily.InterNetwork).First()
لاتنسى المكتبات الضرورية
PHP كود :
Imports System.Net.Sockets
Imports System.Linq
Imports System.Net
موفق
يا اخى بارك الله فيك كيف يتم استخدم هذه الكود
(21-11-13, 11:49 PM)mamas1 كتب : [ -> ]أنظر هذا المثال
السلام عليكم
انا نزلت المثال ولكن كيف افتحه في برنامج الفجول ممكن مساعدتي اين اجد المثال
إفتح هذا الملف
Get Ip.vbproj
المثال معمول بأصدار الفيجوال بيسك 2005
الاصدار اللي عندك 2010
قم بعمل ترقية للمثال من خلال ( التالي + التالي ) راح يفتح معاك المثال
على العموم
اعمل مثال جديد
ضع الادوات التالية :
Button عدد 1
TextBox عدد 1
أضف المكتبة
وضع في الزر الكود التالي :
PHP كود :
Dim ipaddress As String
Dim h As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
ipaddress = (CType(h.AddressList.GetValue(0), IPAddress).ToString)
TextBox1.Text = ipaddress
(22-11-13, 08:50 PM)مالكـ كتب : [ -> ]المثال معمول بأصدار الفيجوال بيسك 2005
الاصدار اللي عندك 2010
قم بعمل ترقية للمثال من خلال ( التالي + التالي ) راح يفتح معاك المثال
على العموم
اعمل مثال جديد
ضع الادوات التالية :
Button عدد 1
TextBox عدد 1
أضف المكتبة
وضع في الزر الكود التالي :
PHP كود :
Dim ipaddress As String
Dim h As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
ipaddress = (CType(h.AddressList.GetValue(0), IPAddress).ToString)
TextBox1.Text = ipaddress
Imports System.Net
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ip As String
Dim h As System.Net.IPHostEntry =
System.Net.Dns.GetHostByName(System.Net.Dns.GetHostByName)
i
p = (CType(h.AddressList.GetValue(0), IPAddress).ToString)
textbox1.text = ip
End Sub
End Class
انا عمل مثل ما قات ولكن توجد مشكله واخطاء
اولا :اخي شكلك لم تنسخ الكود بالضبط
المشكلة هي (GetHostByNam )
الصحيح ........ (GetHostName )
===========
ثانيآ : عند وجود مشكلة أذكرها ماهي المشكلة بالضبط ...... او ضع مثال للمعاينة او صورة
لا تقول مشكلة ثم تقف ...؟