تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
البحث اكثر من مرة
#1
If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient

ساعات بعمل كذا بحث في نفس الوقت عن طريق combo اول مرة بتعمل بحث ثاني مرة تظهر رسالة خطا عند rs.close
فعايز كود لو
If rs.State = 1 Then rs.open
بس الكود ده في غلط اعمل ايه
الرد }}}}
تم الشكر بواسطة:
#2
تم عن طريق
Set rs = Nothing

شكرا جزيلا
الرد }}}}
تم الشكر بواسطة:
#3
باستعمال اداة داتا يمكنك عمل findfirst و findnext

ان كنت مهتما فسوف اضعها لك

كود :
Data1.Recordset.OpenRecordset
Data1.Recordset.FindFirst "[word]='" & Trim$(Text1.Text) & "'"
If Not Data1.Recordset.NoMatch Then
في حال الايجاد نفذ
else
في حالة عدم الايجاد نفذ
endif

Data1.Recordset.OpenRecordset
Data1.Recordset.FindNext "[word]='" & Trim$(Text1.Text) & "'"
If Not Data1.Recordset.NoMatch Then
في حال الايجاد نفذ
else
في حالة عدم الايجاد نفذ
endif
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طباعة الدرجة باللون الاحمر اذا كانت اكثر من 50 haiderkh 0 3 منذ 7 دقيقة مضت
آخر رد: haiderkh
  استفسار عن اضافة اكثر من صورة الي رقم واحد عمر سالم 0 5 منذ 13 دقيقة مضت
آخر رد: عمر سالم
  استفسار عن اضافة اكثر من صورة الي رقم واحد عمر سالم 0 6 منذ 23 دقيقة مضت
آخر رد: عمر سالم
  استفسار عن البحث في عدة حقول واربعه كمبوبكس alfakeehy 8 219 05-02-17, 07:39 PM
آخر رد: alfakeehy
Question [vb6.0] كيف انشي استعلام يظهر عدد نتايج البحث؟؟ Microformt 1 72 29-01-17, 09:33 PM
آخر رد: السيد الغالي
  [vb6.0] البحث في أكثر من جدول أيمن الفخراني 3 124 22-01-17, 03:03 PM
آخر رد: أيمن الفخراني
Question [vb6.0] اين المشكلة في برنامجي المرفق لا يظهر في البحث سوى سجل واحد؟؟ Microformt 7 183 16-01-17, 10:51 PM
آخر رد: عبدالله الصافي
Question [vb6.0] كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟ Microformt 2 171 14-01-17, 05:57 PM
آخر رد: Microformt
  [كود] طلب تعديل على كود البحث بأي حرف في حقلين الطايش 7 232 24-12-16, 01:29 AM
آخر رد: الطايش
  البحث عن صورة kafrnabl 0 108 07-12-16, 10:06 AM
آخر رد: kafrnabl

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


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