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

طلب جملة بحث

مغلق
بدأه seaprince46 في 3 أغسطس 2006 · 7 رد · 675 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

إخواني الكرام عندي قاعدة بيانات تحتوي على عدة حقول والمهم منها حقل

التاريخ

والإسم مثلا

في البرنامج إستخدمت ال ADO في الربط

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

يعني 3 شروط في جملة البحث

يكون محدد فيها الفترتين والإسم

أرجو الإفادر ولكم جزيل الشكر

essam.gif

منتديات كوكب الكمبيوتر

لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية

http://www.planetss.com/vb

#2
BSMR.gif

السلام عليكم

أخى الكريم يمكنك أستخدام جمل sql

select * from tabel where tdate between #" + a + "# and#" + b  + "# and name = "name"

حيث ان tabel هو اسم الجدول

a وb ا التاريخ الأول والثانى

name الأسم المراد البحث عنه

جرب اخى الكريم وأخبرنى بالنتيجه

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

#3

اخي الكريم مشكور على الرد السريع

لكن للأسف جربت الطريقه ولم تفلح تظهر رساله Type mismatch

	Adodc2.RecordSource = "select * from T1 where Date between #" + DTPicker1 + "# and#" + DTPicker2 + "# and Status = Combo4.Text;"

تم تعديل هذه المشاركة بواسطة seaprince46 في 3 أغسطس 2006 في 15:06

essam.gif

منتديات كوكب الكمبيوتر

لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية

http://www.planetss.com/vb

#4

جرب الكود بهذه الصوره

Adodc2.RecordSource = "select * from T1 where Date between #" + DTPicker1 + "# and#" + DTPicker2 + "# and Status = '" & Combo4.Text & "'"

ولو فى مشكله مره أخرى ارجو إرفاق البرنامج للتعديل عليه

تم تعديل هذه المشاركة بواسطة GENIUS-IT في 3 أغسطس 2006 في 15:45

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

#5

أخي الكريم أشكر لك تعاونك

لكن مازالت المشكله قائمه

هذا البرنامج مرفق أرجو التعديل عليه

إذا إلى فورم Search

المطلوب تحت الزر Command2

مع إختيار ال Request Date

وال Status

test.zip

تم تعديل هذه المشاركة بواسطة seaprince46 في 3 أغسطس 2006 في 17:55

essam.gif

منتديات كوكب الكمبيوتر

لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية

http://www.planetss.com/vb

#6

السلام عليكم

استخدم & بدل + بين النص والتاريخ

نفس مثال الأخ ولكن & بدل +

Adodc2.RecordSource = "select * from T1 where Date between #" & DTPicker1 & "# and#" & DTPicker2 & "# and Status = '" & Combo4.Text & "'"

تم تعديل هذه المشاركة بواسطة Mo7eb_Alrasool في 3 أغسطس 2006 في 18:47

سبحانك اللهم وبحمدك أشهد ان لا اله الا أنت

أستغفرك وأتوب اليك

الهم صلي وسلم وبارك على سيدنا وحبيبنا محمد

#7

السلام عليكم

أخى الكريم هذا هو المثال بعد التعديل

لكن الداتا ريبورت لم تعمل عندى يمكنك تجربتها للتأكد منها

test2.rar

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

#8

شكرا لكم إخواني الكرام على مجهودكم الرائع

وجزاكم الله الف الف خير

كل شي تمام التمام

تم تعديل هذه المشاركة بواسطة seaprince46 في 3 أغسطس 2006 في 21:25

essam.gif

منتديات كوكب الكمبيوتر

لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية

http://www.planetss.com/vb

هذا الموضوع مغلق.

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