كيف يمكن الحصول على السيريال نامبر(serial number) للقرص الصلب (hard disk)
وقد عرفت أن هن
وقد حاولت الحصول على الدالة Interop.HWINFOCOMLib.dll فى ال system32 g لكنى لم أجدها
PHP كود :
Add Reference to the System.Management Assembly.
For this you have to do:
1. Go to Project Tab
2. Click on Add References
3. Click on .NET tab
4. Select System.Management and press ok
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim HDD_Serial As String
Dim hdd As New ManagementObjectSearcher("select * from Win32_DiskDrive")
For Each hd In hdd.Get
HDD_Serial = hd("SerialNumber")
MsgBox(HDD_Serial)
Next
End Sub
شكرا يا أخى لقد جربت الكود لكن حصلت على خطأ فى ال error list وهو
type 'managementobjectsearcher' is not defined
فى السطر الثالث من الكود
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim HDD_Serial As String
Dim hdd As New ManagementObjectSearcher("select * from Win32_DiskDrive")
For Each hd In hdd.Get
HDD_Serial = hd("SerialNumber")
MsgBox(HDD_Serial)
Next
End Sub
شكرا جزيلا يا أخى لقد عمل الكود على visual basic 2008 بعد إضافة السطر Imports System.Management
,ولكنى أطلب منك طريقة الكود ل visual basic 6 لأن البرنامج الذى أعمل فيه الآن أعمله بواسطة visual basic 6 إذا أمكن وشكرا
جزاكم الله خيرا
قمت بتشغيل الكود ل visual basic 6 ولكن لم تنجح عملية تسجيل ملف ال dll فى ال system32 وتظهر رسالة من command prompt.exe
فهل من مساعدة؟
(27-06-17, 03:43 PM)مبرمج مصرى كتب : [ -> ]جزاكم الله خيرا
قمت بتشغيل الكود ل visual basic 6 ولكن لم تنجح عملية تسجيل ملف ال dll فى ال system32 وتظهر رسالة من command prompt.exe
فهل من مساعدة؟
اذا نظامك اكس بي نفذ الكومند هذا
regsvr32 D:\WINDOWS\system32\HDDSN.dll
بعد ان تنقل الملف الى المسار المحدد
طبعا غير المسار هااااااااااااااه

الأخ سعود
لقد نفذت ما قلته و اختفى الerror يعنى تم التسجيل
لكن لم يظهر ال serial number
أرجو الإفادة
(27-06-17, 04:53 PM)مبرمج مصرى كتب : [ -> ]الأخ سعود
لقد نفذت ما قلته و اختفى الerror يعنى تم التسجيل
لكن لم يظهر ال serial number
أرجو الإفادة
هذا اللي مااقدر اعرفه لانه عندي ظهر ...
اتمنى احد يدلنا شلون نسوي ملف dll بالدوت نت ويتم تسجيله باكس بي
ممتاز وجدت الحل
https://support.microsoft.com/en-sg/help...y-from-vis
يافرحة ما تمت

الشرح ينجح حين يكون كل الاصدارين بنفس النظام...
(27-06-17, 04:53 PM)مبرمج مصرى كتب : [ -> ]الأخ سعود
لقد نفذت ما قلته و اختفى الerror يعنى تم التسجيل
لكن لم يظهر ال serial number
أرجو الإفادة
السلام عليكم
شغل البرنامج الفجوال بيسك كمسؤول
ايضا ملف exe بعد الترجمة يجب ان يشتغل كمسؤول