تقرير فرعى متعدد المصدر

[jo_2010]

الخبراء الافاضل

كل عام وانتم بخير ومنتدنا الرائع بكل اعضاءة فى تمام الصحة والسعادة اعادة الله علينا جميعا هذة الايام بالصحة والسعادة

اريد عند الضغط على الزرالموجود بالنموذج Youssef

يفتح التقرير الخاص باسمة

مع العلم بان هناك تقارير كثرة  ولكل تقرير زر خاص بة

لكم خالص الشكر

 

LAB 2025.rar

تم تعديل منذ 13 ساعات بواسطه jo_2010

[jo_2010]

3 ساعات مضت, jo_2010 said:

الخبراء الافاضل

كل عام وانتم بخير ومنتدنا الرائع بكل اعضاءة فى تمام الصحة والسعادة اعادة الله علينا جميعا هذة الايام بالصحة والسعادة

اريد عند الضغط على الزرالموجود بالنموذج Youssef

يفتح التقرير الخاص باسمة

مع العلم بان هناك تقارير كثرة  ولكل تقرير زر خاص بة

لكم خالص الشكر

 

LAB 2025.rar 1.21 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 1 download

الخبراء الافاضل هل طلبى  ممكن تنفيذة ام مستحيل 

[محمد احمد لطفى]

تفضل أستاذ JO
 

    Me.Refresh
    DoCmd.OpenReport Screen.ActiveControl.Name, acViewPreview, , "[Pcode]=" & Me.PCode

 

[jo_2010]

55 دقائق مضت, محمد احمد لطفى said:

تفضل أستاذ JO
 

    Me.Refresh
    DoCmd.OpenReport Screen.ActiveControl.Name, acViewPreview, , "[Pcode]=" & Me.PCode

 

استاذى الفاضل كل سنة وانت طيب 

عيد سعيد 

اكتب اسم التقرير المراد فتحة فين فى الكود 

ممكن تطبق لي علي البرنامج المرسل 

خالص الشكر 

[منتصر الانسي]

تفضل جرب المثال بعد التعديل

LAB 2025.rar

[محمد احمد لطفى]

تفضل

LAB 2025.rar

[jo_2010]

4 ساعات مضت, محمد احمد لطفى said:

تفضل

LAB 2025.rar 1.21 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 3 downloads

عزيزى الفاضل 

الازرار تفتح التقارير  مباشرة  ولو يتم  فتحها داخل التقرير الرئيسى

لم يتم تحديد اسم  التقرير  MS_Report فى الكود الخاص بحضرتك

[jo_2010]

4 ساعات مضت, منتصر الانسي said:

تفضل جرب المثال بعد التعديل

LAB 2025.rar 78.39 kB · 5 downloads

استاذى الفاضل

شكرا لك على مساعدتى ولكن هل توجد طريقة اسهل من 

Select Case Me.OpenArgs
Case Is = Urine
MS_Sub.SourceObject = "1"
Case Is = Stool
MS_Sub.SourceObject = "2"
Case Is = Sugar
MS_Sub.SourceObject = "3"
End Select
MS_Sub.LinkMasterFields = "PCode"
MS_Sub.LinkChildFields = "PCode"

وذلك لان عدد التقارير كتيرة جدا

خالص الشكر

 

[منتصر الانسي]

2 ساعات مضت, jo_2010 said:

شكرا لك على مساعدتى ولكن هل توجد طريقة اسهل من 

Select Case Me.OpenArgs
Case Is = Urine
MS_Sub.SourceObject = "1"
Case Is = Stool
MS_Sub.SourceObject = "2"
Case Is = Sugar
MS_Sub.SourceObject = "3"
End Select
MS_Sub.LinkMasterFields = "PCode"
MS_Sub.LinkChildFields = "PCode"

وذلك لان عدد التقارير كتيرة جدا

التعديل المرفق يقوم بذلك ولكن يشترط ان يكون عنوان زر الامر مطابقا لاسم التقرير

LAB 2025.rar

[jo_2010]

خالص الشكر لابداعك

اكرمك الله