طباعة ومعاينة التقرير من نموذج فرعي داخل نموذج رئيسي حسب الرقم الوظيفي

[sm44ms]

Cmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]=[Forms]![ETSALATFORM]![EMID]"

جربت الكود لم يعمل معي

اسم التقرير

ETSALATSIM_REPORT3  

اسم النموذج الفرعي

ETSALATFORM

اسم النموذج الرئيسي

ETSALATSIMCARDFORMTEST

اسم الحقل للرقم الوظيفي في الفرعي

EMID

اريد معاينة السجل الحالي فقط بناء على الرقم الوظيفي

 

تم تعديل يونيو 25, 2024 بواسطه sm44ms

[jjafferr]

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

 

جرب

في حال كان
EMID نص
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]='" & [Forms]!ETSALATSIMCARDFORMTEST![ETSALATFORM]![EMID] & "'"



في حال كان
EMID رقم
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]=" & [Forms]!ETSALATSIMCARDFORMTEST![ETSALATFORM]![EMID]

 

تم تعديل يونيو 25, 2024 بواسطه jjafferr
تم تعديل اسم النوذج الرئيسي

[sm44ms]

من نموذج رئيسي

ETSALATSIMCARDFORMTEST

[jjafferr]

العفو

انا اخطأت في كتابة اسم النموذج الرئيسي في المشاركة السابقة ، وقد تم التعديل عليها الآن ،

اما اذا كان الحقل EMID في النموذج الرئيسي ، فيصبح الكود:

EMID نص
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]='" & [Forms]!ETSALATSIMCARDFORMTEST![EMID] & "'"



في حال كان
EMID رقم
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]=" & [Forms]!ETSALATSIMCARDFORMTEST![EMID]

 

[sm44ms]

اشكرك على وسع صدرك

الطباعة بتكون من نموذج فرعي داخل نموذج رئيسي هنا الهذف حسب الرقم الوظيفي مثلما شرحت في اول رسالة لي

لني جربت الكود  

[jjafferr]

اخي الفاضل

 

انا هنا اجمع مشاركاتي السابقة في مكان واحد ، لمعاينة التقرير حسب قيمة الحقل EMID ،

اذا كان الزر في النموذج الفرعي:

في حال كان
EMID نص
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]='" & [Forms]!ETSALATSIMCARDFORMTEST![ETSALATFORM]![EMID] & "'"


في حال كان
EMID رقم
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]=" & [Forms]!ETSALATSIMCARDFORMTEST![ETSALATFORM]![EMID]

.

واذا كان الزر في النموذج الرئيسي:

EMID نص
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]='" & [Forms]!ETSALATSIMCARDFORMTEST![EMID] & "'"


في حال كان
EMID رقم
doCmd.OpenReport "ETSALATSIM_REPORT3", acPreview, , "[EMID]=" & [Forms]!ETSALATSIMCARDFORMTEST![EMID]

 

[sm44ms]

اشكرك الف شكر اخي