منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] كيف أجعل برنامجي يعمل على جهاز واحد ياستخدام id الهارد ديسك؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] كيف أجعل برنامجي يعمل على جهاز واحد ياستخدام id الهارد ديسك؟ (/showthread.php?tid=14717)



كيف أجعل برنامجي يعمل على جهاز واحد ياستخدام id الهارد ديسك؟ - abdelaaliazz - 12-02-16

مساعدة؟ كيف أجعل برنامجي يعمل على جهاز واحد ياستخدام id الهارد ديسك؟
أحتاج كود  vb.net


RE: كيف أجعل برنامجي يعمل على جهاز واحد ياستخدام id الهارد ديسك؟ - mohamed haroon - 12-02-16

السلام عليكم و رحمة الله و بركاتة

 هذا مثال على ما تطلبة باستعمال مكتبة dll اتمنى يفيدك
[attachment=9379]



RE: كيف أجعل برنامجي يعمل على جهاز واحد ياستخدام id الهارد ديسك؟ - HASAN6.0 - 13-02-16

اخي الكريم ..
هذا كود الحصول على رقم الهارد ديسك
PHP كود :
Dim mos As New ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia")
 
       For Each mo As ManagementObject In mos.Get()
 
           If Not IsNothing(mo("SerialNumber")) Then
                Dim serial 
As String mo("SerialNumber").ToString()
 
               Label1.Text serial
            End 
If
 
       Next 
طبعاً بعد عمل
PHP كود :
Imports System.Management 
واضافة الملف system.management.dll في الـReferences . من المسار التالي
كود :
C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.5\System.Management.dll