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

[أكسس وبس]

اخوانى تحياتي لكم

اخوانى اصبت بصدمة كبيرة اخذت البرنامج امس وروحت عشان اشغله على جهاز الورشة فوجئت باوفيش 2013 نزلت البرنامج من الفلاشة شغلته بدأت افتح اول نموذج من شريط القوائم بيانات المؤسسة جيت اخرج من النموذج لم يعمل مفتاح خروج قفلت من علامة X  العادية روحت على نموذج تكويد الاصناف بدأت اكتب اول صنف اضغط على مفتاح جديد لم يعمل اضغط على خروج لم يعمل خرجت كالعادة من علامة X . عملت محاولت حذفت اوفيس 2013 ونزلت اوفيس 2007 لم يعمل البرنامج ايضا دخلت على التصميم والفيجوال والله والله تخيلوا اجد جميع الاكواد محذوفة وكأن هناك ايد خفية قامت بحذفها .

مثال لامر خروج فارغ الاقى كنت الاقى جميع الاكواد هكذا

Private Sub أمر47_Click()

End Sub

وجدت ايضا النماذج كلها مختلفة تمام

اصبت بصدمة كبيرة رغم انني قمت بتجربة البرنامج طوال يوم الجمعة

اخوانى بحق الله اعمل ايه ومن اين المشكلة اريد المساعدة

 

[Amr Ashraf]

اقتراح شخصى هات نسخة شغالة من البرنامج وحولها accde استحالة يحصل تغيير فى الاكواد وهتشتغل وهتبقى تمام بالتوفيق

[أكسس وبس]

وجدت ايضا التقارير بعد عملت لها بالضبط وجدت تظهر رسالة العرض اكبر من الصفحة ثم تظهر رسالة للفيجوال ان اختار رقم الفاتورة (1 ) لاني ادخلت البيانات فى الجدول لاجد اين الخطأ كنت ادخل على تصميم الفاتورة ثم اعمل لها معاينة ثم اطبع تظهر العرض اكبر من الصفحة ويطبع الصفحة فى صفحتين

حضترك تقصد احفظها عادي على امتداد اوفيس 2007 هى كانت كده وكان الاوفيس 2013 قولت الحل اغير الاوفيس الى 2007 فتحت البرنامج لقيت المشاكل دى كلها هل هى من اوفيس 2013 ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[sandanet]

اخي الكريم من المستحسن العمل على اوفيس 2003 او 2007 او 2010 لانها الاكثر شيوعاً بين المستخدمين اما الاصدارات الاعلى ففيها بعض الاختلاف في الدوال البرمجية والمكتبات لذلك ابتعد عنها .. ثانيا يجب تحويل البرنامج الى الصيغة التنفيذية اي mde في اكسس 2003 او accde في 2007 و 2010 وذلك لكي يتم الحفاظ على هيكلية البرنامج ومنع التلاعب بها مع الاخذ باعتبار ابقاء النسخة مفتوحة المصدر (accdb) في جهازك الشخصي للتطوير عليها مستقبلاً

 

تحياتي

[أكسس وبس]

تسلم اخى الكريم وجزاكم الله خيرا

طيب ممكن كود منع اى رسائل الفيجوال الخطأ مثل عندما اقوم بفتح تقرير او نموزج واتراجع عن الفتح تظهر رسالة خطأ لانى لم افتحه 

[sandanet]

استخدم هذا الكود 

on error resume next

يتم استخدامه هكذا

Private Sub Command0_Click()
On Error Resume Next

 

[أكسس وبس]

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

[sandanet]

قم بوضعه في اي حدث سواء كان حدث عند فتح نموذج او اي حدث اخر تريد

[أكسس وبس]

اشكرك يا اخى وجزاك الله خيرا

[ابو جودي]

في 9/24/2017 at 18:50, أكسس وبس said:

اخوانى تحياتي لكم

اخوانى اصبت بصدمة كبيرة اخذت البرنامج امس وروحت عشان اشغله على جهاز الورشة فوجئت باوفيش 2013 نزلت البرنامج من الفلاشة شغلته بدأت افتح اول نموذج من شريط القوائم بيانات المؤسسة جيت اخرج من النموذج لم يعمل مفتاح خروج قفلت من علامة X  العادية روحت على نموذج تكويد الاصناف بدأت اكتب اول صنف اضغط على مفتاح جديد لم يعمل اضغط على خروج لم يعمل خرجت كالعادة من علامة X . عملت محاولت حذفت اوفيس 2013 ونزلت اوفيس 2007 لم يعمل البرنامج ايضا دخلت على التصميم والفيجوال والله والله تخيلوا اجد جميع الاكواد محذوفة وكأن هناك ايد خفية قامت بحذفها .

مثال لامر خروج فارغ الاقى كنت الاقى جميع الاكواد هكذا

Private Sub أمر47_Click()

End Sub

وجدت ايضا النماذج كلها مختلفة تمام

اصبت بصدمة كبيرة رغم انني قمت بتجربة البرنامج طوال يوم الجمعة

اخوانى بحق الله اعمل ايه ومن اين المشكلة اريد المساعدة

 

اقفل الاكواد بباسورد

بهذه الطريقة لا يحدث ذلم ان شاء الله مرة اخرى

وهذه المشكلة حدثت معى ذات مرة وفى حالتى كانت لسبب

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

 

كلمة المرور على محرر الاكواد تحفظها من الحذف