Doyazen قام بنشر فبراير 28, 2004 قام بنشر فبراير 28, 2004 السلام عليكم أخواني قرأت موضوع عجبني كثيراً عن نسخ ولصق بيانات من سجل إلى أخرعلى العنوان التالي http://www.officena.net/ib/index.php?showtopic=1071 وبصراحة انا بحاجة لهذه الطريقة في عملي لدي جدول فيه سجلات الموظفين العاملين على رأس عملهم ويحتوي سجل كل موظف عليى التالي: الرقم الوظيفي الدرجة الاسم الوظيفة الادارة القسم الفرع تاريخ التعيين الجنسية ولدي جدول أخر خاص بالمتقاعدين بحيث اذا تقاعد او استقال اي موظف اريد بياناته ان تنتقل من الجدول الأول إلى هذا الجدول ولكن ليس كل الحقول مطلوبة ففي حالة التقاعد لا نحتاج الا للتالي الرقم الوظيفي الدرجة الاسم الإدارة تاريخ التعيين الجنسية تاريخ انتهاء الخدمة السبب ( استقالة ) أو ( تقاعد ) مع حذف البيانات كلياً من الجدول الموظفين الأول كونه لم يعد على رأس عمله فهل الطرق المشروحة في الوصلة تتناسب معي أو هناك طرق أخرى ولو ممكن مع الشرح علشان نتعلم قبل كل شي تحياتي
بو يوسف الراشد قام بنشر فبراير 29, 2004 قام بنشر فبراير 29, 2004 (معدل) الطرق المشروحة في الوصلة صعبة قليلاً وسأعطيك طريقة سهلة وتقوم بتنفيذ ما تريده كل ما تحتاجه هو عمل استعلام إلحاقي يقوم بنقل البيانات من الجدول الأول إلى الجدول الآخر ثم قم بوضع كل الحقول المراد نقلها في الاستعلام وعند حقل الاسم وعند خيار "معايير" قم بوضع هذا المعيار [forms]![اسم مربع النص الخاص بالاسم]![اسم النموذج] حيث يقوم هذا المعيار بنقل البيانات الحالية فقط من النموذج وينقلها إلى الجدول الآخر ملاحظة: إذا لم يتم وضع هذا المعيار سيتم نقل جميع البيانات إلى الجدول الآخر وبعدها يتم عمل زر أمر في نموذج الجدول الأول لكي ينفذ النقل بمجرد النقر على زر الأمر حيث يتم وضع هذا الكود عند حدث "عند النقر" If MsgBox("هل تريد حذف هذا السجل", vbQuestion _ + vbMsgBoxRight + vbYesNo, "انتبه") = vbYes Then DoCmd.SetWarnings False DoCmd.OpenQuery "اسم الاستعلام", acViewNormal DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 وإليك هذا الملف المرفق الذي سيوضح لك الشرح aaaa.zip تم تعديل فبراير 29, 2004 بواسطه بو يوسف الراشد
حاكم قام بنشر مارس 2, 2004 قام بنشر مارس 2, 2004 مثال رائع أخي بو يوسف فإذا أراد المستخدم نقل جميع السجلات فيجب عدم وضع المعيار فيتم الإلحاق . ولكن ماذا عن حذف جميع السجلات بعد الإلحاق وليس حذف السجل الحالي فقط ؟؟
Doyazen قام بنشر مارس 5, 2004 الكاتب قام بنشر مارس 5, 2004 مشكور أخي بو يوسف وأسف على التأخير في الرد ( ظروف العمل ) مثال ممتاز ولكن لاحظت انه مرات يقوم بحذف السجل ونقلة للجدول الجديد ومرات يحذف السجل ولكن لا ينقله للجدول الجديد لا ادري هل المشكلة في الملف ام من عندي أرجو منك التأكد من ذلك لو سمحت تحياتي
مصلح الحريصي قام بنشر مارس 8, 2004 قام بنشر مارس 8, 2004 اخي أبو يعلى إنشيء استعلام حذف وأفتحه بنفس الطريقة الخاصة بالإلحاق والإختلاف في نوع الإستعلام فقط " حذف بدلاً من إلحاق " بدون شرط لحذف جميع السجلات. أخي Doyazen إذا كان في الجدول الذي تلحق البيانات به له مفتاح أساسي ووجد رقم مطابق عند إذن سيتم حذف السجل دون إلحاقه لأنه في العلاقات ل يمكن تكرار المفتاح الأساسي وللتأكد من سبب عدم إلحاق السجل أوقف عمل السطر التالي : DoCmd.SetWarnings False ثم شغل الإستعلام ستظر لك رسالة تخبرك عن سبب عدم إلحاق السجل0
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.