طلب المساعدة في تشفير بيانات جدول

[ابوخليل]

اهلا اخوي @Moosak

يمكن من الاصدار ، والا فالمثال لا يوجد الا فنكشن بسيط

تفضلوا غيرت قاعدة البيانات الى الاصدار 2010

المرفق في المشاركة الاخيرة

 

تم تعديل فبراير 15, 2023 بواسطه ابوخليل
المرفق في المشاركة الاخيرة

[أغيد]

استاذي ومعلمي @ابوخليل تم تجريب المرفق وكما اشرت فعلا تم تشفير بيانات الجدول  وعند العبث بمحتويات الجدول تظهر رسالة  تفيد بأنه تم التلاعب بقاعد البيانات... 

  

في 15‏/2‏/2023 at 01:09, ابوخليل said:

بعد تجربة العميل وموافقته على شراء البرنامج ترسل اليه نسخة من الواجهات مفتوحة ولا تحتوي على هذا الفورم المشفر  ولا جدول التشفير وانما تحتوي على ادوات الحماية المعروفة لعدم استخدام النسخة في اجهزة اخرى

  اود التوضيح اننا استخدم طريقة @ابو جودياستخدم الحماية مع الفترة التجريبية  بحيث اذا تم تفعيل النسخة بجهاز العميل وقام بنسخ او نقل القاعدى الى جهاز اخر .. يعاد البراناج الى الحالة التجريبية ويطلب التفعيل ..بمعني انني بحاجة الى ابقاء الفورم السابق الخاص بالمدة التجريبية ... كما اود الاشارة ان التلاعب في جدول الفترة التجريبية  قبل التشفير يكون قبل انتهاء المدة التجريبية 

تم تعديل فبراير 15, 2023 بواسطه أغيد

[أغيد]

.

تم تعديل فبراير 15, 2023 بواسطه أغيد

[ابوخليل]

استدراك 

لم آخذ بالاعتبار امكانية التلاعب بتغيير التاريخ بالامثلة السابقة

لأني كنت افكر باستخدام الانترنت لجلب التاريخ العالمي ، وغفلت عن ضبط هذه النقطة

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

اتمنى احد منكم بعد الساعة الثامنة غدا ان يتمكن من فتح النموذج 

 

[ابو جودي]

6 دقائق مضت, ابوخليل said:

استدراك 

لم آخذ بالاعتبار امكانية التلاعب بتغيير التاريخ بالامثلة السابقة

لأني كنت افكر باستخدام الانترنت لجلب التاريخ العالمي ، وغفلت عن ضبط هذه النقطة

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

اتمنى احد منكم بعد الساعة الثامنة غدا ان يتمكن من فتح النموذج 

 

استاذى الجليل و معلمى القدير و والدى الجبيب  تحية طيبة 

لم ولن استطع التجربة بسبب اننى اعمل على اصدار الاوفيس ذو النواة 64 على الرغم من أننى كنت أتمنى ذلك

ولكن عندما فكرت فى موضوع جلب التاريخ من الانترنت تراجعت للاسباب الاتية
- امكانية انقطاع الانترنت لاى سبب
-عدم وجود انترنت أصلا عند المستخدم

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

[ابوخليل]

18 دقائق مضت, ابوخليل said:

استدراك 

لم آخذ بالاعتبار امكانية التلاعب بتغيير التاريخ بالامثلة السابقة

لأني كنت افكر باستخدام الانترنت لجلب التاريخ العالمي ، وغفلت عن ضبط هذه النقطة

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

اتمنى احد منكم بعد الساعة الثامنة غدا ان يتمكن من فتح النموذج 

 

هذا هو المرفق معدل _ اعبث بتاريخ جهازك كيف شئت

2010 _ 32 بت

من دون الاستعانة بالانترنت

تشفير فترة زمنية.rar

[ابو جودي]

---

ولو اردتم أن أقوم بفتح موضوع لادراج الافكار تدريجيا و تباعا مع التطبيق لكل فكرة فى قاعدة منفصلة والشرح من البداية إلى أن ينتهى المشروع

فقط أخبرونى ولكن تحلمونى فى التأخير إن صار منى فى الرد والمتابعة لأنه ليس لوالدتى الأن من بعد رب العزة سبحانه وتعالى غيرى..

[ابوخليل]

مأجور ابا جودي .. انالك الله البر بوالدتك .. 

اخي العزيز ابا جودي ، لا بد تطلع على المثال وتقيم الحماية

انا اعتبرها حماية مؤقتة منفصلة تنتهي عند الشراء ، لعلك قرأت اعلاه شرحي للفكرة

[ابو جودي]

ملاحظة هامة اذا تم تشفير قاعدة الى Accde  من النواة الـ 32x  لن تعمل على النواة الـ 64x   للاسف 
 

[ابوخليل]

أأأأأه هذه معلومة جديدة لدي

[ابو جودي]

10 دقائق مضت, ابوخليل said:

أأأأأه هذه معلومة جديدة لدي

وانا كذلك بسبب هذا المرفق قمت بالبحث عن السبب وتوصلت الى هذه النتيجة

هذه لقطة من مقال المصدر : مايكروسوفت

لذلك
فإن accDE الخاص بـ x32 accDE و x64 خاصان جدًا بحجم النواه والبنية التي تم تجميعهما بها
ويجب أن تعمل الأجهزة المستهدفة بنفس حجم النواة لاستعمال accDE الذي تم إنشاؤه باستخدامه
ولا توجد استثناءات لهذه القاعدة

 

ولذلك
على كل مصمم ببساطة عند محاولة تشفير قاعدته الى  accDE بمجرد تجميعها
لابد من إنشاؤها مره باستخدام office (Access) x64
و إنشاؤها مره أخرى باستخدام office (Access) x32

للاسف الشديد حتى لا تحدث مشكلة عند العملاء بأختلاف أنوية الأوفيس.

[ابو عبد الرحمن اشرف]

10 ساعات مضت, ابوخليل said:

اهلا اخوي @Moosak

يمكن من الاصدار ، والا فالمثال لا يوجد الا فنكشن بسيط

تفضلوا غيرت قاعدة البيانات الى الاصدار 2010

تشفير حقل 2.rar 26.22 kB · 10 downloads

وحده وحده عليه اخي الحبيب وافني بالشرح لتلميذك المبتدأ 

[ابوخليل]

على كل حال غدا سأرفع النسخة المفتوحة

ولكن  يهمني محاولة ورأي من يهمه الأمر

جرب آخر مرفق هنا

عند تحويل قاعدة البيانات الى Accde او mde   لا يمكن الاطلاع على الاكواد

 

[ابو عبد الرحمن اشرف]

1 ساعه مضت, ابوخليل said:

على كل حال غدا سأرفع النسخة المفتوحة

ولكن  يهمني محاولة ورأي من يهمه الأمر

انا حاولت فتحها ولم افلح ممكن لاني مش فاهم فكرة التشفير لا ادري

بانتظارك اخي الحبيب في الغد 

 

[ابو عبد الرحمن اشرف]

21 ساعات مضت, ابو جودي said:

---

ولو اردتم أن أقوم بفتح موضوع لادراج الافكار تدريجيا و تباعا مع التطبيق لكل فكرة فى قاعدة منفصلة والشرح من البداية إلى أن ينتهى المشروع

فقط أخبرونى ولكن تحلمونى فى التأخير إن صار منى فى الرد والمتابعة لأنه ليس لوالدتى الأن من بعد رب العزة سبحانه وتعالى غيرى..

انا عن نفسي اتمني ذلك اخي الفاضل الكريم 

[ابو عبد الرحمن اشرف]

21 ساعات مضت, ابوخليل said:

عند تحويل قاعدة البيانات الى Accde او mde   لا يمكن الاطلاع على الاكواد

وكيف يتم تحويل قاعدة البيانات الي accde او mde اخي الحبيب

[ابو جودي]

43 دقائق مضت, ابو عبد الرحمن اشرف said:

وكيف يتم تحويل قاعدة البيانات الي accde او mde اخي الحبيب

قبل ان تفكر فى موضوع التحويل لابد من استيعاب الاتى :-
 

اذا اردت تشفير قاعدة البيانات بتحويلها من Accdb  الى Accde 
 

لابد من عمل قاعدتان امامية واخرى خلفية

طبعا قاعدة البيانات الخلفية والخاصة بالجداول لابد ان تكون غير مشفرة اى Accdb

اما الامامية ان اردت تشفيرها الى Accde لابد من عمل ذلك مرتين
1- على جهاز يحتوى على اوفيس 32 بيت 
2- على جهاز يحتوى على اوفيس 64 بيت

وتعطى للعميل مع قاعدة الجداول الخلفية القاعدتان الاماميتان والمشفرتان
الـقاعـدة الامامية ذات النواة 32x المشفرة ذات الامتداد Accde
والقاعدة الامامية ذات النواة 64x المشفرة ذات الامتداد Accde
حتى يستخدم القاعدة الامامية التى تتوافق مع نواة الاوفيس لديه
او اذا قام العميل فى احد الايام بتغيير الاوفيس بإصدار آخر ونواة مختلفة يعمل بالقاعدة الاخرى
او اذا كان العميل يملك اكثر من جهاز وقد تختلف انوية اصدارات الاوفيس من جهاز لاخر

لأن  accDE الذى تم تجميعه فى بيئة النواة 64x لن يعمل الا فى نفسة البيئه على اوفيس 64x
و الـ accDE الذى تم تجميعه فى بيئة النواة 32x لن يعمل الا فى نفسة البيئه على اوفيس 32x
 

فكما لاحظتم ان مرفق الاستاذ @ابوخليل والذى تم تجميعة فى بيئة النواة 32x لم يعمل على الاجهزة التى تحتوى على اوفيس 64x

الا اللهم انك ان اردت عمل ذلك لابد ان تقوم بتجميع الملف الخاص بقاعدة النماذج (القاعدة الامامية) على جهازين محتلفين
احدهما به اوفيس 64x والاخر به اوفيس 32x

[ابو عبد الرحمن اشرف]

31 دقائق مضت, ابو عبد الرحمن اشرف said:

وكيف يتم تحويل قاعدة البيانات الي accde او mde اخي الحبيب

علمت خطوات بسيطة في كيفية تحويل قاعدة البياتات وهي 

1-الذهاب الي محرر الاكواد ثم الضغط علي debug ثم اختيار compile ويقوم بمراجعة التعليمات البرمجية 

حدث عندي كل هذا واعطاني تلك الرسالة فما معناها 

7 دقائق مضت, ابو جودي said:

قبل ان تفكر فى موضوع التحويل لابد من استيعاب الاتى :-
 

اذا اردت تشفير قاعدة البيانات بتحويلها من Accdb  الى Accde 
 

لابد من عمل قاعدتان امامية واخرى خلفية

طبعا قاعدة البيانات الخلفية والخاصة بالجداول لابد ان تكون غير مشفرة اى Accdb

اما الامامية ان اردت تشفيرها الى Accde لابد من عمل ذلك مرتين
1- على جهاز يحتوى على اوفيس 32 بيت 
2- على جهاز يحتوى على اوفيس 64 بيت

وتعطى للعميل مع قاعدة الجداول الخلقية القاعدتان الاماميتان والمشفرتان
الـقاعـدة الامامية ذات النواة 32x المشفرة ذات الامتداد Accde
والقاعدة الامامية ذات النواة 64x المشفرة ذات الامتداد Accde
حتى يستخدم القاعدة الامامية التى تتوافق مع نواة الاوفيس لديه
او اذا قام العميل فى احد الايام بتغيير الاوفيس بإصدار آخر ونواة مختلفة يعمل بالقاعدة الاخرى
او اذا كان العميل يملك اكثر من جهاز وقد تختلف انوية اصدارات الاوفيس من جهاز لاخر

لأن  accDE الذى تم تجميعه فى بيئة النواة 64x لن يعمل الا فى نفسة البيئه على اوفيس 64x
و الـ accDE الذى تم تجميعه فى بيئة النواة 32x لن يعمل الا فى نفسة البيئه على اوفيس 32x
 

فكما لاحظتم ان مرفق الاستاذ @ابوخليل والذى تم تجميعة فى بيئة النواة 32x لم يعمل على الاجهزة التى تحتوى على اوفيس 64x

الا اللهم انك ان اردت عمل ذلك لابد ان تقوم بتجميع الملف الخاص بقاعدة الجداول على جهازين محتلفين احدهما به اوفيس 64x والاخر به اوفيس 32x

ينهااااااااار ده مواااال كبير يا استاذنا 

طيب هل من الممكن تحويل قاعدة البيانات بمديول ويتم عمل زر امر به بمجرد الضغط عليه يتم التحويل 

 

'Function accdeConvert() Dim app Dim strDBName Dim strADEName

Option Compare Database
Set app = CreateObject("Access.Application")
strDBName = CurrentProject.Path & "1.accdb"
strdeName = CurrentProject.Path & ".accde"
app.SysCmd 603, CStr(strDBName), CStr(strdeName)
Set app = Nothing
Follow
Kill strDBName
End Function
Function Follow()
FollowHyperlink strADEName
End Function

 

 

[ابوخليل]

في 15‏/2‏/2023 at 20:41, ابوخليل said:

على كل حال غدا سأرفع النسخة المفتوحة

ولكن  يهمني محاولة ورأي من يهمه الأمر

جرب آخر مرفق هنا

عند تحويل قاعدة البيانات الى Accde او mde   لا يمكن الاطلاع على الاكواد

 

النسخة هنا في موضوع وعنوان جديد

[أغيد]

في 15‏/2‏/2023 at 20:30, ابو جودي said:

ولو اردتم أن أقوم بفتح موضوع لادراج الافكار تدريجيا و تباعا مع التطبيق لكل فكرة فى قاعدة منفصلة والشرح من البداية إلى أن ينتهى المشروع

فقط أخبرونى ولكن تحلمونى فى التأخير إن صار منى فى الرد والمتابعة لأنه ليس لوالدتى الأن من بعد رب العزة سبحانه وتعالى غيرى..

  استاذي ومعلمي @ابو جودي   اسئل الله ان يحفظ لك والدتك ويرزقك برها وطاعتها  ويرحم والدك ويسكنه جنة الفردوس مع النبين والصدقين والشهداء  ..  وان يبارك لك في وقتك وعلمك وان يبلغك ما تتمناه وترجوا في الدينا والأخرة...

[ابو جودي]

21 ساعات مضت, أغيد said:

@ابو جودي   اسئل الله ان يحفظ لك والدتك ويرزقك برها وطاعتها  ويرحم والدك ويسكنه جنة الفردوس مع النبين والصدقين والشهداء  ..  وان يبارك لك في وقتك وعلمك وان يبلغك ما تتمناه وترجوا في الدينا والأخرة...

اسال الله تعالى ان يرزقنى واياكم وكل المسلمين فضل دعائكم اخى الحبيب اللهم امين 🤲

لان الموضوع لم يكن ذو اهمية قصوى بالنسبة لى ليس هناك افكار او قاعدة عامة ولكن الان ارتب افكارى واضع النقاط العريضة للوصول للمطلوب للحصول على افضل نتيجة من وجهة نظرى المتواضعة

بامر الله تعالى ابشر بالخيـــــر 

[ابو جودي]

في 18‏/2‏/2023 at 18:19, أغيد said:

@ابو جودي   

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

بفضل الله تعالى بدأت السلسلة... رجاء تابع واسأل فيما تريد فى حالة تعذر الفهم او التطبيق