برجاء منكم وضع سورس كود لاستخراج سيريال نمبر للمعالج
ثم سورس كود عمل سيريال نمبركود التفعيل للعميل ارجوكم ضروري لأنني تعبت كثيرا من كثرة البحث في النت
(24-08-22, 12:37 AM)حسام سلام كتب : [ -> ]برجاء منكم وضع سورس كود لاستخراج سيريال نمبر للمعالج
ثم سورس كود عمل سيريال نمبركود التفعيل للعميل ارجوكم ضروري لأنني تعبت كثيرا من كثرة البحث في النت
تفضل هذا مثال لجلب سيريال نمبر المعالج
كود :
Imports System.Management
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'Retrieve CPU Id
Dim searcher As ManagementObjectSearcher = New ManagementObjectSearcher("select * from Win32_Processor")
For Each oReturn As ManagementObject In searcher.Get()
TextBox1.Text = ("CPU ID" & Constants.vbTab & ": " & oReturn("ProcessorId").ToString)
Next oReturn
End Sub
End Class
ملاحظة يجب عليك ادراج مكتبة ال System Management
بالطريقة التالية
من شريط الادوات في الاعلى اختر project ثم Add Refference
ثم اخثر Framwork وبعدها انزل الا غاية System Management علم عليها و اخيرا موافق
موفق ان شاء الله
بارك الله فيك وجزاك جنة الفردوس