السلام عليكم ورحمه الله وبركاته،،
قمت بوضع مساعدة في المنتدى في السابق وقامت بمساعدتي الاخت زهرة حفظها الله. ولكن عند نقل النموذج والحاقة الى قاعدة البيانات التي اعمل عليها ظهرت المشكلة
الكود الذي قامت الاخت زهرة بعملة هو
Private Sub Combo90_AfterUpdate()
Dim xDate
xDate = DMax("[datex]", "std", "[external_teacher]=" & Me.Combo90)
MsgBox " آخر تاريخ للمناقشة " & Me.Combo90.Column(1) & " كان بتاريخ " & xDate, vbInformation, "تنبيه"
End Sub
عندي نموذج من خلاله اقوم بتشكيل لجنة للطالب من ضمن هذه اللجنة يجب تحديد مناقش خارجي
بحيث يأخذ اسم المناقش من قائمة منسدلة ومربوطة من جدول الاستاذ الخارجي
المطلوب
- بعد اختيار اسم المناقش الخارجي من نموذج تشكيل لجنة يظهر لي رسالة تفيد بآخر تاريخ تم الاستعانة بهذا الدكتور.
مع العلم ان كل التواريخ للمناقشين موجودين في جدول std.
الموضوع السابق///
ملاحظة /// مرفق قاعدة بيانات مصغرة .. فيها نموذج تشكيل لجنة (الحقل المطلوب العمل عليه مشرف خارجي)
