الحصول على نتيجة الاستعلام ؟؟؟؟

كما أرى و الله أعلم أنه لاداعي للأسطر الأربعة الأخيرة و بدلاً عنها أكتب :

dim Adp as OleDbDataAdaptor,Ds as New Dataset
Adp=new OleDbDataAdaptor(Mysql,MyConnection)
Adp.fill(ds)
Datagrid1.datasource=ds.tables(0)

اخي العزيز ،

هناك خطأ في الكود الذي وضحته ، فإنك استخدمت الطريقة ExecuteNonQery بينما الأمر الذي تريده يحتوي على استعلام Query ، فالطريقة السابقة تنفذ اوامر من قبل : insert , delete , update بينما نستخدم الطريقة ExecuteReader او الطريقة ExecuteScale لتنفيذ استعلامات select .

ان الطريقة التي شرحها عمر العمودي صحيحة ، و توجد طريقة اخرى كالتالي :

dim Rdr as New OleDbDataReader = cmd.ExecuteReader

Do while Rdr.Read

msgbox ( Rdr.Item("FiledName"))

Loop

و بهذه الطريقة يمكن تغيير بدل دالة المسج بوكس ، يمكن تبديلها بأسم متغير لحفظ بيانات من قاعدة البيانات .

تحياتي

شكراً لكم أخواني ، شكراً جزيلاً على التوضيح (f)(f)

اعذروني على أسئلتي اللامنتهية و لكن عندي سؤال جديد

هل من الممكن إجراء استعلامين في نفس الوقت ، ما أقصده بالضبط هو بينما أسحب نتائح الاستعلام الأول سجلاً سجلاً ، فبناءً على السجل الحالي أستدعي استعلام آخر مرتبط به بطريقة ما ، لأنه عندما أستخدم OleDbDataReader مرتين فتظهر لي رسالة بأنه يجب علي إغلاق أحدهما أولاً ، فما الحل برأيكم

شكراً لكم كثيراً