منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
حماية البرنامج - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : حماية البرنامج (/showthread.php?tid=28811)



حماية البرنامج - احمد خطاب - 02-03-19

السلام عليكم 
الحمد لله نجحت فى ربط البرنامج بالسريال نمبر للجهاز 
ممكن اعرفالخطوة التالية ايه من حيث كيفية الا يعمل على جهاز اخر


RE: حماية البرنامج - محمد مسافر - 02-03-19

هناك طرق كثيره واشهرها مثل ماهو موضح في الاسفل :


مالذي تقصده بالحمايه عن طريق السريال نمبر للجهاز هل هو احد التسميات الموجوده في الاسفل

عن طريق الماك ادريس  mac address
عن طريق رقم الهارديسك ..
عن طريق رقم المعالج ..
عن طريق الريجستري ..
وربما هناك طرق أخرى ..


RE: حماية البرنامج - محمد مسافر - 03-03-19

كود :
مهم جداً اضافة Add  Reference    قبل أي شي ويعدين ممكن ننسخ الكود
الكود الموضح في الاسفل لحمايه البرنامج عن طريق المعالج بحيث تدخل رقم المعالج الذي تريد ان يعمل فيه البرنامج فقط
واي جهاز اخر لن يعمل

Imports System.Threading
Imports System.Management
Public Class Form1

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       Dim MOS_PR As New ManagementObjectSearcher("SELECT * FROM Win32_Processor")
       Dim mo_PR As ManagementObject
       For Each mo_PR In MOS_PR.Get()
           TextBox1.Text = mo_PR("ProcessorId").ToString()

       Next

       If TextBox1.Text <> "رقم المعالج الذي تريد ان يعمل فيه البرنامج فقط" Then
           MsgBox("غير مصرح لك باستخدام البرنامج علي هذه الماكينة", MsgBoxStyle.Critical, "تحذير")
           Me.Dispose()
       End If
   End Sub



RE: حماية البرنامج - aftfm - 03-03-19

إقتباس :مهم جداً اضافة Add  Reference    قبل أي شي ويعدين ممكن ننسخ الكود

نعمل Add Reference
لاي شي

نعم وضحت لـ System.Management