۱۴-اسفند-۱۳۸۸, ۱۰:۲۸:۱۸
۱۸-اسفند-۱۳۸۸, ۲۲:۳۱:۱۴
من از این استفاده میکنم:
این سریال همه هارد ها رو میده
کد:
Public Function GetHardSerial() As String
Dim ss As String = ""
Dim physicalMedia As New Management.ManagementClass("Win32_PhysicalMedia")
For Each physicalMedium As Management.ManagementObject In physicalMedia.GetInstances()
ss += Trim(CStr(physicalMedium("SerialNumber")))
Next physicalMedium
Return ss
End Function۱۹-اسفند-۱۳۸۸, ۰۰:۲۱:۰۵
نقل قول: فراموش نکنید که باید از نوار ابزار بالای visual studio
project/add refrence/system manegement رو
انجام بدید.
منبع
کد:
Imports System.Management۱۹-اسفند-۱۳۸۸, ۱۷:۵۵:۵۱
خیلی ممنون امتحانش می کنم
یه سوال: این کد توی سیستم های 64 بیتی هم کار میکنه؟
یه سوال: این کد توی سیستم های 64 بیتی هم کار میکنه؟
کد:
("Win32_PhysicalMedia")۱۹-اسفند-۱۳۸۸, ۲۲:۲۹:۵۳
۲۰-اسفند-۱۳۸۸, ۱۱:۰۸:۱۶
من سیستم 64 بیتیم فعلا خرابه نمی تونم رووش تست کنم، اگه یکی این کارو انجام بده و نتیجه ور اعلام کنه ممنون میشم