علي المصري قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 بعد الانتهاء من برنامج متابعة الطلبة والعمل علية من قبل الزملاء بالمدرسة منذ أكثر من ثلاثة شهور جائني احد الزملاء بالامس وقال لي ان البرنامج لا يفتح فذهبت معه إلى الغرفة الخاصة به ووجد البرنامج يعطي الرسالة الموضحة بالصورة التالية ولم استطع معرفة السبب أو الحل فهل يوجد حل لهذه المشكلة ولو استخرج الجداول منها حتى لا نحسر البيانات . شكرا
ابو جودي قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 استاذنا الفاضل انا تعرضت لهذه المشكلة واعتقد ان السبب فى ذلك هو تغيير نظام الفرز للقاعدة وذلك كما بالصورة التالية
علي المصري قام بنشر مارس 3, 2015 الكاتب قام بنشر مارس 3, 2015 شكرا جزيلا على سرعة الرد البرنامج بعد غلق الرسالة التي تظهر يفتح الاكسس على الصفحة الرئيسة لبدء أكسيس ولا يفتح البرنامج الخاص بي
ابو جودي قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 استاذنا الجليل تلك هى الصورة للواجهة الانجليزية هذا ما توصلت اليه لحل مشكلتى التى واجهتنى ذات مره وكان تغيير الفرز بما يتناسب مع تصميم القاعدة هو ما حللت به مشكلتى بعد بحث مضنى وكنت اواجه نفس الرسالة
jjafferr قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 (معدل) وعليكم السلام اخي علي ارفع قاعدة البيانات ، وخلينا نشوف ايش ممكن نعمل علشان نسترجع البيانات (اذا كان هذا ممكن) ، واذا البيانات كانت حساسه ، ارفع البرنامج على اي موقع للرفع ، وارسل لي رساله على الخاص مع الرابط. انا افضل الطريقة الاولى ، لاعطاء المجال لكل من يريد المساعدة جعفر تم تعديل مارس 3, 2015 بواسطه jjafferr
ابو جودي قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 طيب ممكن ترفق الملف الخاص بكم يا استاذنا ولو حضرتك مش حابب يكون على العام ابعتهولى فى رساله خاصة وانا ان شاء الله احاول المساعده على قدر علمى
علي المصري قام بنشر مارس 3, 2015 الكاتب قام بنشر مارس 3, 2015 هذا هو البرنامج نرجو المساعدة Follow up V3.rar
علي المصري قام بنشر مارس 3, 2015 الكاتب قام بنشر مارس 3, 2015 اريد حل ان شاء الله حتى اتمكن من اقاذ ما يمكن انقاذه عند الزملاء لان هذه المشكلة حدثت لدى اثنان من الزملاء شكرا جزيلا
jjafferr قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 الحمدلله تم اصلاح الملف Database ، اما الآخر فما استطعت عليه سبيل رجاء تغيير صيغة البرنامج المرفق الى 7z بدلا عن zip ، حيث الظاهر ان المنتدى لا يحب صيغة 7z سؤال ، هل الملف الثاني بصيغة accdb ، او بصيغة اخرى؟ جعفر Database_fixed.zip
محمد سلامة قام بنشر مارس 3, 2015 قام بنشر مارس 3, 2015 بارك الله فيكم جميعا اخوانا الاعزاء استاذ على المصرى بالنسبة للملف الخاص بك لم استطيع فتحه او اصلاحه ولى بعض الافكار التى تفيدك مستقبلا لماذا لم تقم من الاول بتقسيم قاعدة البيانات وعمل ملف وجهات وتقارير منفصل تقوم بتصطيبه او تركيبه على الاجهزة واذا حدثت لك اي مشكلة لقدر الله فى بياناتك فلن تخسر سوى قاعدة الوجهات والتقارير فقط وبالتاكيد سوف تكون محتفظ بها تعيد تركيبه مرة اخرى وربطها مع القاعدة الرئيسية (قاعدة الجداول فقط) حاول ان تفعل هذه الطريقة فهى مفيدة لك وحتى تتفدى اخطاء المستخدمين) التى احيانا تكون غير متوقعة بالمرة بالتوفيق
علي المصري قام بنشر مارس 4, 2015 الكاتب قام بنشر مارس 4, 2015 الحمدلله تم اصلاح الملف Database ، اما الآخر فما استطعت عليه سبيل رجاء تغيير صيغة البرنامج المرفق الى 7z بدلا عن zip ، حيث الظاهر ان المنتدى لا يحب صيغة 7z سؤال ، هل الملف الثاني بصيغة accdb ، او بصيغة اخرى؟ جعفر نعم الملف بصيغة accdb هوهو البرنامج الاساسي اما database عبارة عن ملف تم تكوينة تلقائيا عند الزميل التي حدثت عنده المشكلة
ابو جودي قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 السلام عليكم ورحمة الله تعالى وبركاته استاذ على انا اسف جدا جدا جدا انا من وقت ما حضرتك رفعت المرفق وانا احاول دون جدوى للاسف كل ما حصلت عليه اسماء الفورم والتقارير ولكنها معطوبة ولم استطع فعل اى شئ للاسف وجدت فى بناء القاعدة 45 نمذوج من ضمنهم على سبيل المثال Absent AddStudents Auther She3ar وتم عمل 23 تقرير ولكن للاسف كل البيانات معطوبة والمشكلة على ما اعتقد حدثت فى البنية الداخلية للقاعدة نفسها
jjafferr قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 الملف اللي ارفقته لك فيه جداول ، وحجمه كبير ، انزله وافحصه لوسمحت. جعفر
jjafferr قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 السلام عليكم الاخ علي الاكسس 2007 في اول اصداراته ، كان يعمل Corruption لقاعدة البيانات في بعض الكمبيوترات ، وتحدث هذه الحالة اذا كنت طلبت من البرنامج: Compact on close. لهذا السبب يجب عمل التحديثات على الاكسس ، لهذا السبب ولأسباب اخرى. طريقة عمل Compact ، هو ان الاكسس يعمل قاعدة بيانات مؤقته باسم Database ، وينقل اليها جميع كائنات قاعدة البيانات التي نريد عمل Compact عليها ، وبعد اتمام العملية ، يحذف قاعدة البيانات الاصلية ويغير اسم الملف Database الى اسم قاعدة البيانات الاصلية. فربما تكون محظوظا وتكون بياناتك موجودة في الملف الذي ارفقته سابقا جعفر
علي المصري قام بنشر مارس 4, 2015 الكاتب قام بنشر مارس 4, 2015 شكرا لكم جميعا شكرا استاذ جعفر على التوضيح يعني كلامك يفيد انه لا نجعل البرنامج يعمل ضغط لقاعدة البيانات عند الغلق أفضل
jjafferr قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 أخي علي ، خلينا نمشي على النقاط التالية: 1. اذا كان عندك الاكسس 2007 في اول اصداراته (يعني بدون تحديثات ، وللأسف هذه النسخة موجودة ورأيت الكثير منها ، والكثير من الناس يأخذوها من CD او DVD غير مشروع) ، ففي هذه النسخة ، اذا كنت طلبت من البرنامج: Compact on close ، فالفرصة كبيرة بأن يعمل Corruption لقاعدة البيانات في بعض الكمبيوترات. 2. لهذا السبب يجب عمل التحديثات (Service pack او SP) على الاكسس (لجميع الاصدارات ، لهذا السبب ولأسباب اخرى) ، وهذا الموقع يحتوي على رابط لآخر تحديثات الاوفيس: http://pcsupport.about.com/od/keepingupwithupdates/a/office-service-pack.htm وهناك العديد من الاشخاص الذين للاسف الشديد لا يقومون بتحديث الـ Windows ولا الاكسس ، لهذا السبب اسمح لي اخبرك ، بأن اول تحديث للاكسس 2000 تم فيه تصليح 200 عيب وثغرة من البرنامج الاصل 3. عند حذف السجلات في الاكسس ، فان الاكسس لا يقوم بحذفها نهائيا من البرنامج ، إلا عندما تقوم بعملية Compact and Repair. مثال: قم بعمل قاعدة بيانات بجدول واحد مثلا ، وادخل فيه آلآف السجلات ، اغلق البرنامج ، لاحظ حجم الملف ، افتح البرنامج ، احذف كم هائل من السجلات ، اغلق البرنامج ، لاحظ حجم الملف ، سترى انه تقريبا نفس الحجم الاصلي ، الآن افتح البرنامج ، اعمل Compact and Repair ، واغلق البرنامج ، لاحظ حجم الملف 4. بالنسبة لي انا ، فمعظم برامجي تحتوي على FE و BE الذي يحتوي على الجداول (في البداية ، البرنامج يكون غير مقسم ، الى ان يأخذ البرنامج شكله وعمله الصحيح ، فعندها اقسمه) ، في FE ، في النموذج الرئيسي ، فاستخدم مثل الكود التالي ، والذي يعمل لي نسخة من BE في مجلد خاص للـ Backup ، كلما يغلق المستخدم برنامجه ، ويكون اسم الملف مختوما باليوم والساعة والدقيقة والثانية ، وطبعا السؤال الذي يسأله الكثيرين هو ، سيصبح لدينا الكم الهائل من هذه الملفات ، وجوابي هو: أ. حجم الهارد ديسك هذه الايام مهول ، فلا مشكلة ، ب. معظم مشاركاتي في النتدى ، اضع بين ايديكم وقائع حصلت لي في العديد من برامجي ، وهذه الطريقة انقذت بعض المؤسسات من مشاكل عويصة ، نظرا لحذف سجلات بالخطأ او .... Private Sub Form_Close() On Error GoTo err_Form_Close 'make a backup of BE Call BE_or_FE Call Backup_Folder BE_Address = Replace(BE_Path, "\Personnel_Images", "") & "\Personnel_BE.accdb" BK_Address = Backup_Folder & "\Program\Personnel_BE_" & Format(Now(), "yyyy-mm-dd_-hh-mm-ss") & ".accdb*" Call Shell("xcopy " & BE_Address & " " & BK_Address, vbHide) Exit Sub err_Form_Close: If Err.Number = 2450 Then 'ignor Resume Next Else MsgBox Err.Number & vbCrLf & Err.Description End If End Sub جعفر 1
ابو الآء قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 أخي علي ، خلينا نمشي على النقاط التالية: 1. اذا كان عندك الاكسس 2007 في اول اصداراته (يعني بدون تحديثات ، وللأسف هذه النسخة موجودة ورأيت الكثير منها ، والكثير من الناس يأخذوها من CD او DVD غير مشروع) ، ففي هذه النسخة ، اذا كنت طلبت من البرنامج: Compact on close ، فالفرصة كبيرة بأن يعمل Corruption لقاعدة البيانات في بعض الكمبيوترات. 2. لهذا السبب يجب عمل التحديثات (Service pack او SP) على الاكسس (لجميع الاصدارات ، لهذا السبب ولأسباب اخرى) ، وهذا الموقع يحتوي على رابط لآخر تحديثات الاوفيس: http://pcsupport.about.com/od/keepingupwithupdates/a/office-service-pack.htm وهناك العديد من الاشخاص الذين للاسف الشديد لا يقومون بتحديث الـ Windows ولا الاكسس ، لهذا السبب اسمح لي اخبرك ، بأن اول تحديث للاكسس 2000 تم فيه تصليح 200 عيب وثغرة من البرنامج الاصل 3. عند حذف السجلات في الاكسس ، فان الاكسس لا يقوم بحذفها نهائيا من البرنامج ، إلا عندما تقوم بعملية Compact and Repair. مثال: قم بعمل قاعدة بيانات بجدول واحد مثلا ، وادخل فيه آلآف السجلات ، اغلق البرنامج ، لاحظ حجم الملف ، افتح البرنامج ، احذف كم هائل من السجلات ، اغلق البرنامج ، لاحظ حجم الملف ، سترى انه تقريبا نفس الحجم الاصلي ، الآن افتح البرنامج ، اعمل Compact and Repair ، واغلق البرنامج ، لاحظ حجم الملف 4. بالنسبة لي انا ، فمعظم برامجي تحتوي على FE و BE الذي يحتوي على الجداول (في البداية ، البرنامج يكون غير مقسم ، الى ان يأخذ البرنامج شكله وعمله الصحيح ، فعندها اقسمه) ، في FE ، في النموذج الرئيسي ، فاستخدم مثل الكود التالي ، والذي يعمل لي نسخة من BE في مجلد خاص للـ Backup ، كلما يغلق المستخدم برنامجه ، ويكون اسم الملف مختوما باليوم والساعة والدقيقة والثانية ، وطبعا السؤال الذي يسأله الكثيرين هو ، سيصبح لدينا الكم الهائل من هذه الملفات ، وجوابي هو: أ. حجم الهارد ديسك هذه الايام مهول ، فلا مشكلة ، ب. معظم مشاركاتي في النتدى ، اضع بين ايديكم وقائع حصلت لي في العديد من برامجي ، وهذه الطريقة انقذت بعض المؤسسات من مشاكل عويصة ، نظرا لحذف سجلات بالخطأ او .... Private Sub Form_Close() On Error GoTo err_Form_Close 'make a backup of BE Call BE_or_FE Call Backup_Folder BE_Address = Replace(BE_Path, "\Personnel_Images", "") & "\Personnel_BE.accdb" BK_Address = Backup_Folder & "\Program\Personnel_BE_" & Format(Now(), "yyyy-mm-dd_-hh-mm-ss") & ".accdb*" Call Shell("xcopy " & BE_Address & " " & BK_Address, vbHide) Exit Sub err_Form_Close: If Err.Number = 2450 Then 'ignor Resume Next Else MsgBox Err.Number & vbCrLf & Err.Description End If End Sub جعفر استاذى ومعلمى الفاضل بارك الله فيك يا ريت لو فيه مثال مخصوص للكود فى هذه المشاركه
jjafferr قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 حيا الله ابوالآء هو انتى عامل كود معين في الموقع يتبعني في كل مشاركة وإلا ايه ما فهمت قصدك من السؤال جعفر
ابو الآء قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 السلام عليكم حياك الله استاذى الفاضل تلميذك مبتدء وبحب احتفظ بالامثله لانى بصراحه لا افقه شيئا فى الاكواد على قدر فهمى فهذا الكود لعمل باك اب ؟؟؟؟؟؟ ولا انا غلطان ممكن مثال مطبق عليه الكود او شرح بسيط ليه !!!
jjafferr قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 (معدل) انا اعتذر ، ما انتبهت اني اشير الى وحدات نمطية غير موجودة ، فاليك الكود بدونهم: ونعم هي للـ Backup Private Sub Form_Close() On Error GoTo err_Form_Close 'make a backup of BE BE_Address = application.currentproject.path & "\Personnel_Images\Personnel_BE.accdb" BK_Address = application.currentproject.path & "\Program\Personnel_BE_" & Format(Now(), "yyyy-mm-dd_-hh-mm-ss") & ".accdb*" Call Shell("xcopy " & BE_Address & " " & BK_Address, vbHide) Exit Sub err_Form_Close: If Err.Number = 2450 Then 'ignor Resume Next Else MsgBox Err.Number & vbCrLf & Err.Description End If End Sub جعفر تم تعديل مارس 4, 2015 بواسطه jjafferr 1
ابو الآء قام بنشر مارس 4, 2015 قام بنشر مارس 4, 2015 استاذى ومعلمى الجيليل بارك الله فيك واسعد اوقاتك بكل الخير جعله الله فى ميزان حسناتك سوف احاول التنفيذ واوافيك بالنتيجة ان شاء الله
علي المصري قام بنشر مارس 4, 2015 الكاتب قام بنشر مارس 4, 2015 جزاكم الله خيرا نعم الاعضاء أعضاء منتدى أوفيسنا بالحب والنقاش نصل إلى الكثير من الفوائد نتعلم ونعلم ونرقى بعلمنا بارك الله فيكم جميعا وفي المنتدى والقائمين عليه شكرا ً
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.