تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
حماية السورس كود
#1
اخوتي الأعزاء كيف يمكن أن أحمي السورس كود وهل يمكن تشغيله لفترة محدودة وفقاً اعدد مرات تشغي أو تاريخ معين وليكن اسبوعين مثلاً ولكم مني جزيل الشكر[b][/b]
الرد
تم الشكر بواسطة:
#2
اخوتي الأعزاء برجاء الرد وشكراً
الرد
تم الشكر بواسطة:
#3
حماية البرنامج له طرق عديدة منها مثلا ان تاخذ السريال نمبر للهارد ديسك وعمل معادلة عليه
يمكن معرف كود الهارد كما يلي
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

حماية البرنامج له طرق عديدة منها مثلا ان تاخذ السريال نمبر للهارد ديسك وعمل معادلة عليه
يمكن معرف كود الهارد كما يلي
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
الرد
تم الشكر بواسطة:
#4
أشكرك سيدي على اهتمامك ولكن ManagementObjectSearcher لاتعمل في فيجوال ستوديو 2013 ويظهر رسال وجود خطأ
" Type ManagementObjectSearcher is not defined "
الرد
تم الشكر بواسطة:
#5
(14-02-15, 09:43 PM)أسامة حسين كتب : أشكرك سيدي على اهتمامك ولكن ManagementObjectSearcher لاتعمل في فيجوال ستوديو 2013 ويظهر رسال وجود خطأ
" Type ManagementObjectSearcher is not defined "

لابد من ادراج المرجع او المكتبة الخاصة Management للتعامل مع عتاد الجهاز.




ثم استدعي المكتبة

الرد
تم الشكر بواسطة: abulayth



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم