Foksh

هنا الأمر أيسر مما تتصور باعتقادي .. فمثلاً ، كان تطبيقي لهذه الفكرة بحيث كود واحد يقوم بمهمتين من خلال تمييز قيمة واحدة بين كود التفعيل وكود التجديد أو حتى لو تعددت الفروقات . فمثلاً ، انظر للتوضيح التالي في هذا الفيديو ، والذي سأعرض فيه التفعيل مع التمديد لـ 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

اعتذر عن التأخر بالرد ، ولكن بسبب المباراة انشغلت مع بعض الزبائن في المحل على العموم ، أخشى أن اعطي نفسي كرت أصفر من التجارب حالياً ، لأن النتيجة غير سارة 😅 .. انظر

عندي نسختين أوفيس على كمبيوتري ، واحدة 2010 = 32 والثانية 2019 = 64

مستحي أعلّق 😇

لا اعلم صدقاً ..