[Hazem1]

بسم الله الرحمن الرحيم

إخواني الكِرام وجدت مُشاركة رائعة للأخ العزيز عبد العزيز البسكري حفظه الله، لجلب معلومات الجهاز

https://vb4arb.com/vb/showthread.php?tid...لهارد


وبالاستعلام وجدت أن رقم الهارد الخاص بي هو :  WD-WCC2EUH22461

كيف يُمكن استخدام كود بحيث لو كان البرنامج على الجهاز الذي رقم الهارد الخاص به هو  WD-WCC2EUH22461 يعمل، وإن كان الرقم مُختلف لا يتم تشغيل البرنامج، وجزاكم الله خيراً.

[عبد العزيز البسكري]

السلام عليكم و رحمة الله و بركاته

بالملف المرفق تم إستعمال فحص البروسيسور و الهارد ديسك .. لكن أنت قم بعمليات حسابية للتمويه و التّشويش خاصة فقط بك عليهما أو على السيريال أو ما شابة بالأمثلة التي بالملف .. قم بكتابة رقم الهارد ديسك أو الرقم الذي ستختاره داخل الشّرط .. أو يمكن الإبتكار كأن تحتفظ به بال SETTING .. الأمر يعود لك أخي الكريم " حازم "

تحياتي

[Hazem1]

السلام عليكم و رحمة الله و بركاته

بالملف المرفق تم إستعمال فحص البروسيسور و الهارد ديسك .. لكن أنت قم بعمليات حسابية للتمويه و التّشويش خاصة فقط بك عليهما أو على السيريال أو ما شابة بالأمثلة التي بالملف .. قم بكتابة رقم الهارد ديسك أو الرقم الذي ستختاره داخل الشّرط .. أو يمكن الإبتكار كأن تحتفظ به بال SETTING .. الأمر يعود لك أخي الكريم " حازم "

تحياتي

الله يحفظك أخي الكريم عبدالعزيز ما قصرت في شرحك، بصراحة نتيجة أنني أستخدم إصدار 2010 فلم يفتح معي لكن جزاك الله خيراً على نقلك لصورة الكود فقمت بكتابته، أول إشكالية عندي هي أنه رغم أن الكود صحيح كما في الصورة لكن ظل الصندوق النصي فارغ ولم يجلب رقم الهارد، فما المُشكلة برأي حضرتك ؟

[عبد العزيز البسكري]

و الله أخي حازم .. لست أدري ما هي المشكلة بالضبط لأنّه عندي يعمل عادي

تحياتي

[Hazem1]

و الله أخي حازم .. لست أدري ما هي المشكلة بالضبط لأنّه عندي يعمل عادي

تحياتي

أبشرك يا أخي الغالي عبد العزيز ، أصبح البرنامج يعمل، جزاك الله خيراً وحفظ لك ولدك ورزقك الفردوس الأعلى

[XBOOBX]

و الله أخي حازم .. لست أدري ما هي المشكلة بالضبط لأنّه عندي يعمل عادي

تحياتي

هل يمكنني ان اسئل سؤال من رخصة الاخ صاحب الموضوع

هل هذا الكود يقوم بحماية البرنامج من العمل على غير جهاز 

وان كان يعمل على الحماية وذا جاء شخص بتغيير عمل الحماية ووضع سيريال مفتوح او الغاء السيريال 

كيف حماية البرنامج لتجنب  هاذي الطريقة 

من كسر البرنامج 

لاني انا لدي برامج معروضة للبيع 

واتمنا اجد حماية البرامج من الكسر والعمل على غير جهاز

ممكن رد اخي عبد العزيز البسكري

[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته

بعيدا عن كلام لا حماية مطلقة .. و كل البرامج يسهل كسرها .. إلخ

أخي الكريم .. بالنّسبة لهذا الموضوع أظن أن كتابة ( رقم أو سيريال ) داخل الأكواد على الأقل أفضل من كتابته بملف خارج المشروع .. و بكل واقعيّة ليست لي أي معلومات أو دراية واسعة بهذه المواضيع .. ربّما أنت على إطّلاع أحسن و أفضل منّي ..

فقط من باب المطالعة .. إستنتجت أن الكثير من الأساتذة يفضّلون و يلجؤون إلى الحماية بواسطة قاعدة البيانات .. يتم تسجيل معلومات العميل و رقم النسخة و كود التّفعيل داخل قاعدة البيانات و يتم الفحص و المقارنة من خلالها ..

أنظر هذا المثال بالمرفقات .. للأخ الكريم .. إلهي يذكره بكل الخير إن شاء الله .. إسمه " RAMILOVE " ..

و الطريقة الثانية ..

تحديد عدد الصفوف بقاعدة البيانات مثلا إذا وصل عدد السجلات إلى 10 .. يتم الخروج من البرنامج .. و تزرعه بالفورم لود بكل شاشات الإدخال التي تراها أنت لها أهميّة ..

كود :

   Dim dt As New DataTable
       Dim da As New SqlDataAdapter("SELECT COUNT(CANDIDATE_IDD) FROM CANDIDATE", Conn_2018)
       da.Fill(dt)
       TextBox1.Text = dt.Rows(0)(0)
       If dt.Rows(0)(0) >= 10 Then
           MessageBox.Show("عفواً....انتهت صلاحية البرنامج يجب عليك شراء النسخة الكاملة", "تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.RtlReading)
           Application.ExitThread()
       End If

الطريقة الثالثة .. قرأتها منذ ايّام بهذا المنتدى الرّائع .. و هي التسطيب فقط من خلال الفلاشة .. بحيث يجب عمل إرتباط بين سيريال الفلاشة و رقم الهارد أو غيره من الجهاز العميل

الطريقة الرابعة .. تقوم بتعطيل الوظائف الرئيسية من البرنامج و عند الشراء يتم إظافتهم بنوع من الحماية المذكورة سالفا

و قد يفيدك الخبراء بهذا المجال بارك اله فيهم مقدّمًا

تحياتي

[XBOOBX]

السّلام عليكم و رحمة الله و بركاته

بعيدا عن كلام لا حماية مطلقة .. و كل البرامج يسهل كسرها .. إلخ

أخي الكريم .. بالنّسبة لهذا الموضوع أظن أن كتابة ( رقم أو سيريال ) داخل الأكواد على الأقل أفضل من كتابته بملف خارج المشروع .. و بكل واقعيّة ليست لي أي معلومات أو دراية واسعة بهذه المواضيع .. ربّما أنت على إطّلاع أحسن و أفضل منّي ..

فقط من باب المطالعة .. إستنتجت أن الكثير من الأساتذة يفضّلون و يلجؤون إلى الحماية بواسطة قاعدة البيانات .. يتم تسجيل معلومات العميل و رقم النسخة و كود التّفعيل داخل قاعدة البيانات و يتم الفحص و المقارنة من خلالها ..

أنظر هذا المثال بالمرفقات .. للأخ الكريم .. إلهي يذكره بكل الخير إن شاء الله .. إسمه " RAMILOVE " ..

و الطريقة الثانية ..

تحديد عدد الصفوف بقاعدة البيانات مثلا إذا وصل عدد السجلات إلى 10 .. يتم الخروج من البرنامج .. و تزرعه بالفورم لود بكل شاشات الإدخال التي تراها أنت لها أهميّة ..

كود :

   Dim dt As New DataTable
       Dim da As New SqlDataAdapter("SELECT COUNT(CANDIDATE_IDD) FROM CANDIDATE", Conn_2018)
       da.Fill(dt)
       TextBox1.Text = dt.Rows(0)(0)
       If dt.Rows(0)(0) >= 10 Then
           MessageBox.Show("عفواً....انتهت صلاحية البرنامج يجب عليك شراء النسخة الكاملة", "تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.RtlReading)
           Application.ExitThread()
       End If

الطريقة الثالثة .. قرأتها منذ ايّام بهذا المنتدى الرّائع .. و هي التسطيب فقط من خلال الفلاشة .. بحيث يجب عمل إرتباط بين سيريال الفلاشة و رقم الهارد أو غيره من الجهاز العميل

الطريقة الرابعة .. تقوم بتعطيل الوظائف الرئيسية من البرنامج و عند الشراء يتم إظافتهم بنوع من الحماية المذكورة سالفا

و قد يفيدك الخبراء بهذا المجال بارك اله فيهم مقدّمًا

تحياتي

اشكرك اخي وجزاك الله الف خير وزادك من العلم ان شاء الله

[Mohamed Magdy]

عبد العزيز البسكري
انا اريد عمل نفس الفكرة ولاكن اربط كل شخص بى ip الجهاز نفسوة فى البرنامج هل اسطتيع عمل ذالك ارجو افادتى فى هاذا الموضوع وشكر

[عبد العزيز البسكري]

أخي محمد أستعمل الهاتف فقط فلا يمكنني وضع صور توضيحية.. لدي جهازين بالبيت و كل ما اردت فتح مشروع يظهر لي خطا بالاتصال بقاعد البيانات..واجد السبب في تغيير عنوان ال ip .احيانا 192.168.1.2 و احيانا 192.168.1.3 و احيانا 192.168.1.4 .....و لذلك لا يمكن الاعتماد عليه اطلاقا فهو غير ثابت..اعتقد استعمال عنوان ال mac adredss افضل و الله اعلم
تحياتي