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

استفسار عن البحث

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

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

عندي استفسار وارجوا مساعدة الاخوان الافاضل

لدي قاعد بيانات ويتم الاتصال معها عن طريق الكود بتقنية ADO وعملت هذا الاستعلام

Rs.Open "select * from SarfRec where PartNum=2", Cn, adOpenDynamic, adLockOptimistic

هذا الاستعلام يرجع سجلات كثيرة وعندي في جدول SarfRec حقل اسمه DocNum

المطلوب أن أبحث عن السجل الذي قيمة DocNum له تساوي مثلا 6 ويبقى Rs محتفظاً بسجلاته

بصيغة أخرى (الذهاب إلى السجل الذي قيمة DocNum له تساوي مثلا 6)

ماعرفت كيف أعمل هذا :D

هل من مساعدة يا اخوان

تم تعديل هذه المشاركة بواسطة هــــ برمجة ــــاوي في 7 يونيو 2009 في 20:56

=================================================================

[وسط]فَإِذَا عَزَمتَ فَتَوَكَّل عَلَى اللَّهِ إِنَّ اللَّهَ يُحِبُّ المُتَوَكِّلِينَ

=================================================================[/وسط]

#2

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

هناك طريقة سهلة لكنها غير عملية وهي أن تقوم بالمرور على جميع السجلات كالتالي :

rs.moveFirst
Do Until rs.EOF
	 If rs![DocNum]=6 Then 
		' Do anything you want here
	 End If
	 rs.MoveNext
Loop

أو يمكنك استخدام الدالة find :

rs.Find "DocNum=6"

ADO data control and FIND

سبحان الله وبحمده ... سبحان الله العظيم

#3

مشكور ويعطيك الله ألف عافية

=================================================================

[وسط]فَإِذَا عَزَمتَ فَتَوَكَّل عَلَى اللَّهِ إِنَّ اللَّهَ يُحِبُّ المُتَوَكِّلِينَ

=================================================================[/وسط]

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