• 0
Guest فرج إبراهيم عاشور

المطلوب تغيير مصدر Record Source من النموذج برمجياً

سؤال

أخواني أخواتي الإعزاء

 

مرتادي  المنتدى  السلام عليكم ورحمة الله

 

الرجاء من سيادتكم التكرم  بإعلامنا بطريقة تغيير مصدر البيانات في النموذج الرئيسي برمجياً حسب السنة الحالية ، بمعنى أخر أريد فتح النموذج عندما أكون في سنة 2013 بمصدر بيانات Emport_Doc2013 ، وعندما أدخل لسنة سابقة ولتكن 2012 أريد عند فتح النموذج بمصدر بيانات Emport_Doc2012، وهكذا.

 

وتقبلوا مني فايق الاحترام

 

 

مرفق ملف للتعديل

رقم المستخدم وكلمة السر (111111)

 

GECOL.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

3 إجابة على هذا السؤال .

  • 0

الأخ الفاضل
السلام عليكم ورحمة الله وبركاته
الكود التالي يقوم بتغيير مصدر بيانات النموذج وقت التشغيل ويفترض الأتي
أن لديك مربع نص علي نفس النموذج تقوم بأدخال السنة به وهو في هذه الحالة
text0
If Me.Text0 = "2012" Then

ونستخدم الخاصية
recordsource
ونقوم باسناد الجدول المناسب لها في وقت التشغيل

وبمعني أخر في حالة سنة 2012 أختار مصدر البيانات للنموذج جدول1
وفي حالة سنة 2013 أختار مصدر البيانات للنموذج جدول2

Private Sub Command2_Click()If Me.Text0 = "2012" ThenMe.RecordSource = "table1"ElseIf Me.Text0 = "2013" ThenMe.RecordSource = "table2"Else' no thing to doEnd IfEnd Sub


وبالتوفيق

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

مشكور أخي azouzeg

 

مجهود طيب ومشكور عليه ، جاري تجربته وسأوافيك بالنتائج في كلا الحالتين

 

والسلام عليكم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

مشكور أخي azouzeg

 

تمت التجربة بنجاح وتفوق ، بارك الله فيك وجزاك الله عنا كل خير

 

أخوك فرج عاشور

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .