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

وضع نتائج البحث في مصفوفة

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

السلام عليكم

كيف أضع نتائج البحث في مصفوفة ( لاني اريد ان ابحث في جدول ومن ثم اقوم بالبحث عن النتائج من جدول آخر ) .. وشكرا

هل ينفع اكتب كذا

dim ar() as string
rs.open "select * from Table1"
ar=array(  for i = 0 to rs.recordser-1 & " & rs!name &",  next )

لا تضحكون على التوليفة :s

تم تعديل هذه المشاركة بواسطة المتميز في 28 أبريل 2005 في 22:57

460.gif

#2

جرب هالكود، برضو تأليف من راسي وما جربتو

dim ar() as string
rs.open "select * from Table1"
redim ar(rs.RecordCount)
for i = 0 to rs.RecordCount -1
ar(i) = rs!name
next

لا تحزن:

إن كنت فقيرا فغيرك محبوس في دين، وإن كنت لا تملك وسيلة نقل فسواك مبتور القدمين، وان كنت تشكوا من آلام فغيرك يرقدون على الاسرة البيضاء و من سنوات، وان فقدت ولدا فغيرك فقد عددا من الأولاد و في حادث واحد.

لا تحزن:

فأنت تشرب الماء الزلال، و تستنشق الهواء الطلق، و تمشي على قدميك معافى، و تنام ليلك آمنا.

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

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