delphi4arab منتديات دلفي للعرب
كيفية نقل عدد من السجلات محدودة من جدول الى جدول آخر - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية نقل عدد من السجلات محدودة من جدول الى جدول آخر (/showthread.php?tid=11350)



كيفية نقل عدد من السجلات محدودة من جدول الى جدول آخر - hadir aek - 06-05-2021

السلام عليكم اساتذتنا واحبائنا الكرام صح رمضانكم وتقبل الله منا ومنكم الصيام والقيام إن شاء الله
لدي سؤال بخصول نقل عدد من السجلات محدودة من جدول الى جدول آخر
او بمعنى أخر كيفية اجراء معالجة زر لنقل مجموعة من البيانات بعد فلترتها من جدول الى جدول آخر.
علما بان قاعدة البيانات من نوع .mdb والبرنامج بلغة دلفي.
من لدية الحل يفيدنا ..... وجزى الله الجميع بالخير.


RE: كيفية نقل عدد من السجلات محدودة من جدول الى جدول آخر - Mr.DOS - 07-05-2021

سلام عليكم
ارفق لنا محاولتك .


RE: كيفية نقل عدد من السجلات محدودة من جدول الى جدول آخر - صالح حمادي - 07-05-2021

السلام عليكم
تستطيع استخدام أوامر SQL
و بالتحديد الجملة Insert


RE: كيفية نقل عدد من السجلات محدودة من جدول الى جدول آخر - Delphi4Us - 10-05-2021

وعليكم السلام ورحمة الله 

بامكانك استخدام جملة استعلام مباشرة مثل لنسخ سجلات من جدول لاخر بحالة معينة تحددها

كود :
INSERT INTO table2 SELECT * FROM table1 WHERE condition;

او نسخ اعمدة او حقول معينة فقط بحال لا يوجد تماثل بين الجدولين

كود :
INSERT INTO table2 (column1, column2, column3, ...) SELECT column1, column2, column3, ... FROM table1 WHERE condition;

مثال

كود :
INSERT INTO Customers (CustomerName, City, Country) SELECT SupplierName, City, Country FROM Suppliers;


مثال أخر

كود :
INSERT INTO Customers (CustomerName, ContactName, Address, City, PostalCode, Country) SELECT SupplierName, ContactName, Address, City, PostalCode, Country FROM Suppliers;

مثال بشرط معين

كود :
INSERT INTO Customers (CustomerName, City, Country) SELECT SupplierName, City, Country FROM Suppliers WHERE Country='Germany';