mon mon قام بنشر سبتمبر 5, 2016 قام بنشر سبتمبر 5, 2016 (معدل) السلام عليكم ورحمة الله كيف أجعل أمر insert into يعيد نفسه تلقائيا ليُدخل جميع الصفوف المدخلة في النموذج لجدول البيانات فمثلا ،، إذا أدخل المستخدم أكثر من سجل ( كما في الصورة ) فقط آخر صف هو الذي يسجل في الجدول دون باقي الصفوف !!! فكيف أجعله يدخل جميع الصفوف ؟ وهذا هو الكود DoCmd.RunSQL " INSERT INTO WareHouse ( [barcode], [Quantity], [BranchID])values ( '" & Me.Sales_Subform![Product] & "', " & -Me.Sales_Subform![Quantity]& ", " & Me.[Branch]& ");" تم تعديل سبتمبر 5, 2016 بواسطه mon mon
mon mon قام بنشر سبتمبر 5, 2016 الكاتب قام بنشر سبتمبر 5, 2016 عملته ونفس المشكلة نفس السجل ينضاف و يتكرر كم مرة
mon mon قام بنشر سبتمبر 5, 2016 الكاتب قام بنشر سبتمبر 5, 2016 اكتشفت ان كود do الذي كتبته خطأ من فضلك أخي هل يمكن أن تشرح بالتفصيل قليلا كيف أصيغه وما المرفق الذي تقصده ؟ هل تقصد ملف الاكسز ؟ وللمعلومية النموذج الذي استخدمته من نوع continuous form لأتمكن من ادخال عدة سجلات مرة واحدة للجدول الاساسي وفي نفس الوقت اريد ادخال نفس البيانات لجدول آخر ولذلك استخدمت أمر insert into في زر الأمر البيانات في الجدول الأساسي تُسجل دون مشكلة المشكلة فقط في الجدول الآخر حيث ان فقط الصف الأخير هو الذي يسجل دون الباقي
محمد ايمن قام بنشر سبتمبر 5, 2016 قام بنشر سبتمبر 5, 2016 منذ ساعه, mon mon said: ما المرفق الذي تقصده ؟ هل تقصد ملف الاكسز ؟ نعم اخي الكريم ملف الاكسسز مع توضيح المطلوب منذ ساعه, mon mon said: وللمعلومية النموذج الذي استخدمته من نوع continuous form لأتمكن من ادخال عدة سجلات مرة واحدة للجدول الاساسي وفي نفس الوقت اريد ادخال نفس البيانات لجدول آخر ولذلك استخدمت أمر insert into في زر الأمر البيانات في الجدول الأساسي تُسجل دون مشكلة المشكلة فقط في الجدول الآخر حيث ان فقط الصف الأخير هو الذي يسجل دون الباقي لا يوجد فرق فكما ذكرت جمل SQL تتعامل مباشرة مع الجدوال بدون اي مشكلة
mon mon قام بنشر سبتمبر 5, 2016 الكاتب قام بنشر سبتمبر 5, 2016 أخي عملت هذا المثال المبسط جدا لقاعدة البيانات خاصتي ,, وله نفس الفكرة لصعوبة رفع الملف الأصلي لكبر حجمه فبعد تحميل المرفق ستلاحظ عند ادخال عدة سجلات في النموذج وبعد الضغط على submit أنَ ليست كل الصفوف تضاف الى جدول warehouse .. فقط الصف الأخير دون الصفوف العلوية Database11.rar
محمد ايمن قام بنشر سبتمبر 5, 2016 قام بنشر سبتمبر 5, 2016 تفضل اخي الكريم جرب الزر ( امر 17) عندي سؤال صغير : ما الفكرة من ادخال نفس البيانات الى جدولين ؟؟ Database12.rar 1
رمهان قام بنشر سبتمبر 5, 2016 قام بنشر سبتمبر 5, 2016 اختي الفاضلة ومشاركة مع اخي محمد ايمن بما انه لا يوجد شروط او محددات لسجلات محددة فيمكن كتابة الجملة التالية DoCmd.RunSQL "insert into WareHouse(barcode,quantity,branch) select barcode,quantity,branch from sales" وحبيت اوضح المشكلة لديك سابقا وهي ليست مشكلة وانما خطأ منطقي فكودك السابق يضيف القيم من النموذج وعند السجل الحالي وهو السجل الذي به مؤشر محدد السجلات وهنا بالطبيعي سيتم اضافة بيانات سجل واحد وهو الحالي ولكي نستخدم نفس فكرتك ودمجا مع فكرة الاستاذ محمد ايمن يمكن الدوران وعبارة عن ان انقل محدد السجلات لاول سجل ثم الادراج والانتقال للتالي ثم الادراج وهكذا وهنا ساقوم بتعديل بسيط بكودك السابق يقوم بالادراج من اسجل الحالي وما بعد وحسب رغبتك في تحديد البدء بالادراج وذلك بنقر سجل البدء For i = CurrentRecord To Me.RecordsetClone.RecordCount DoCmd.RunSQL " INSERT INTO WareHouse ( [barcode], [Quantity], [Branch])values ( '" & Me.[barcode] & "', " & -Me.[quantity] & ", " & Me.[branch] & ");" DoCmd.GoToRecord , , acNext Next بالتوفيق 1
mon mon قام بنشر سبتمبر 6, 2016 الكاتب قام بنشر سبتمبر 6, 2016 9 ساعات مضت, محمد ايمن said: تفضل اخي الكريم جرب الزر ( امر 17) عندي سؤال صغير : ما الفكرة من ادخال نفس البيانات الى جدولين ؟؟ Database12.rar جزاك الله خير الدنيا والآخرة أخي محمد شكرا جزيلا لك هذا مثال مبسط أخي محمد حتى أوصل لك الفكرة فقط .. ولكن في قاعدة البيانات الأساسية هناك عدة حقول اخرى مختلفة في كلا من الجدولين أكرر شكري مرة أخرى . . 9 ساعات مضت, رمهان said: اختي الفاضلة ومشاركة مع اخي محمد ايمن بما انه لا يوجد شروط او محددات لسجلات محددة فيمكن كتابة الجملة التالية DoCmd.RunSQL "insert into WareHouse(barcode,quantity,branch) select barcode,quantity,branch from sales" وحبيت اوضح المشكلة لديك سابقا وهي ليست مشكلة وانما خطأ منطقي فكودك السابق يضيف القيم من النموذج وعند السجل الحالي وهو السجل الذي به مؤشر محدد السجلات وهنا بالطبيعي سيتم اضافة بيانات سجل واحد وهو الحالي ولكي نستخدم نفس فكرتك ودمجا مع فكرة الاستاذ محمد ايمن يمكن الدوران وعبارة عن ان انقل محدد السجلات لاول سجل ثم الادراج والانتقال للتالي ثم الادراج وهكذا وهنا ساقوم بتعديل بسيط بكودك السابق يقوم بالادراج من اسجل الحالي وما بعد وحسب رغبتك في تحديد البدء بالادراج وذلك بنقر سجل البدء For i = CurrentRecord To Me.RecordsetClone.RecordCount DoCmd.RunSQL " INSERT INTO WareHouse ( [barcode], [Quantity], [Branch])values ( '" & Me.[barcode] & "', " & -Me.[quantity] & ", " & Me.[branch] & ");" DoCmd.GoToRecord , , acNext Next بالتوفيق صحيح أخي رمهان مشكلتي كانت في المؤشر فبصراحة لم أكن اعرف الكود الذي يغير مكان المؤشر ... رغم بحثي ولكن للأسف لم أصل لنتيجة فجزيل الشكر لك على إضافتك الجميلة و الّتي ستساعدني كثيرا في المستقبل جزاك الله خيرا في الدنيا والآخرة ونفع الله بك وبعلمك أخي رمهان 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.