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

كارثة حقيقية استفسار له اكثر من شهر ولا اي رد

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

الاخوة الاعزاء كيف اجعل البحث في الحقول الثلاثة في نفس الوقت

F1

F2

F3

هذا الكود للبحث في حقل واحد وهو (F1) كيف اجعل البحث في الحقول الثلاثة (F3)(F2)(F1) في نفس الوقت

السطر الاول للبحث بكامل الكلمة

السطر الثاني للبحث باول الكلمة

السطر الثالث للبحث باخر الكلمة

السطر الرابع للبحث باي جزءالكلمة

If Combo1.ListIndex = 1 Then
       If Option1.Value = True Then
           RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '" & Trim(Text77) & "'", db, adOpenStatic, adLockPessimistic
       End If
       If Option2.Value = True Then
           RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '%" & Trim(Text77) & "';", db, adOpenStatic, adLockPessimistic
       End If
       If Option3.Value = True Then
           RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '" & Trim(Text77) & "%';", db, adOpenStatic, adLockPessimistic
       End If
       If Option4.Value = True Then
           RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '%" & Trim(Text77) & "%';", db, adOpenStatic, adLockPessimistic
       End If
   End If
#2

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

من قلت ان لك فوق شهر ما احد حل لك المشكلة احس اني فهمت سؤالك غلط لكن جرب :o

rs.Open " select * from [workers] where [f1]='" & Trim(Text77) & "' or [f2]='" & Trim(Text77) "' or [f3]='" & Trim(Text77) & "'",db , adOpenStatic, adLockOptimistic

طبعا بامكانك استبدال OR بـ AND

تم تعديل هذه المشاركة بواسطة المتميز في 18 أبريل 2005 في 21:15

460.gif

#4

الف شكر بس انا اريد تعديل جميع سطور الكود

السطر الاول للبحث بكامل الكلمة

السطر الثاني للبحث باول الكلمة

السطر الثالث للبحث باخر الكلمة

السطر الرابع للبحث باي جزءالكلمة

اليكم المطلوب بالتحديد

Moduleالمطلوب بالتحديد.rar

#5

ما الفرق بين سطر وعدة سطور ؟؟!

جرب الملف المرفق

تم تعديل هذه المشاركة بواسطة المتميز في 19 أبريل 2005 في 00:24

460.gif

#6

الملف المرفق

Module1.rar

460.gif

#8

تم إغلاق الموضوع نظراً لمخالفته لقوانين المنتدى ..

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

لا أعرف ما الذي تقصده بقولك " كارثة حقيقية " فأنا لا أرى أي كوارث، والحمد لله الأمور تسير على ما يرام ..

نرجو من جميع الأعضاء التقيد بالقوانين ..

يجب أن يكون عنوان الموضوع دالاً على محتواه ..

ani.gif

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

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

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

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

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

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