تقسيم بيانات جدول اكسس الى ملفات اكسس تبعا لكل مدرسة

[محسن سرحان]

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

وقام احد المشرفين بالرد بالمثال المرفق

ولكن كلما قمت بالتجريب لا بنشئ اي شيئ على الرغم من وصول الكود لdone

فارجو تجريب المثال ومعرفة لماذا لا يقوم بالمطلوب؟

وشكرا

SlicingDB(1).rar

[الضياء2008]

ادخل على الكود وعدل اسم الملف والبارتشن المراد عمل التصدير اليه

اصنع ملفجديد على الباتشن f باسم tttt  أو غير هنا باللون الأحمر

😕Set dbs = ws.CreateDatabase("f\tttt\Schl_" & i & ".mdb", dbLangArabic)

DoCmd.CopyObject "f😕tttt\Schl_" & i & ".mdb", "School", acTable, "School"

SlicingDB.rar

[kanory]

12 ساعات مضت, محسن سرحان said:

وقام احد المشرفين بالرد بالمثال المرفق

ولكن كلما قمت بالتجريب لا بنشئ اي شيئ على الرغم من وصول الكود لdone

فارجو تجريب المثال ومعرفة لماذا لا يقوم بالمطلوب؟

وشكر

السبب ان المجلد sample  في الدرايف C غير موجود انشئ مجلد باسم sample في الدرايف C  وجرب .....

[محسن سرحان]

الف شكر لحضراتكم على المشاركة

وتم تجريب المثال بعد التعديل والملاحظات هي

1- قام الكود بصنع 25 وعشرين مدرسة فقط

2-لا  يكتب اسم المدرسة كاسم للقاعدة

3-انا اريد  ان يقسم جدول البيانات لكل مدرسة وتكون مستقلة

وشكرا

[عبدالله بشير عبدالله]

29 دقائق مضت, محسن سرحان said:

- قام الكود بصنع 25 وعشرين مدرسة فقط

 

اخي الفاضل

لان الطلبة الموجودين بالجدول مسجلين على 25 مدرسة فقط

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

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

لكم وافر التقدير والاحترام

 

تم تعديل يناير 20, 2020 بواسطه عبدالله الصاري

[kanory]

41 دقائق مضت, محسن سرحان said:

الف شكر لحضراتكم على المشاركة

وتم تجريب المثال بعد التعديل والملاحظات هي

1- قام الكود بصنع 25 وعشرين مدرسة فقط

انظر الصورة ....

 

[kanory]

تفضل :::

اجريت بعض التعديلات على الكود :

اصبح ينشئ المجلد اذا كان غير موجود

اصبحت الملفات باسماء المدارس 

 

‏‏SlicingDB.accdb

[محسن سرحان]

الله عليك ايها العبقري

اقترب المثال من المطلوب

باقي ان تحتوى القواعد الجديدة على الجدول داتا كيدز على اسماء طلبة المدرسة

وشكرا شكرا شكرا

[kanory]

شوف المثال ده ........

 

ka_1.accdb

[محسن سرحان]

الف الف مليون شكر

ولكن ارجو رفع لف بتنسيق 2003

وشكرا

[kanory]

2 ساعات مضت, محسن سرحان said:

الف الف مليون شكر

ولكن ارجو رفع لف بتنسيق 2003

وشكرا

a_2.mdb

تم تعديل يناير 21, 2020 بواسطه kanory

[محسن سرحان]

اشكرك استاذي العزيز

[محسن سرحان]

اشكرك  اخى ولكن لى اخر طلب

اريد اذا كان هناك نماذج او تقارير في القاعدة الاصلية تكون موجودة في القاعدة الجديدة

واسف على كثرة الاسءلة

[kanory]

20 ساعات مضت, محسن سرحان said:

اشكرك  اخى ولكن لى اخر طلب

اريد اذا كان هناك نماذج او تقارير في القاعدة الاصلية تكون موجودة في القاعدة الجديدة

واسف على كثرة الاسءلة

لا عليك أسأل ما بدى لك ونحن نحاول الاجابة 

تفضل .....

 

ka_2 (1).mdb

[محسن سرحان]

الف شكر وجاري التجريب