به دست آرودن سریال هارد هر سیستمی با هر ویندوزی

[ehsan21]

با سلام
من نیاز دارم سریال هارد سیستم رو به دست بیارم. در سایت هم جستجو کردم و چند مورد رو دیدم . اما متا سفانه رو همه سیستمی و با همه ویندوزی سازگار نیستند .
روشی وجود داره که به طور قطعی بشه سریال هارد هرسیستمی با هر ویندوزی رو به دست آورد ؟

[sabi3023]

من این کد رو روی چند تا سیستم و چند تا سیستم عامل تست کردم جواب داده

[mohammad.moosaei]

سلام دادش اول باید توی Project explorer در قسمت References این رو add کنی :

System.Management

خوب حالا با این تابع می تونی سریال هر کدوم از درایوهای هارد رو برداری:


Public Function GetHDDSerialNumber(ByVal drive As String) As String
If drive = "" Or drive = vbNullString Then

drive = "C"
End If
Dim disk As New ManagementObject("Win32_LogicalDisk.DeviceID=""" + drive + ":""")
disk.Get()
Return disk("VolumeSerialNumber").ToString()
End Function


حالا فقط کافیه که اسم درایو رو تنها بهش بدی مثل C فقط همین.

[ehsan21]

من سریال خود هارد رو می خوام نه درایو ها

[sabi3023]

آخه شما نه توضیح دادین که چه زبانی رو واسه کدنویسی استفاده می کنید. اون مثال قبلی که من گذاشتم روی هر سیستمی که .NET 2 نصب باشه جواب میده.
من نمی دونم دیگه از این بهتر چی می خواین

[mahdi1373]

سلام،
این رو تست کن:
http://barnamenevis.org/forum/showpo...7&postcount=23 (http://barnamenevis.org/forum/showpost.php?p=314827&postcount=23)