محمد طاهر عرفه قام بنشر يوليو 21, 2003 قام بنشر يوليو 21, 2003 مثال علي : النسخ الاحتياطي التصدير الي الاكسيل مع ملاحظة أن الجدول E_List يحوي الجداول و الاستعلامات التي تريد الاختيار بينها للتصدير تغيير روابط الجداول من خلال النموذج مع ملاحظة أن الجدول F_LIST يحوي أسماء الجداوال التي تريد تجديد رابطها 3in1.zip 1 1
أبو وليد قام بنشر أكتوبر 9, 2003 قام بنشر أكتوبر 9, 2003 عزيزي نريد ان يتم عمل صيانة عند اغلاق البرنامج تلقائيا فكيف يتم ذلك كذلك عمل نسخة احتياطية للقاعدة عند الاغلاق تلقائيا
محمد طاهر عرفه قام بنشر أكتوبر 9, 2003 الكاتب قام بنشر أكتوبر 9, 2003 طبق الكود السابق هكذا On Error GoTo errsub DoCmd.Hourglass True DBEngine.CompactDatabase datapath, Backuppath, DB_LANG_ARABIC DoCmd.Hourglass False errsub: If Err.Number = 3204 Then MsgBox " A database with the same name exists in the same location ! ", 64, "Duplicate Backup Name" ElseIf Err.Number = 3356 Then MsgBox "Another user is Currently using the Database" + Chr(10) + Chr(13) + "Wait Until No Other Users are Using the Database !", 16, " Other Users WArning Message " ElseIf Err.Number = 3024 Then m = " The Database Source File : " + datapath + Chr(10) + Chr(13) + " is not available !" + Chr(10) + Chr(13) + "Please check the Source Database Name and Location" MsgBox m, 16, "Missing Data Table " ElseIf Err.Number = 3044 Then m = " Invalid File Name : " + Chr(10) + Chr(13) + "Please check the File name and location " MsgBox m, 64, "Invalid File Name " ElseIf Err.Number = 20477 Then m = " Invalid File Name : " + m3 + Chr(10) + Chr(13) + " OR " + m4 + Chr(10) + Chr(13) + " is not available !" + Chr(10) + Chr(13) + "Please check the Source Database Name and Location" MsgBox m, 64, "Invalid File Name " Else MsgBox Str(Err.Number) + Err.Description End If MsgBox "Action Canceled ! " DoCmd.Hourglass False فى زر اغلاق التطبيق 1
moayad قام بنشر أكتوبر 29, 2003 قام بنشر أكتوبر 29, 2003 السلام عليكم سؤالي عن كيفية عمل رابط أو ايقونه يمكن من خلال الضغط عليها ضغط واصلاح قاعدة بيانات معينة ( دون الحاجة الى الدخول الى قاعدة البيانات نفسها) ولكم جزيل الشكر.....
ابن مسقط قام بنشر أكتوبر 29, 2003 قام بنشر أكتوبر 29, 2003 وعليكم السلام ورحمة الله وبركاته أخي/ moayad ليس لدى علم بوجود طريقة حسب ما ذكرت :$ ، ولكن يوجد لدى مثال لقاعدة بيانات تستطيع أن تضغط وتصلح وتنسخ قاعدة أخرى ، أضف إلى أنها تستطيع أن تقوم بعمل ذلك لعدة قواعد أخرى في وقت واحد تقع في مسارات مختلفة. وأعتقد أنك لو أنشئت إختصار للمثال المذكور على سطح المكتب لأستطعت أن تضغط وتأخذ نسخة إحتياطية من أي قاعدة :pp: . جرب وأخبرني أن كانت مفيده والمثال مرفق والله الموفق. Compact_Backup.rar 1
محمد طاهر عرفه قام بنشر أكتوبر 30, 2003 الكاتب قام بنشر أكتوبر 30, 2003 (معدل) مثال جميل جدا و يمتاز بتعدد القواعد :( الفرق بين مثال ابن مسقط والمثال السابق أن المثال السابق أبسط قليلا لعمل ذلك و هو مجهز لنسخ و ضغط القاعدة نفسها افتراضيا فى مسار آخر ، و يمكن استخدامه ايضا لنسخ و ضغط أي قاعدة الي مسار آخر تم تعديل ديسمبر 29, 2003 بواسطه امير عاطف
moayad قام بنشر نوفمبر 17, 2003 قام بنشر نوفمبر 17, 2003 أشكرك على اهتمامك وأسف على التأخير في الرد يوجد طريقة وجدتها ربما تفيد.. وهي عمل ايقونة اختصار ووضع الجملة التالية في الرابط "C:\Program Files\Microsoft Office\Office\MSACCESS.EXE" /rtl /repair "C:\موقع الملف.mdb" /compact
محمد طاهر عرفه قام بنشر نوفمبر 22, 2003 الكاتب قام بنشر نوفمبر 22, 2003 مثال للأخ حارث لنسخ الجداول CopyTables.rar
محمد طاهر عرفه قام بنشر نوفمبر 22, 2003 الكاتب قام بنشر نوفمبر 22, 2003 مثال للنسخ مع التوقيت ( أجنبي) AutoBkUp2K.rar
fisalll قام بنشر ديسمبر 23, 2003 قام بنشر ديسمبر 23, 2003 السلام عليكم ..... إخواني الكرام .... مشترك جديد ومبتدىء بالأكسس ... لدي عدة تساؤلات 1- كيف يمكنني استيراد وتصدير قاعدة بيانات مضغوطة بالون زيب من والى قرص مرن 2 - لدي قاعدة بيانت يتم من خلالها حساب مرتبات موظفين دائرة ما شهريامن محرم الى ذي الحجة ولدي فايل في نفس مجلد البرنامج اسمه "حفظ" اريد ان أحفظ بيانات الا شهر بحيث يتم استدعاؤها من الفايل بواسطة البرنامج متى مادعت الحاجة لذلك وكذلك كل الأشهر بحيث أذا طلبت من البرنامج حفظ يحفظها بنفس اسم الشهر واذا استدعيتها يتم اعلام المستخدم ان عليه اختيار الشهر ؟ فكيف ممكن يتم ذلك...... شكرا لكم
fisalll قام بنشر ديسمبر 23, 2003 قام بنشر ديسمبر 23, 2003 السلام عليكم أساتذتي الكرام وينكم ؟ ما احد يرد ؟ :) بعدما طرحت السؤال تجولت بالمنتدى ووجدت مجموعة دروس ساعدتني في سؤالي الاول لكن النقل للقاعدة بدون ضغط :') أنا عملت هذا الكود او بالأحرى جمعته من هنا وهناك وضبط في عملية نسخ القاعدة الى فلوبي بس ابي قبل ما يرسلها للفلوبي يعمل لهل ضغط ارجو المساعدة الكود هو Private Sub أمر3_Click() On Error GoTo Err_أمر3_Click Dim fs Set fs = CreateObject("Scripting.FileSystemObject") fs.CopyFile "C:\My Documents\naql\ndb1.mdb", "A:\", True MsgBox "تم نقل البيانات بنجاح " Err_أمر3_Click: Exit Sub End Sub بالنسبة للسؤال الثاني لا زلت أنتظركم ........ تحياتي لكم جميعا
biskra قام بنشر يناير 22, 2004 قام بنشر يناير 22, 2004 يوجد عندي مثال جميل جدا للأخ أبو هاجر,فهو لا يكتفي باٍنشاء نسخة اٍحتياطية للقاعدة خاصة الجداول, و لكن يقوم بضغطها باِمتداد winzip و يمكن استراد النسخة الاحتياطية بواسطة زر أمر ,أي أن العملية تتم كلها بطريقة تلقائية,مع الأسف لن أتمكن من وضعه في المنتدى , و سوف أحاول اٍيجاد موقعا أضعه فيه حتى يستفيد منهالاخوة.
stcp قام بنشر فبراير 17, 2004 قام بنشر فبراير 17, 2004 تحياتي للجميع عندي قاعدتين الاولى هي الرئيسية و الثانية تحوي الجداول فقط ارغب في عمل نموذج في القاعدة الرئيسية لانشاء قاعدة جديدة (مع حرية اخيتار مكانها) و تصدير الجداول من القاعدة الثانية اليها مع بيانات و بدون بيانات (مع حرية اختيار القاعدة الفرعية) وشكرا للجميع[move]
تلميذ و منكم بيتعلم قام بنشر فبراير 20, 2004 قام بنشر فبراير 20, 2004 (معدل) اخى العزيز يمكن من هذا البرنامج ضغط قاعدة البياناتا من خلال نموذج فى قاعدة بيانات اخرى بأسم جديد عن طريق InputMsgBox فى الكود بكتابتة قبل عملية الضغط و أستخدام الأسم الذى ستكتبة فى البوكس الذى سيظهر كأسم جديد للقاعدة فى المكان الذى تريدة و ذلك بتحديد المسار المثال بوورد 97 mantnace.rar تم تعديل فبراير 20, 2004 بواسطه aymanemara
esam قام بنشر فبراير 23, 2004 قام بنشر فبراير 23, 2004 (معدل) هذه الاداة تخص النسخ الاحتياطي للبيانات وضغطها وقد نشر الاخ ابو هاجر مثال خاص بذلك ولكني لم اجد الاداة مرفقة مع المثال الأداه هي XceedZip.dll تم تعديل يونيو 11, 2004 بواسطه امير عاطف
بو يوسف الراشد قام بنشر فبراير 23, 2004 قام بنشر فبراير 23, 2004 (معدل) تفضل هذه القاعدة المرفقة والتي وضعها أحد الأعضاء والخاصة بالنسخ الاحتياطي Backap.zip تم تعديل فبراير 23, 2004 بواسطه بو يوسف الراشد
esam قام بنشر فبراير 23, 2004 قام بنشر فبراير 23, 2004 الامثلة السابقة لا تضغط بصيغة zip الرائعة كما ورد في المثال الذي هو لدي بالفعل ، ولكن المثال لا يعمل الا بهذه الدالة الذي اتمني من الله عز وجل .. من لديه يعرضها في المنتدي
ashraf قام بنشر فبراير 24, 2004 قام بنشر فبراير 24, 2004 هذه ايضا الدلة بشكل ولكن بصيغة Dll ومضغوطة . أشرف خليل XceedZip.zip
ha98 قام بنشر مارس 11, 2004 قام بنشر مارس 11, 2004 السلام على الجميع عملت قاعدة بيانات وفصلت الجداول عن بقية كائنات القاعدة في قاعدة أسميتها البيانات وجعلت بقية كائنات قاعدة البيانات في قاعدة أسميتها الواجهة وسحبت من المنتدى المثال الرائع للأستاذ محمد طاهر وهو 3in1 وكان هذا المثال يعنى بعمل نسخة احتياطية لقاعدة البيانات وإعادة ربط قاعدة البيانات بالجداول من خلال نموذج وكان هذا الأخير هو ماأريد أن أحصل عليه ولكن المشكلة أنه اكتشفت أن نموذج إعادة ربط الجداول بالقاعدة لا يعمل بشكل صحيح حيث أنه بعد الانتهاء من تحديد مسار قاعدة البيانات المراد عمل ربط لجداولها مع القاعدة الحالية وضغط الزر إعادة التوجيه أجد أن القاعدة الحالية لم ترتبط بجداول القاعدة المحددة في المسار تأملت في الكود لكن لم ألاحظ خطأ أرجوا الإفادة تحياتي للجميع :pp:
محمد طاهر عرفه قام بنشر مارس 11, 2004 الكاتب قام بنشر مارس 11, 2004 السلام عليكم يوجد جدول يتم تسجيل أسماء الجداول المراد ربطها به فهل قمت بذلك .؟؟
ha98 قام بنشر مارس 11, 2004 قام بنشر مارس 11, 2004 الأستاذ العزيز محمد مااسم هذا الجدول وأين يوجد سوف أخبرك بماعملته أنا : *عملت قاعدة بيانات وفصلت الجداول عن بقية كائنات القاعدة في قاعدة أسميتها المعلومات وجعلت بقية كائنات قاعدة البيانات في قاعدة أسميتها الواجهة * قمت بعملية استيراد الكائنات التالية من القاعدة 3in1 الى قاعدة الواجهة - الجداول التالية COMPANY وE_LIST و F_LIST - الاستعلام Q_COMP - النماذج التالية FCOPY و LINK_F - الوحدات النمطية التالية openFile و UTILITY * ثم قمت بعملية نسخ لقاعدة المعلومات من خلال النموذج FCOPY وحفظت النسخة باسم المعلومات 1 في نسخ الاحتياط *ثم قمت بتعديلات على البيانات واحتفظت بنسخة من التعديلات باسم المعلومات 2 في مجلد نسخ الاحتياط الآن لو حبيت أن ترتبط قاعدة الواجهة بقاعدة المعلومات 1 كيف أعمل هذا ؟ طبعا ذهبت إلى النموذجLINK_F لكي أغير مسار ربط الجداول بالقاعدة التي أحددها أنا ولكن المشكلة مثل ماأخبرتك بعد تحديد مسار القاعدة وضعط زر التوجيه أجد أن قاعدة الواجهة لاتعرض إلا آخر المعلومات المحدثة يعني لاتعرض معلومات النسخ الاحتياطية السابقة أرجوا أن يكون قصدي واضح مع خالص شكري وتقديري لك ياأستاذ محمد
الردود الموصى بها