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

مشكلة غريبه مع MSHFlexgrid

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

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

صممت نموذج للبحث المخصص في برنامجي ..

حيث يمكن من البحث من خلال اسم الحقل المختار وكذلك مدى التطابق ( يبدأ بـ ، ينتهي بـ ، مطابق ، يحتوي على )

واريد عرض البيانات على أداة MSHFlexGrid ...

والأكواد تكون بالصورة التالية :

rs.Open "Select * From Table1 Where Name =Function"

Set MSHFlexGrid1.DataSource = RS

ولكن هناك رسالة خطأ عجيبه تظهر عند السطر الأخير ، هذه هي :

post-25732-1112860426_thumb.jpg

فهل من يجيبني على هذا السؤال الذي حيرني لأنني استخدم جمل لغة SQL مع هذه الأداة دون مشاكل عادة ولكنها هنا عملت مشكلة لم اتمكن من حلها :(

#2

اول شي حاول ترسل مثال

يمكن المشكله 'NAME' محتاج''

الله معاك

<< CLICK TO START>>

post-41869-046528000%201305052277.jpg

ليس أن تجد حلا بل أن تجد الافضل

أن تصـــنع الخـيال هذا هوا الأفضل</span>

#3

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

أخى العزيز فنكشن

من أسباب سعادتى أن نلتقى كثيرا ومن حسن حظى أن يكون مع الفليكس جريد

لقد استخدمت فى مثالك الـ MSHFlexGrid وهذا جيد لأن لها خاصية RecordSet

لو أنت واثق من أن ناتج الاستعلام صحيح استخدم الكود التالى

rs.Open "Select * From Table1 Where Name =Function"

Set MSHFlexGrid1.RecordSet = RS

وأن شاء الله تتحل مشكلتك

ولو لم يظبط - لا قدر الله - اشرح لى قصدك من Function اللى فى الاستعلام السابق

يسر الله لنا و لك كل أمر عسير

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#4

اهلا بك اخي العزيز

في الحقيقة تسرني رؤيتك انا ايضا ...

بالنسبه للكود فهو نفس ما وضعته والجدول والسجل موجودان !!!

ما اقصده بـ Function هو إسمي فحسب !!!! يعني يمكن استبدالها بـ Mohd او Ahmed او غيرها ...

بالانتظار اخي العزيز

#5

أخى فنكشن

هل لاحظت أنى استبدلت كلمة DataSource عندك بكلمة RecordSet ؟

سبب الاعتراض أن الجريد لم تقبل منك الارتباط بالأسلوب الذى ذكرته.

والله الموفق

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#6

عفوا اخي العزيز فأنا لم انتبه الى الفرق فاعذرني ...

وبخصوص الكود ككل للأسف فنفس الرسالة لا تزال تظهر !!!

اخي العزيز كما اخبرتك بالنسبه لكلمة Function فيمكنك استبدالها بما تريد Ahmed و arabteam واي اسم حيث انها هي ما يبحث عنه الاستعلام ...

#7

أخي استخد نفس الجملة مع وضع الحاصرتين الفرديتين 'function'

جرب

#8

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

الاخ الفاضل ناصر ؛

بخصوص وضع حاصرتين فماذا افعل اذا كانت الكلمة الموضوعه للمعيار في جملة SQL هي متغير !!! في العادة تعمل ولكن لالا اعرف لماذا لم تنجح الطريقة هنا ! على الرغم من وجود قيمة لـكــــلمة معيار البحث ...

ارجو المساعده

#9

أخي فنكشن

إذا كانت لمتغير خارجي فتفعل التالي

أولا : إذا كانت رقم فتكتب بهذا الشكل

         where col = " & function

ثانيا : إذا كانت قيمة المتغير نص فتكتب كالتالي :

          & where col = ' " & function " ' "

جرب

تحياتي لك

ملاحظة : لو الأخت بور جيرل تضع صورة أصغر من هذه الموجودة في توقيعها يكون افضل لأن الرد السريع في كل المواضيع المشاركة فيها لا يظهر بصورة جيدة

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

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