بدست آوردن شماره سریال هارد دیسک با vb.net [بایگانی]

omidreza812

پنج شنبه 21 تیر 1386, 20:35 عصر

سلام دوستان
برای بدست آوردن شماره سریال هارد دیسک با vb.net راهنمایی
کنید لطفاً.
اگر کد دارید که نور علا نور.

shamsoft

پنج شنبه 21 تیر 1386, 20:46 عصر

کد زیر رو تست کن ...

Imports System.Management

Dim physicalMedia As New Management.ManagementClass("Win32_PhysicalMedia")

For Each physicalMedium As Management.ManagementObject In physicalMedia.GetInstances()
MessageBox.Show("Serial Number: " & CStr(physicalMedium("SerialNumber")))
Next physicalMedium

MAiLDEREMi

جمعه 22 تیر 1386, 03:01 صبح

با سلام
راستش اگه می خواین قفلی برای برنامه تهیه کنید بهتره که یه سری به لینک زیر بزنید شاید پشیمون شدید!
لطفا به HDD serial changer توجه کنید:
http://barnamenevis.org/forum/showthread.php?t=70649&page=2

omidreza812

جمعه 22 تیر 1386, 15:01 عصر

کد زیر رو تست کن ...

Imports System.Management

Dim physicalMedia As New Management.ManagementClass("Win32_PhysicalMedia")

For Each physicalMedium As Management.ManagementObject In physicalMedia.GetInstances()
MessageBox.Show("Serial Number: " & CStr(physicalMedium("SerialNumber")))
Next physicalMedium

سلام
این کد رو تست کردم
ولی هرجایی که management نوشته شده error میگیره.
راستی من با vb.net2003 کار میکنم. کدی که شما دادی 2005 نیست؟

ghafoori

جمعه 22 تیر 1386, 17:40 عصر

دوست عزیز از قسمت منو project->add refrence این رفرنس system.Management به پروژه اضافه کن