محمد طاهر عرفه قام بنشر نوفمبر 26, 2003 قام بنشر نوفمبر 26, 2003 المثال موجود فى قسم التقارير http://www.officena.net/ib/index.php?showtopic=1222 حيث أنه به نفس الخاصية للتقارير و المثال من هنا http://www.officena.net/ib/index.php?act=A...pe=post&id=6315 1 1
محمد طاهر عرفه قام بنشر نوفمبر 28, 2003 الكاتب قام بنشر نوفمبر 28, 2003 هنا سنتحدث عن فتح النموذج بالكود سواء بكامل السجلات او علي سجل محدد و هذا يتم باستخدام أمر Docmd.openForm و هذا الامر له ستة معاملات arguments نختار منها ما نريد و نترك ما نريد ليأخذ قيمته الافتراضية الجزء الأول هواسم النموذج المراد فتحه و نكتبه بين "" فيكون الحد الادني للجملة مثلا هو docmd.openForm "form1" و اذا بدأنا نكتب فى الفيجوال بيزيك فسيساعدنا ليذكرنا بمكونات كل جزء بعد كتابة الفاصلة التي تفصل بين الاجزاء المختلفة للجملة .. جرب كتابة فاصلة بعد الجزء الاول و ستري ما أقصد الجزء الثاني هو طريقة عرض النموذج بعد فتحه هل فى وضع العرض العادي ، أو وضع التصميم أو ورقة البيانات ... الجزء الثالث هو اسم فلتر معد مسبقا علي هيئة استعلام ، علي أن يحوي الاستعلام علي الحقول الموجودة فى النموذج الجزء الرابع الشرط و يكون علي هيئة [fieldname] = Forms![formname]![controlname on other form] و هو الجزء الذي استخدمناه فى المثال السابق بان رقم الموظف = رقم الموظف الموجود فى مربع النص فى النموذج الجزء الخامس يعبر عن طريقة فتح النموذج من حيث التعامل مع البيانات ، أي فتح النموذج فى وضعية التعديل أم الاضافة ام القراءة فقط الجزء الأخير طريقة فتح نافذة النموذج عادي - مخفي - Modal .. و الافتراضي هو عادي Normal و فى المثال عندما أردنا فتح النموذج بكامل سجلاته اختر خصائص الزر و من صفحة الاحداث ، اختر حدث عند النقر لتشاهد الكود و هو Dim stDocName As String Dim stLinkCriteria As String stDocName = "FrmMainEmp" DoCmd.OpenForm stDocName, , , stLinkCriteria و هي طريقة منظمة يستخدمها المعالج لاستخدام المتغيرات داخل الجملة كخطوة وسيطة و الكود السابق يناظر DoCmd.OpenForm "FrmMainEmp" حيث أن stLinkCriteria لم يتم اعطاؤه قيمة و علي العكس فى زر فتح نموذج علي موظف معين ، فقد تم تعيين قيمة للشرط stLinkCriteria Dim stDocName As String Dim stLinkCriteria As String stDocName = "FrmMainEmp" stLinkCriteria = "[EmpID]=" & Me![EmpID] DoCmd.OpenForm stDocName, , , stLinkCriteria اي انها تناظر DoCmd.OpenForm "FrmMainEmp", , , "[EmpID]=" & Me![EmpID] هذا حال كون حقل EmpID رقمي اما اذا كان نص فنضيف علامتي '' الي الجملة ، فتصبح DoCmd.OpenForm "FrmMainEmp", , , "[EmpID]='" & Me![EmpID] & "'" 1
الدكتور خضر الرجبي قام بنشر مارس 16, 2005 قام بنشر مارس 16, 2005 المواضيع المشابهة 1) 26/02/2005 تغيير عنوان النموذج حسب الزر الذي يفتحه 2) 19/01/2005 كيف أجعل النموذج هو البداية 3) 03/12/2004 شاشة لوجو للدخول تضم اسم المستخدم وكلمة المرور 4) 16/09/2004 نموذج وكلمة السر 5) 28/02/2004 النموذج لا يفتح فى وضع التعديل 6) 26/01/2004 فتح نموذج علي سجل محدد 7) 26/11/2003 فتح النموذج علي سجل محدد 8) 31/07/2003 تح النموذج على الاسم الذي نريده 9) 12/07/2003 تح النموذج عند أخر سجل تم إضافته أو تعديله
الردود الموصى بها