Foksh

مثال على تقديم التاريخ والعودة الى التاريخ الصحيح

من التجارب التي قمت بها على الفكرة ، بخلاف التلاعب بقيمة حقول الجدول usystblEnDc . تقديم التاريخ يوم ، فانتهت الفترة التجريبية كما في الصورة :- وعند إعادة التاريخ الصحيح ، تم أعادة العمل على البرنامج دون أن يتأثر بحيث يفقد البرنامج حق استمرار العمل عليه .

كفكرة .. الاعتماد على حقل من نوع Yes/No بحيث يتم فحص قيمة هذا الحقل فقط . بمعنى اذا كانت قيمة الحقل = True فيتم السماح لتسجيل الدخول بدون قيود. والعكس احسب الفرق بين تاريخ اليوم و قيمة الحقل الذي اقترحته كقيمة تاريخ اول تشغيل . فإذا كان الفرق أصغر او يساوي 30 يوم على سبيل المثال (كمدة للنسخة التجريبية ) ، فاسمح بالدخول . والعكس أيضاً بحيث يتم عرض رسالة انتهت الفترة التجريبية.... إلخ. وأقترح أن يكون هذا الجدول في القاعدة الخلفية ، بحيث نمنع التلاعب بقيم الجدول وبأي اسلوب ( بما أن قاعدة بيانات الجداول محمية بكلمة مرور ) . فهنا عند الاشتراك ، لا داعي لفحص التاريخ ، فقط اجعل الحقل True 😅 .

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

هنا الأمر أيسر مما تتصور باعتقادي .. فمثلاً ، كان تطبيقي لهذه الفكرة بحيث كود واحد يقوم بمهمتين من خلال تمييز قيمة واحدة بين كود التفعيل وكود التجديد أو حتى لو تعددت الفروقات . فمثلاً ، انظر للتوضيح التالي في هذا الفيديو ، والذي سأعرض فيه التفعيل مع التمديد لـ 5 أنواع اشتراك :- طبعاً هذه النسخة الأولى للتفعيل بدون الانترنت .

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

شكراً لك على مشاركتنا تجربتك 💐

تمام .. سأجربه حال وصولي الى البيت . لأن النسخة التي ارفقت صورتها لجهازي في البيت

الأفضل في هذه الحالة ولضمان عدم تبعثر نسخة مولد أكواد التفعيل ، أن تكون جميعها في نموذج واحد بحيث يتم تمرير مفتاح التشفير وتوليد كود التفعيل حسب مفتاح التشفير ، وهذا مثال للفكرة :- حيث في الجزء 1 :- يتم اختيار اسم المشروع فقط . في الجزء 2 :- اختيار مدة التفعيل . في الجزء 3 :- بصمة أو معرف العميل . في الجزء 4 :- رمز التفعيل الخاص بالبرنامج وبرمز العميل . * طبعاً هذا على افتراض أن اسلوب التشفير ثابت عند المبرمج ، ولكن كلمة أو مفتاح التشفير في المختلف .

النسخة 64 وعند تعديل قيمة الجداول ، تظهر الرسالة

ما لقيت يافطة ممنوع مؤكد لا شك في أن الكثير من الحمايات بالنسخة الغير مفعلة لا تعتمد على الوقت ، فتعتبره غير موجود بغض النظر عن وقت تشغيل البرنامج .

النتيجة عندما تم فتح النموذج لأول مرة ، كان التاريخ 10-12-2025 وبعد النقر على الزر ، تحدث الليبل إلى تاريخ اليوم كما في الصورة :-

بعد الاطلاع على الملف المرفق المفتوح ، اعتقد أن اعتماد التاريخ والوقت كقيمة نصية هو ما يسبب هذه المشكلة .. فعند تعديل الدالة في المديول بهذا الشكل للتجربة .. Public Function vNow() As Date Dim currentTime As Date, currentdate As Date currentTime = Time() currentdate = Date vNow = currentdate + TimeValue(Format(currentTime, "hh:nn:ss")) End Function كانت النتيجة في النموذج :- السبب هو أن هذا الناتج سيكون عبارة عن نص كقيمة = 12/01/2025 14:33:20 اقصد انه ناتج عن الجزء التالي :- i = Format(currentTime, "HH:mm:ss") ii = Format(currentdate, "dd/mm/yyyy") vNow = ii & " " & i