منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كود اظهار سريال الهارد او والماذر بورد - نسخة قابلة للطباعة

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

كود اظهار سريال الهارد او والماذر بورد - محمد اسماعيل - 11-02-18

استخدمت الكود ين التالين لاظهر سريال الماذر بورد ولكن حدثت مشكلة

الكود يظهر سريال الماذر بورد باللابتوب نسخة 7 الخاص بي ولكن لا يظهر سريال pc

علما بان pc نسخة اكس بي ماذر بورد جيجا بايت يظهر فارغ وحاولت بكذا طريقة ولكن لاتاتي بشيء لا اعلم ما الخطا

برجاء التعديل بكود يعمل علي جميع الاجهزة فاعتمد علية لتفعيل برنامجي

كود :
 Private Sub Button12_Click(sender As System.Object, e As System.EventArgs) Handles Button12.Click
       Dim MOS As ManagementObjectSearcher = New ManagementObjectSearcher("Select * From Win32_BaseBoard")
       For Each getserial As ManagementObject In MOS.[Get]()
           TextBox1.Text = "Your motherboard serial is : " & getserial("SerialNumber").ToString()
       Next

   End Sub

   Private Sub Button13_Click(sender As System.Object, e As System.EventArgs) Handles Button13.Click
       Dim q As New SelectQuery("Win32_BaseBoard")
       Dim search As New ManagementObjectSearcher(q)
       Dim info As New ManagementObject

       For Each info In search.Get
           MessageBox.Show("Serial Number: " & info("serialnumber").ToString & vbNewLine & vbNewLine & "motherboard Version: " & info("version").ToString)
       Next
   End Sub


سريال الهارد بنفس المشكلة يعمل علي اللابتوب ولا يعمل علي جهاز pc


كود :
   Dim HDD_Serial As String = ""
       Dim hdd As New ManagementObjectSearcher("select * from Win32_DiskDrive")
       For Each hd In hdd.Get
           HDD_Serial = hd("SerialNumber")
       Next
       TextBox1.Clear()
       TextBox1.Text = HDD_Serial


RE: كود اظهار سريال الهارد او والماذر بورد - MOSTAFA.KAMEL - 11-02-18

http://vb4arb.com/vb/showthread.php?tid=14845
شوف ده

RE: كود اظهار سريال الهارد او والماذر بورد - عبد العزيز البسكري - 11-02-18

السلام عليكم و رحمة الله و بركاته
إبحث أخي " محمد اسماعيل " في هذا الجزء .. لعلّ و عسى ..