تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
منع النسخ
#21
للأسف عند عمل الrun أظهر رسالة اعتراض قبل بدء التشغيل
يعترض فيها على عدم وجود الclsMutex.cls PATH
فلما ضغطت على OK(أى استمر فى التحميل)
اعترض البرنامج على الجملة
PHP كود :
Dim mut As clsMutex 
فلما حذفتها اعترض على الجملة
PHP كود :
Set mut = New clsMutex 

ليتك توضح لى بالتفصيل خطوات عملك لهذا البرنامج
مثلآ:-
[SIZE=2]1-افتح PROJECT جديد
2-اضغط على PROJECT ثم COMPONENT
3-علم فيها على .......
4-
5-

[/SIZE] ولك مليون شكر
الرد }}}
تم الشكر بواسطة:
#22
اتضح سبب هذا الخطأ عند عمل الrun
وجدت بالفولدر المرفق منك Modules يبدو أنك نسيت وضعه فى البرنامج
فوضعته فاشتغل البرنامج دون أى اعتراض والحمد لله

ولكن للأسف اشتغل كالبرنامج السابق تمامآ
أى تم تشغيله عدد محدد من المرات(4 مرات تقريبآ) وبعدها اعترض"لايمكن تشغيل أكثر من نسخة"
أنا أريد تعديله هذه المرة بحيث يمكن تشغيله دائمآ(عدد غيرمنتهى من المرات) ولكنلايمكن نسخه الى أى مكان آخر

أرجو أيضآ أن توضح لى بالتفصيل خطوات عملك لهذا البرنامج

ولك مليون شكر
الرد }}}
تم الشكر بواسطة:
#23
اخي خليك معي حبه حبه

الكود الأخير الذي وضعتة لك وضيفته

منع تشغيل البرنامج اكثر من نسخه وهوه شغال ما فيه اي مشاكل

يعني ما تقدر تفتح نسختين من البرنامج معا

هاذه وضيقته فقط ..........


وانت تقول ( ولكن لا يمكن نسخه الى أى مكان آخر)


هل تقصد منع المستخدم من نسخ البرنامج من مكان الا اخر

ام ماذا

تحياتي


لا تأسفن على غدر الزمان لطالما...رقصت على جثث الأسود كلاب
لا تحسبن برقصها تعلو على أسيادها...تبقى الأسود أسودا والكلاب كلاب
تبقى الأسود مخيفة في أسرها...حتى وإن نبحت عليها كلاب
تموت الأسد في الغابات جوعا... ولحم الضأن تأكله الكــلاب
وعبد قد ينام على حريـــر...وذو نسب مفارشه التــراب
الرد }}}
تم الشكر بواسطة:
#24
إقتباس :هل تقصد منع المستخدم من نسخ البرنامج من مكان الا اخر

ام ماذا
أعنى منع المستخدم من نسخ البرنامج من الفولدر الموجود به الى أى فولدر اخر
و منع المستخدم من نسخ البرنامج من cd الموجود به الى أى cd اخر
بحيث لا يستطيع استخدامه الا شخص واحد فقط (من أعطيته البرنامج بنفسى)
الرد }}}
تم الشكر بواسطة:
#25
انا اذكر اني عملتها بملف ini بعد درس من موقع اجنبي وملف مضروب بحيث كلما يفتح المجلد ينهي explorer بس ناسي وين حطيته لكن ان بحثت في جوجل عن
close explorer when open folder قد تجد طريقة
لكن سيضل بامكنهم النسخ عبر برامج النسح مثل نيرو وكولون سيدي وغيرها
الرد }}}
تم الشكر بواسطة:
#26
اسلام الكبابى كتب :أعنى منع المستخدم من نسخ البرنامج من الفولدر الموجود به الى أى فولدر اخر
و منع المستخدم من نسخ البرنامج من cd الموجود به الى أى cd اخر
بحيث لا يستطيع استخدامه الا شخص واحد فقط (من أعطيته البرنامج بنفسى)

اخي ما تطلب شبه معجزه لان مستحيل تمنع نسخ البرنامج...................


ولاكن بستطاعتك ان تمنع تشغيل البرنامج

الا للذي اعطيته اياه والطريقه هيه ان تحصل على رقم القرص الصلب

وتعمل داله if لتقارن بين رقم القرص وبين الرقم المتخزن في المتغير

فأن تطابقو فيشتغل البرنامج

وإلا فلن يشتغل

هاذه الطريقه اقوى من منع النسخ وكما تفضل الاخ oneyemenweb2

ان سيضل بامكانهم نسخ البرنامج عبر برامج النسخ


لا تأسفن على غدر الزمان لطالما...رقصت على جثث الأسود كلاب
لا تحسبن برقصها تعلو على أسيادها...تبقى الأسود أسودا والكلاب كلاب
تبقى الأسود مخيفة في أسرها...حتى وإن نبحت عليها كلاب
تموت الأسد في الغابات جوعا... ولحم الضأن تأكله الكــلاب
وعبد قد ينام على حريـــر...وذو نسب مفارشه التــراب
الرد }}}
تم الشكر بواسطة:
#27
وهاذا المثال على رقم القرص الصلب

ويعمل على اداتين التكست

وان اردت تغييرهما الى متغيرات إمسح الكود الذي داخل حدث الفروم وضع هاذا

#############################################




Private Sub Form_Load()
Dim x As String
Dim xx As String

x = "5JVY0H98"
xx = New HDSLN
If xx = x Then

Else

MsgBox "انت غير مخول بستخدام هاذا البرنامج الرجاء مراسلة المصنع", , "نإسف"
End

End If
End Sub







تفضل


الملفات المرفقة
.rar   مثال.rar (الحجم : 3.83 ك ب / التحميلات : 39)


لا تأسفن على غدر الزمان لطالما...رقصت على جثث الأسود كلاب
لا تحسبن برقصها تعلو على أسيادها...تبقى الأسود أسودا والكلاب كلاب
تبقى الأسود مخيفة في أسرها...حتى وإن نبحت عليها كلاب
تموت الأسد في الغابات جوعا... ولحم الضأن تأكله الكــلاب
وعبد قد ينام على حريـــر...وذو نسب مفارشه التــراب
الرد }}}
تم الشكر بواسطة:
#28

جزاك الله خيرآ

ولك ألف شكر
إقتباس :ولاكن بستطاعتك ان تمنع تشغيل البرنامج

الا للذي اعطيته اياه والطريقه هيه ان تحصل على رقم القرص الصلب

ولكن أرجو أن توضح لى كيف أحصل على رقم القرص الصلب
[size=3] أو رقم الفلاشة
لأنى بحثت كثيرآ فى كل ماهو مكتوب على أكثر من cd فلم أجد الا نفس الكلام فيهم جميعآ

[/size]
ولك مليون شكر
الرد }}}
تم الشكر بواسطة:
#29
اخي المرفق الذي في الاعلى لاضهار رقم القرص الصلب


لا تأسفن على غدر الزمان لطالما...رقصت على جثث الأسود كلاب
لا تحسبن برقصها تعلو على أسيادها...تبقى الأسود أسودا والكلاب كلاب
تبقى الأسود مخيفة في أسرها...حتى وإن نبحت عليها كلاب
تموت الأسد في الغابات جوعا... ولحم الضأن تأكله الكــلاب
وعبد قد ينام على حريـــر...وذو نسب مفارشه التــراب
الرد }}}
تم الشكر بواسطة:
#30
ما فهمته من شرحك أنه يجب على أن ان أحصل على رقم الCD الذى سأضع عليه برنامجى لأعطيه لشخص ما
حتى يستطيع تشغيله من هذا القرص ولايستطيع أحد تشغيله اذا نسخه على قرص غيره
فان وجدت هذا الرقم مثلآ 5JVY0H98 فأضع هذا الرقم فى Text2 وأكتب الكود التالى فى بداية فورم برنامجى بالاضافة الى وضع الHDSLN المرفق فى مثالك مع فورم البرنامج

PHP كود :
Private Sub Form_Load()
 
Text1 = New HDSLN
   
If Text1 Text2 Then
   
   
Else
   
   
MsgBox "انت غير مخول بستخدام هاذا البرنامج الرجاء مراسلة المصنع", , "نإسف"
  
End
 
   End 
If
End Sub 
الرد }}}
تم الشكر بواسطة:



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


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