منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كود لمعرفة الرقم الفريد الخاص بالهارديسك Hard disk
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
اطلب المساعدة في كود لإظهار الرقم الفريد الخاص بالهارديسك Hard disk والمعالج
وشكرا
http://social.msdn.microsoft.com/Forums/...0b336b8635
في الرابط اعلاه اذهب للمشاركة رقم 7 بها صورة توضيحيه .[url="http://www.codeproject.com/Articles/17973/How-To-Get-Hardware-Information-CPU-ID-MainBoard-I"]


روابط من موقع Codeproject :
http://www.codeproject.com/Articles/1797...ainBoard-I[/url]

http://www.codeproject.com/Articles/1694...ithout-WMI


****
***
**
*
(30-11-12, 03:02 PM)kslawy كتب : [ -> ]http://social.msdn.microsoft.com/Forums/...0b336b8635
في الرابط اعلاه اذهب للمشاركة رقم 7 بها صورة توضيحيه .


روابط من موقع Codeproject :
http://www.codeproject.com/Articles/1797...ainBoard-I

http://www.codeproject.com/Articles/1694...ithout-WMI


****
***
**
*

هل هذا هو الرقم الخاص بالهارديسك ("S1ADMYADC09741")
(09-08-16, 11:47 PM)الكاتب كتب : [ -> ]
(09-08-16, 11:35 PM)أسامة السالمي كتب : [ -> ]هل هذا هو الرقم الخاص بالهارديسك ("S1ADMYADC09741")

لا

أخي أنا استخدمت هذا الكود :



PHP كود :
   Dim MOS_HD As New ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
 
       Dim mo_HD As ManagementObject
        For Each mo_HD In MOS_HD
.Get()
 
           TextBox1.Text mo_HD("Model").ToString() 
PHP كود :
Add Reference to the System.Management Assembly.

For 
this you have to do:

1.   Go to Project Tab

2. Click on Add References

3. Click on 
.NET tab

4. Select System
.Management and press ok
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Dim HDD_Serial 
As String

        Dim hdd 
As New ManagementObjectSearcher("select * from Win32_DiskDrive")

 
       For Each hd In hdd.Get

            HDD_Serial 
hd("SerialNumber")
 
           MsgBox(HDD_Serial)
 
       Next
    End Sub 
مشكور أخي،،
لكن أعطاني نفس الرقم اللي بالأعلى