مسفر
-
Posts
365 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
3
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
مشاركات المكتوبه بواسطه مسفر
-
-
-
لا تستعجل أنا والشباب لابد أن يكون لدينا ما يشغلنا سنحاول اليوم أن ننهي الموضوع فإن لم نستطع أخبرناك بذلك
-
لا يمكن الحذف من الجدول الرئيسي بشرط يكون بجدول فرعي هذا والله أعلم
يجب أن يكون الحذف مشروط بحقل يوجد بالجدول الرئيسي كما أرفقت لك في قاعدة سابقة وكما تحدث بها احد الاخوة فكلاهما واحد
والله اعلم
-
بحثت عن الحقل AGE في جدول Members حسب الكود اللي انت وضعته ما لقيته كيف يحذف بشرط غير موجود في الجدول ؟
WHERE ((Members.AGE >='3
ظ
-
-
اعكس الاستعلامين للإلحاق
-
على حد علمي أيضا لا يمكن عن طريق الكود لأنه سيكون الحدث على جميع السجلات
كما أن استخدام الجمل الشرطية تعتمد على القيمة المدخلة أو غيرها ويجب أن تكون ثابتة
وإذا كان الجمل الثلاث التي ذكرتها هي فقط التي ستكون في الجدول تستطيع بالتنسيق الشرطي وضعها أما إذا كانت اكثر فلا والله اعلم واجل
-
أضف على مربع الاختيار ثم انتقل إلى غيره وانظر الرسالة فهي خير من الالغاء
-
جرب اضغط على ترحيل
-
اللي واضح في الجدول عندي ان احد الاعضاء وهو انثى وصل إلى 4 سنوات وكم شهر أي اكبر من ثلاث سنوات عند انشاء استعلام مبني على جدول Members بمحتوياته كاملا واستعلام واحد فقط حقل age وضعنا تحت الحقل شرط وهو >=3 نتج عنه ترحيل هذا العضو مع بقائه في جدول Members
استعلام الالحاق يكون من الجدول والاستعلام 1 معا
-
حط الشرط ينقل فقط الانثى
-
سوي استعلام الحاق مبني على جدول Members واستعلام 1 وحط الشرط تحت age >=3 والحقه بجدول Members2
ونفس الطريقة بجدول الاشتراكات بكذا يسوي ترحيل للجدولين المحددين بدون حذف العضو من الجدول الرئيسي
وحط تحت زر ترحيل كود تشغيل الاستعلامين كل استعلام على حده وبكذا يتم الترحيل للجدولين لمن مرى عليه ثلاث سنوات أو اكثر إذا كان age تعني مرور ثلاث سنوات فاكثر قاعدتك ما فهمتها
هذا والله اعلم
-
التنسيق الشرطي حسب فهمي يعتمد على القيمة المدخلة في الحقل وتستطيع عمل أكثر من شرط لكن تكون القيم النصية ثابتة
هذا حسب فهمي والله اعلم
- 1
-
ما فهمت قصدك التنسيق الشرطي في القاعدة السابق يضلل أي سجل فيه FINAL
-
- 1
-
- 1
-
ارفق المثال اللي تبينا نضيف عليه نموذج بحث وان شاء الله نحاول نساعدك
ترى انا مو من العمالقة انا قزم جديد في الاكسس
-
انت اطلعت على الفيديو اللي ادرجته ما حذف معي احد ما ابغاه ينحذف بعد ادراج حقل نعم /لا في جدول الاعضاء وبناء كود الحذف على اساسه والنموذج مبني على استعلام شغله شرح اللي صار لكن اطلع على القاعدة اللي ارسلتها لك قبل وشوف وش سويت في النوافذ والاستعلامات والاكواد وطبقه انت على قاعدتك وان شاء الله تصل
-
انا فقط نفذت اللي انت طلبته على القاعدة الاخيرة ولم اغير شي بالباقي جميع الاكواد الان عندك في القديم والجديد
-
مررنا الاستعلام الى استعلام وعملنا المعادلة يمكن هذا اللي تبيه والله اعلم
-
-
جرب القاعدة
أولا افتح نموذج Eshtrak1
حدد على العضو المراد ترحيله إلى جدول الارشيف حتى نستطيع ارجاعه فيما بعد
واضغط على ترحيل ثم اضغط بعد ذلك على حذف
بعدا افتح جدول Emp تجد الاعضاء الذين تم اختيارهم مع اشتركاتهم في جدول Eshtrk الاخر وليس القديم
قبل الترحيل والحذف اضغط على حفظ
بروح للصلاة واقوم بزيارة أعود اجد الاجابة
-
أخوي أكسس
بالقاعدة اللي ارسلتها لك في جداول مضافة تلقى فيها بيانات العضو اللي حذفته من الجدول ارئيسي لعدم دفعه ولمرور ثلاث سنوات وتلقى فيه ملف باسم اشتراك بنفس الاسم مع نقص حرف من جدولك تلقى فيه اشتركات اللمحذوف وهو مرتبط بالجدول emp على ما اذكر
القاعدة اللي عطيتك يحذف العضو ولكن موجود بجدولين هو واشتراكاته اقدر ارجعه بنفس الكود مع فورم جديد للمرحلين مثل ما قلتلك
بكرة ان شاء الله لي محاولات وربك يقدر اللي فيه الخير
-
أنا أرسلت لك ملف فيه اللي طلبته بس بيكون كل سجل منفرد ترحيل وحذف يرحل العضو بكل ما يرتبط فيه من جدول الاشتركات
وبكذا نعمل نموذج خاص بالمرحلين ونضع فيه الكود نفسه ونغير مسمى الجداول فقط ويرجعون للجدولين السابقين بنفس المعلومات
شوف أنا عملت الان استعلام يظهر الفارق بين تاريخ نهاية الاشتراك وتاريخ الحالي ويطلع الفرق ثلاثة سنوات او مهما كان الفارق
لكن باقي اشتغل على عملية الالحاق والحذف ونشوف وش يطلع معانا
شوف يا غالي
أولا لازم نعرف مالذي نستفيده من الجدول المنشأ قبل إنشائه
جدول الاعضاء : يسجل فيه الأعضاء بالمعلومات .
جدول الاشتركات : مرتبط مع جدول الاعضاء رأس بأطراف .
نعمل جدولين بنفس الحقول في كلا الجدولين السابقين
مهمتهما فقط حفظ البيانات لا أكثر ولا أقل للاسترجاع مرة آخرى حين الدفع
المساعدة فى ترحيل الاعضاء الذين مر عليهم 3 سنوات من التاريخ الحالى
في قسم الأكسيس Access
قام بنشر
ضع الكود في الزر التالي وطبق على البقية اذا احببت
On Error GoTo Err_أمر32_Click
DoCmd.GoToRecord , , acNext
Err_أمر32_Click:
MsgBox ("هذا آخر سجل ")
Exit Sub
لمنع ظهور الرسالة