[asemshahen5]

كود جلب السيريال الخاص بالمذر بورد :

PHP كود :

Dim query As String = "Select SerialNumber From Win32_BaseBoard"
        Using mbs As ManagementObjectSearcher = New ManagementObjectSearcher(query)
            For Each mo As ManagementObject In mbs.Get
                For Each pd As PropertyData In mo.Properties
                    ' should be only one'
                    If pd.Name = "SerialNumber" Then
                        ' value is object, test for Nothing'
                        If pd.Value IsNot Nothing Then
                            TextBox1.Text = pd.Value.ToString
                        End If
                        Exit For
                    End If
                Next
            Next
        End Using