الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

[ تمت الإجابة ]كيف نضيف بيانات من جدول إلى جدول آخر في نفس الداتابيز

بدأه جواد في 13 مارس 2012 · 5 رد · 441 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

كيف نضيف بيانات من جدول إلى جدول آخر في نفس الداتابيز على حسب رقم الـ ID بالداتابيز

يعني أريد أن أضيف نفس البيانات الموجودة في الجدول Table1 بالعمود الذي يحمل أسم Tel إلى الجدول الثاني Table2 وبالعمود الذي يحمل إسم Tel على حسب رقم الـ ID

مرفق المشروع صغير الحجم

Project1.rar

#2

في طريقتين .. الاولى انك تنشأ 2 RecordSet يعني مثلاً (RS1 , RS2 ) واحد تربطه بالجدول الاول والتاني تربطه بالجدول الثاني

وتاخد بيانات السجل من الجدول الاول وتعمل AddNew في الجدول الثاني ..

الثانية وهي الاسهل بالنسبة ليه هي إستخدام امر SQL Command لعمل هذا الموضوع ويكون كالتالي :

DB.Execute "Insert Into Table2 Select * From Table1 Where ID=24"

It does not matter what they know about you, but what you can do, so let your work speak of you

mmghv VB6 Programmer

#3

أخي محمد غريب أنا اريد مثل مو مكتوب بالـعمود الذي يحمل إسم Tel بالجدول الأول

أريد أن تضاف هذه البيانات للجدول الآخر على حسب رقم الـ ID الموجودة في الـ ListView ولكن أريد أن يضاف فقط اللي مكتوب في العمود الذي يحمل إسم Tel

يعني لا اريد نقل جميع البيانات التي بقاعدة البيانات اريد فقط اللي بالعمود Tel وعلى حسب رقم الـ ID الموجودة في الـ ListView

وشكراً لك

أنتظر ردك

تم تعديل هذه المشاركة بواسطة جواد في 13 مارس 2012 في 16:59

#4

إذاً بدلاً من (*) في الكود والتي تعني كل الحقول نضع اسم الحقل المحدد وهو Tel

وبدلاً من الرقم المكتوب للـ ID نجعله يقرأه من الـ ListView فيكون الكود كالتالي :

DB.Execute "Insert Into Table2 Select Tel From Table1 Where ID=" & Val(ListView1.SelectedItem.Text)

هذا الكودج ينقل البيان من الجدول الاول الى الجدول الثاني .. ويمكننا إضافة بيان مباشر للجدول الثاني بقيمه النص المكتوب في الـ ListView مباشرةً ويكون الكود كالتالي :

DB.Execute "Insert Into Table2 (Tel) Values('" & ListView1.SelectedItem.SubItems(2) & "')"

It does not matter what they know about you, but what you can do, so let your work speak of you

mmghv VB6 Programmer

#5

طيب أخي محمد إذا كان العمود الثاني تبع الـ Listview يوجد فيه ارقام مختلفة يعني في السطر الأول يوجد رقم مثلا 10

وفي السطر الثاني يوجد الرقم 25

والسطر الثالث يوجد الرقم 7

وأريد أن أضيف كل البيانات الموجودة في العمود الثاني اللي بالـ ListView باالعمود في الداتا بيز الذي يحمل إسم Tel

ولكن كل رقم سوف يضاف أريد أن ينضاف على حسب رقم الـ ID

تم تعديل هذه المشاركة بواسطة جواد في 13 مارس 2012 في 17:35

#6

شكراً لك أخي محمد غريب

الله يعطيك العافية ويقويك

والله يزيدك من علمه

ألف شكر لك

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…