السلام عليكم
لو سمحتو انا عندي مشروع تخرج
فكرتو اني اربط الداتا بيز بالفيجوال(هذه النقطه انا اعرفها)
الداتا بيز الي عندي فيها اسئله وخيارات
اريد انا اعرف كيف استطيع ربط option bottun بحقول الاجابات بالداتا بيز .
الله يعافيكم ساعدوني
كيف اتعامل مع الداتا بيز بالفيجوال
مغلق
أنا حاليا أصمم برنامج مسابقات (أسئله و 3 اجابات) والسؤال في label ومن الطبيعي أن تكون الاجابات في option وبعد ذلك وجدت أنها لا تدعم قواعد البيانات فقمت بعمل خدعه وهي اني وضعت ال label الأمام ال option ليبدو أن النص الموجود بال label وكأنه الخاص بال option ,وطالما ال label يدعم قواعد البيانات فبذلك نكون قد حللنا المشكله ولكن ذلك يمكن أن يحتاج الي تغيير في قاعدة البيانات لتلائم ذلك التغيير!!!!!
:lol: :lol: :lol: أظن أنها فكره عبقريه صح من عمو حزووم :lol: :lol: :lol:
أرجو تجربة الطريقه واخباري أنها نفعت ان شاء الله ...
هي فعلا فكرة عبقرية لكن لها عيب صغير جدا انها فكرة تودي في داهية و العملية بسيطة ايه يعني المشكلة انا مش فاهم؟
هو انت يعني لازم تربط الربط اللي في دماغك، ما تخلي مخك ستاتيك و عقلك ديناميكي
لما نيجي نظهر البيانات مثلا بكل بساطة نعمل كالاتي
Private Sub showdata()
' to show the current record
txtname.Text = rs("name")
txtjob.Text = rs("job")
txtsalary.Text = rs("salary")
txttax.Text = rs("tax")
If rs("kind") = "ذكر" Then optmale.Value = True
If rs("kind") = "أنثي" Then optfemale.Value = True
End Subأو لما نعمل حفظ نعمل برده كده
rs("name") = txtname.Text
rs("job") = txtjob.Text
rs("Salary") = txtsalary.Text
rs("tax") = txtsalary.Text * 0.2
If optmale.Value = True Then rs("kind") = "ذكر"
If optfemale.Value = True Then rs("kind") = "أنثي"
rs.Updateيا رب تكون الفكرة واضحة
تم تعديل هذه المشاركة بواسطة romantic_boy في 13 أبريل 2005 في 01:40
Oracle 10G Certified Professional Developer.
عودة بعد 3 سنوات غياب، ان شاء الله سوف اتكلم معكم قريبا احبائي
عمو حزوووم فكرتك حلوووه
وومكن اصمم انا tool بال active x واحل المشكله B)
romantic_boy
مافهمت الفكره
ياليت ترجع تشرحهاا بالتفصيل :)
تحياتي لكم
romantic_boy
بس حبيت اوضح لك شي
انو برنامجي يختار الاسئله عشوائي يعني ماراح اقدر اسوي كود اخليه يربط لي OPTION بالاجوبه بالداتا بيز
تحياتي لك
السلام عليكم ورحمة الله وبركاتة
أخى السائل لو عندك مثال للتعديل نوكن لك من الشاكرين
{يَا أَيُّهَا النَّاسُ اتَّقُوا رَبَّكُمْ إِنَّ زَلْزَلَةَ السَّاعَةِ شَيْءٌ عَظِيمٌ }الحج1
السلام عليكم ورحمة الله وبركاتة
أخى السائل لو عندك مثال للتعديل نوكن لك من الشاكرين
{يَا أَيُّهَا النَّاسُ اتَّقُوا رَبَّكُمْ إِنَّ زَلْزَلَةَ السَّاعَةِ شَيْءٌ عَظِيمٌ }الحج1
اعتقد ان ما فيش حاجه اسمها مستحيل كل شئ ممكن مع الفيجوال بيسك
اخي العزيز ...
الطريقة تكون باختبار اي الادوات الـ Option تم تحديدها ( اي Value تساوي True ) ومن ثم مقارنتها بقيمة حقل مخصص لتحديد اي الاجابات هي الصحيحه ..
ارجوا ان الطريقة واضحه ..
[/وسط]
راح اشرحلكم البرنامج بطريقه مبسطه
البرنامج هو اسئله لتحديد المستوى
الداتا بيز تحتوي على حقل (السؤال,الاجابة 1, الاجابة 2, الاجابة 3, الاجباة الصحيحه )
في الفيجوال بيسك (سوف اقوم بوضع فورم تحتوي على label لربطها بحقل السؤال الموجود بالداتا بيز ... وكذلك ربط ال option بحقول الاجابات لكن المشكله انا الoption لاتوجد به خاصيه الربط بالداتا بيز )
وكذلك انو برنامج يحتوي على 500 سؤال راح يختار بشكل عشوائي 100 سؤال كل مره لذلك لا استطيع تعبئة الoption من الفيجوال .
B) أرسلي المشروع وقاعدة البيانات وسوف أحلهالك ان شاء الله تعالي في ثانيه B)
اقترح عليك التالي
1 - في الجدول ضعي الحقول التالية
رقم السؤال .... اجابة1 ....... اجابة2 .....اجابة3.....الصحيحة
وعند اختيار السؤال تظهر بيانات السؤال في label ولإظهار الاجابات في الزرار استخدمي عنوان الزر كالتالي
option1.caption = rs!ans1 option2.caption = rsans2 طبعا يكون الزرخالي من العنوان وحجمة على مقدار النص
وطبعا يتم البحث برقم السؤال ومن ثم تعبئة السؤال والاجابات بهذه الطريقة
وعند الاختيار يكون في الحقل ( الاجابة الصحيحة تضعي فيها رقم الاجابة الصحيحة ومن ثم تبدا المقارنة
جربي ذلك
والا قولي واضع لك مثال
اخوك ناصر
سبحان الله MCP,MCSA,MCDBA,MCSE,MCTegyptian in Dammam----------------------------------------------------مواضيعي بالمنتدي أنشأ مشروعك بالفيجوال بيسك 6كتاب أنشأ مشروعك بالفيجوال بيسك كامل pdfكل ما يتعلق بدوال التاريخالمستخدمون والصلاحيات في برنامجك
ناصر مشكور
بس ياليت توضح لي اكثر
انا زي ماقولت انا راح احدد 100 سؤال مثلا لكن البرنامج يختارهت عشوائي من اصل 500 سؤال
هذا الموضوع مغلق.