منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[ تمّ الحل ] : إضافة كومبوبوكس للبحث بحقل معيّن - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [ تمّ الحل ] : إضافة كومبوبوكس للبحث بحقل معيّن (/showthread.php?tid=18780)

الصفحات: 1 2


[ تمّ الحل ] : إضافة كومبوبوكس للبحث بحقل معيّن - عبد العزيز البسكري - 12-01-17

السّلام عليكم و رحمة الله و بركاته
إخواني الأكارم .. لو سمحتم بما استطعتم به و قدّركم الله عليه المساعدة بتصحيح هذا الاختلال .. أحاول جاهدًا على التصحيح بنفسي حسب إمكانياتي البسيطة لكني يوميًا أكتشف و أتوصّل لمفاجآت غير سارة ..رغم انّي دائمًا أعمل بطريقة واحدة و أكواد واحدة هي نفسها بكل ملفاتي حتي لا تختلط عني الأمور
الملف يعمل بدون كومبوبوكس و لواحقها من أكواد بشكل مميّز و ممتاز وهو نفسه الموضوع بقسم الأمثلة و المشاريع
قمت بمحاولة إضافة كومبوبوكس ليتم الإختيار منها بحقل " العنوان " .. تظهر بها البيانات بشكل جد عادي و عندما أضغط على الكومبو لتغيير العناوين تتغيّر البيانات داخل التاكسات .. إلى هنا كل شيء يسير على أحسن وجه و لله الحمد و الشّكر
حاولت عند الضغط على الكومبو تتغير البيانات كذلك داخل الفليكس جريد مع التاكسات .. فقمت بإضافة السّطرين في حدث الكومبو 1 كليك :
View_Records
DrawFlex
لكن سارعتُ بحذفهما واستغنيت عن ظهور البيانات داخل الفليكس عن طريق الكومبو لأنّي أصبحت غير قادر على إضافة سجل جديد
إشكاليتي هي عند كتابة هذا السّطر في الفورم لود Get_Name 
عند كتابته يحدث خلل في الإضافة و التعديل ...إلخ لكن لست أدري ماذا افعل لأنّه لابدّ من كتابته لكي تمتليء الكومبو ببيانات الحقل " العنوان "
هذا مثال للإختلالات .. عدد السجلات عندي هو 8 و أردت مثلاً إضافة سجل تاسع جديد
بالتاكست 1 يظهر الرقم 9 هذا صحيح لكن لو لاحظتم داخل الفليكس تجدون فقط عدد 2 من السجلات ..

إخواني الأفاضل لو سمحتم و سمحت ظروفكم و أوقاتكم بالنظر في الملف فضلاً لا أمرًا
فائق إحتراماتي



RE: إضافة كومبوبوكس للبحث بحقل معيّن - larbihamri - 12-01-17

اخي عبد العزيز 
على حسب فهمي انك تريد البحث بالكمبوبوكس
الملف المرفق يبين الطريقة


RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبد العزيز البسكري - 12-01-17

السلام عليكم و رحمة الله و بركاته
بارك الله فيك أخي العربي على نيّة المساعدة
جزاك الله خير الجزاء و زادها بموازين حسناتك إن شاء الله
ألف شكر على الملف الذي سأثري به معلوماتي
ليست المشكلة أخي الكريم في البحث بالكومبوبوكس
البحث بالكومبوبوكس بملف منفصل عن ملفي الذي بالمرفقات أعلاه بإمكاني عمله و الحمد لله
المشكلة عند ‘ضافة الكومبوبوكس إلى الملف تتعطّل أزرار الإضافة و التعديل و بيانات عدد السجلات
لو حذفت فقط السطر الذي بالفورم لودْ Get_Name يرجع كل شيء و كل الأزرار تشتغل عادي
فائق تشكراتي واحتراماتي



RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبدالله الصافي - 13-01-17

اخي الكريم ليس المشكلة بسطر Get_Name
المشكلة تظهر بعد عمل كليك للكومبوبوكس
وذلك بسبب انك تقوم بعمل بحث بالعنوان فتحجم عدد صفوف فليكس جرايد
ولظهور جميع السجلات مرة اخري ضع ذلك الكود في زر الاضافة

If RS.State = adStateOpen Then RS.Close
RS.Open "SELECT * FROM [Users] "
With RS
If .RecordCount > 0 Then
Text1.Text = RS![ÇáÑÞã] & ""
Text2.Text = RS![ÇáÇÓã] & ""
Text3.Text = RS![ÇááÞÈ] & ""
Text4.Text = RS![ÇáÚäæÇä] & ""
Text5.Text = RS![ÇáãÓÊæì] & ""
End If

End With


RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبد العزيز البسكري - 13-01-17

السّلام عليكم و رحمة الله و بركاته
ألف شكر أخي الكريم " عبد الله الصافي " على المساعدة
جزاك الله خير الجزاء و عوّضك عنها بمليون حسنة إن شاء الله
أدعو الله بهذه الليلة .. ليلة الجمعة المباركة أن يجعلها صدقة جارية لك
أخي الكريم حتى بوضعي هذا الكود بقيت بعض الاختلالات بالملف طبعًا فقط بعد إضافة الكومبوبوكس
بنفس الوقت الذي أدرجت به الكود قمت بمغامرة وتقريبا مشى الحال بها ..
جرّبت عزل الكومبوبوكس بأكواد إتّصال خاصة بها وغيّرت طبعًا RS و DB إلى RSS و DBB
الآن كل الأمور تسير على ما يرام بقيت لي فقط إشكالية وحيدة و أخيرة وهي عند إضافة سجل جديد لا يظهر بالكومبوبوكس إلاّ بعد ما أخرج من الفورم و أعيد التشغيل مرة أخرى ..عملية تحديث لو تمكنت أخي الكريم فضلاً لا أمرًا مساعدتي على ذلك
جربت وضع الكود الخاص بالكومبو بكل مكان ولم افلح أبدًا
بارك الله فيك مرة أخرى أخي الفاضل
فائق إحتراماتي




RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبدالله الصافي - 13-01-17

ضع بعد عملية حفظ السجلات هذا الكود لادراج العنوان الجديد للكومبو
Combo1.AddItem Text4


RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبد العزيز البسكري - 13-01-17

أخي الكريم " عبد الله الصافي " لم أفهمك جيدا لكن حاولت تطبيق ما ذكرته لي حسب الصورة المبيّنة فلم اتحصّل على الاسم المطلوب ..السطر وضعته بنهاية زر الأمر رقم 2 المخصّص للحفظ
إحتراماتي




RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبدالله الصافي - 13-01-17

كما بالصورة اخي الكريم


RE: إضافة كومبوبوكس للبحث بحقل معيّن - عبد العزيز البسكري - 13-01-17

السّلام عليكم و رحمة الله و بركاته
لم أجد أخي الفاضل العبارة اللائقة بمقامك سوى جزاك الله خيرًا و زادها بموازين حسناتك و زادك من علمه و فضله و جعلك ذخرًا و فخرًا لمنتدانا العريق بصفة خاصّة و لكل العرب أجمعين بصفة عامّة و نفع بك الاسلام و المسلمين
قد تحقّق المطلوب مئة بالمئة و الحمد لله
بارك الله فيك و لك و لكل العائلة الكريمة أخي الغالي ..



RE: [ تمّ الحل ] : إضافة كومبوبوكس للبحث بحقل معيّن - عبدالله الصافي - 13-01-17

جزاك الله كل خير
وزادك من علمه وفضله

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

الخلاصة
اهم شيء عندي ليس الكود
المهم اكون علي علم بخط سير عمل البرنامج

وفقك الله ونفع بك