تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود البحث فى جدولين
#1
لدى قاعدة البيانات بها جدولين اسم الأول TABLE1 واسم الثانى TABLE2
الجدولين لهما نفس الDESIGN أى لهما نفس أسماء الحقول
وأريد استخراج جميع السجلات التى فيها قيمة الحقل NUM1 أكبر من 900 من كلا الجدولين

هذا كود البحث من الجدول الأول مثلآ
NUMM1=900
   Set RS = New ADODB.Recordset
    RS.Open "select * from TABLE1 where NUM1> " & "" & NUMM1 & "" & " , DB, adOpenStatic, adLockReadOnly"
ولكنى أريد البحث فى كلا الجدولين
فاذا كان الجدول الأول يحتوى على 30 سجل يحققون هذا الشرط
     وكان الجدول الثانى يحتوى على 40 سجل يحققون هذا الشرط
فانى أريده يعرض لى 70 سجل

 ولكم ألف شكر
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم
في المرفقات

.rar   Q_TB.rar (الحجم : 21.71 ك ب / التحميلات : 56)
" لا حول و لا قوة الا بالله "


الرد }}}}
تم الشكر بواسطة:
#3
أين الDataGrid التى تعرض جميع سجلات الجدولين المحققة للشرط( السجلات ال16)

إقتباس :وأريد استخراج جميع السجلات التى فيها قيمة الحقل NUM1 أكبر من 900 من كلا الجدولين

الكود المرفق لم يبحث الا فى كل جدول على حده  ثم جمع العددين (كود شبيه بالذى كتبته بنفسى كمثال للبحث فى الجدول الأول) 
 

إقتباس :هذا كود البحث من الجدول الأول مثلآ"
RS.Open "select * from TABLE1 where NUM1> " & "" & NUMM1 & "" & " , DB, adOpenStatic, adLockReadOnly

ولكم ألف شكر
الرد }}}}
تم الشكر بواسطة:
#4
عزيزي اسلام تم بناء المشروع بناءا على المعطيات
وتم اختصار كود الاستعلام ببناء جدولين استعلام وتحقق الشرط الذي طلبته
في كل جدول على حدة
للاسف لم توضح في سؤالك دمج الجدولين في داتا قريد واحدة
عموما 

ان شاء الله طلبك التالي


الملفات المرفقة
.rar   Q_TB.rar (الحجم : 21.51 ك ب / التحميلات : 59)
" لا حول و لا قوة الا بالله "


الرد }}}}
تم الشكر بواسطة:
#5
إقتباس :للاسف لم توضح في سؤالك دمج الجدولين في داتا قريد واحدة

ليست المشكلة فى الداتا جريد
المهم عمل استعلام يستخرج جميع السجلات التى فيها قيمة الحقل NUM1 أكبر من 900 من كلا الجدولين
بحيث أجد قيمة rs.RecordCount تساوى 16
ثم أضعهم بعد ذلك فى داتا جريد أو فى تكست أو أعرض بعضهم فقط أو .........
ولكم ألف شكر
الرد }}}}
تم الشكر بواسطة:
#6
أهلا , هذا تعديل بسيط على مثال أخي أمير , في المرفقات .


الملفات المرفقة
.rar   Q_TB_2.rar (الحجم : 12.57 ك ب / التحميلات : 93)
الرد }}}}
تم الشكر بواسطة: abulayth , Amir_alzubidy , اسلام الكبابى
#7
شغل ممتاز اخي احمد فعلا اجزم بان الكبابي يحتاج الى هذا المثال
سلمت يمناك
" لا حول و لا قوة الا بالله "


الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor
#8
ممتااااااااااز

بارك الله فيك

ولك ألف شكر
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في البحث والتعديل في البرنامج thams 1 296 29-01-17, 10:04 PM
آخر رد: عبد العزيز البسكري
  الحفظ والحذف و البحث باستخدام ado ENG.MPROG 6 5,691 22-11-16, 09:30 AM
آخر رد: مزنة
  [سؤال] حفظ سجل في جدولين منفصلين كنونو 5 459 25-09-16, 01:39 PM
آخر رد: كنونو
Lightbulb أريد كود البحث لبرنامج ترجمة (قاموس) Emad Nashaat 1 358 03-07-16, 12:27 PM
آخر رد: amer2000
Question [سؤال] سؤال في البحث بإستخدام Combo allayl 2 1,224 14-06-14, 01:23 AM
آخر رد: allayl
Sad [كود] محتاج كود البحث الداتا قريد ماجد الحربي2008 0 898 15-05-14, 05:50 AM
آخر رد: ماجد الحربي2008
Wink [كود] المساعد في كود البحث عن سنة معينة allayl 10 2,151 30-03-14, 12:43 PM
آخر رد: تركي الحلواني
  سؤال في البحث المبرمج الطموح 0 882 01-01-14, 12:14 PM
آخر رد: المبرمج الطموح
  [كود] مساعده في كود البحث marwa13 3 1,221 08-12-13, 10:21 PM
آخر رد: Aly El-Haddad
Question [مثال] المساعده في مثال إظهار نتيجة البحث في ليست allayl 3 1,337 04-10-13, 01:20 AM
آخر رد: ZOUZOU

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم