نحوه خواندن شماره سریال یک سخت افزار

[mehdijalali]

با عرض سلام
یک command یا یک تابع می خواستم که شماره سریال مودم را بتوانم با آن بدست آورد

[Netsky]

سلام .
واسه اينكه بتونيد در دات نت اطلاعات سخت افزاري رو بدست بياريد بايد از WMI استفاده كنيد . اين لينك (http://msdn.microsoft.com/en-us/library/aa394360(VS.85).aspx) واسه مودم هستش و اطلاعاتي رو كه بوسيله WMI ميشه از اون استخراج كرد رو داخل خودش داره .
اين كد هم DeviceID رو براتون بدست مياره .


Imports System
Imports System.Management
Imports System.Windows.Forms

Namespace WMISample

Public Class MyWMIQuery

Public Overloads Shared Function Main() As Integer

Try
Dim searcher As New ManagementObjectSearcher( _
"root\CIMV2", _
"SELECT * FROM Win32_POTSModem")

For Each queryObj As ManagementObject in searcher.Get()

Console.WriteLine("-----------------------------------")
Console.WriteLine("Win32_POTSModem instance")
Console.WriteLine("-----------------------------------")
Console.WriteLine("DeviceID: {0}", queryObj("DeviceID"))
Next
Catch err As ManagementException
MessageBox.Show("An error occurred while querying for WMI data: " & err.Message)
End Try
End Function
End Class
End Namespace
موفق باشيد ..........