25-07-23, 02:32 PM
السلام عليكم ورحمة الله
لعرض رقم البيوس من موجه الاوامر نكتب
النتيجة ستكون مثل
في الفيجوال ستوديو نحصل على النتيجة بالشكل التالي
وارجوا الاستفادة للجميع
لعرض رقم البيوس من موجه الاوامر نكتب
كود :
wmic bios get serialnumber
النتيجة ستكون مثل
في الفيجوال ستوديو نحصل على النتيجة بالشكل التالي
كود :
Imports System.Management
Dim q As New SelectQuery("Win32_bios")
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 & "Bios Version: " & info("version").ToString)
Next
وارجوا الاستفادة للجميع