تعديل في الكود الاتي الخاص بترقيم التقرير

[شامل2]

السلام عليكم

مثال يحتوي على ترقيم التقرير عند كل عملية  - معاينة قبل الطباعة

ارجو تعديل الكود الذي يرقم التقرير عند - طباعة التقرير

الكود هو:

" DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]=forms!Name_All!Num

المثال المرفق

رقم لكل تقرير.rar

[jjafferr]

السلام عليكم 

 

المعادلة على كون Num رقم او نص:

رقم
DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]=" & forms!Name_All!Num

نص
DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]='" & forms!Name_All!Num & "'"

 

 

جعفر

[شامل2]

32 دقائق مضت, jjafferr said:

السلام عليكم 

 

المعادلة على كون Num رقم او نص:

رقم
DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]=" & forms!Name_All!Num

نص
DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]='" & forms!Name_All!Num & "'"

 

 

جعفر

الاخ جعفر

هل يمكن تطبيقها على المثال المرفق لانها لم تكمل المطلوب

[شامل2]

المشكلة بقيت على حالها ولم نصل الى الحل

[jjafferr]

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

 

لأن Num حقل رقمي ، الكود الصحيح هو (لاحظ ، لا توجد مسافة فاضية في نهاية السطر من اليمين):

DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]=" & Forms!Name_all!Num

او

DoCmd.OpenReport "Name_All", acViewPreview, , "[Num]=" & Me.Num

 

جعفر

277.ترقيم.mdb.zip

[ابوخليل]

السلام عليكم

اخونا الشمال يريد الترقيم عند الطباعة فقط  وليس عند المعاينة

اظن ان الكود سليم مافيه شي

هل هذا صحيح ؟

 

[شامل2]

بالفعل استاذ ابو خليل

الذي اريده هو  ترقيم التقرير عند الطباعة ويس عند المعاينة

والكود لا يعمل بالشكل الصحيح

لانه عند معاينة التقرير لاكثر من مرة سوف يزداد الترقيم في كل مرة وهذا لا اريده

الذي اريده هو ان الترقيم يحدث فقط عند طباعة التقرير او ارساله الى الطابعة

تم تعديل فبراير 13, 2016 بواسطه alshamal

[jjafferr]

 

13 دقائق مضت, alshamal said:

بالفعل استاذ ابو خليل

 

يا رجال ، مب الكل يفهمها وهي طايرة ، ترى احنا على قدنا 

لو من البداية شرحت شوي زيادة ، وبالخصوص مع هالصورة ، لكان السؤال واضح جدا 

 

الطريقة الاسهل اللي تيجي على بالي هي انك لا تسمح بمعاينة التقرير ، وانما تطبعه مباشرة (وفي الواقع المعاينة مهمة لأغراض معينة ، ولكن لمعظم التقارير ، فيجب طبعها مباشرة) ، عن طريق هذا الكود:

DoCmd.OpenReport "Name_All", , , "[Num]=" & Forms!Name_all!Num

.

 

جعفر

[شامل2]

منذ ساعه, jjafferr said:

 

 

يا رجال ، مب الكل يفهمها وهي طايرة ، ترى احنا على قدنا 

لو من البداية شرحت شوي زيادة ، وبالخصوص مع هالصورة ، لكان السؤال واضح جدا 

 

الطريقة الاسهل اللي تيجي على بالي هي انك لا تسمح بمعاينة التقرير ، وانما تطبعه مباشرة (وفي الواقع المعاينة مهمة لأغراض معينة ، ولكن لمعظم التقارير ، فيجب طبعها مباشرة) ، عن طريق هذا الكود:

DoCmd.OpenReport "Name_All", , , "[Num]=" & Forms!Name_all!Num

.

 

جعفر

شكرا اخ جعفر

ولكن هل هذا معناه انه لا يوجد حل لهذه المشكلة؟

[شامل2]

للرفع

للرفع

[jjafferr]

السلام عليكم أخي الشمال 

 

قبل ان اضع الحل اعلاه ، فكرت وبحثت كثيرا ، لكن الحلول لم اقتنع بها ، وعلى العموم اليك حلول اثنين:

 

1. ان تعمل زرين في النموذج ، واحد لمعاينة التقرير (ولا يستطيع المستخدم من خلالها طباعة التقرير لأنه لن يكون فيه رقم وصل) ، وواحد للطباعة مباشرة (وتضع كود رقم الوصل في النموذج ، بحيث يأخذ التقرير رقم الوصل من النموذج) 

أ- ان لا تسمح للمستخدم ان يطبع التقرير اثناء المعاينة (واليك الصعوبات وخطوات الحل):

عند معاينة التقرير ، يستطيع المستخدم ان يطبع التقرير من شريط الادوات عن طريق ايقونة الطباعة ،

حتى ولو اخفيت شريط الادوات ولا تُظهر ايقونة الطباعة ، فالمستخدم يستطيع بالنقر على الفأرة باليمين ومن القائمة ان يطبع ،

وحتى لو لم اخفيت قائمة النقر بيمين الفأرة ، فالمستتخدم يستطيع ان يضغط على Ctrl + P ويطبع ،

فالحل هنا يكون ان:

ان تُخفي شريط الادوات ، وان تُخفي قائمة النقر باليمين ، وان تعمل كود يصطاد الضغط على الزر Ctrl فيُلغيه 

ب- ان تضع صورة مائية على التقرير المعاينة ، تقول فيها مثلا: ان التقرير غير رسمي بغير رقم الوصل ، وهذا الرابط يشرح عمل الصورة المائية:

http://www.officena.net/ib/topic/59776-اسئله-عن-التقارير/?do=findComment&comment=387356

 

2. ان تضع كود خاص بالوندوز (وليس للأكسس) ، بحيث عند اعطاء امر الطباعة ، فنتدخّل ونعطي رقم الوصل ، ثم نسمح للوندوز ان تطبع التقرير 

 

 

جعفر

[شامل2]

8 ساعات مضت, jjafferr said:

السلام عليكم أخي الشمال 

 

قبل ان اضع الحل اعلاه ، فكرت وبحثت كثيرا ، لكن الحلول لم اقتنع بها ، وعلى العموم اليك حلول اثنين:

 

1. ان تعمل زرين في النموذج ، واحد لمعاينة التقرير (ولا يستطيع المستخدم من خلالها طباعة التقرير لأنه لن يكون فيه رقم وصل) ، وواحد للطباعة مباشرة (وتضع كود رقم الوصل في النموذج ، بحيث يأخذ التقرير رقم الوصل من النموذج) 

أ- ان لا تسمح للمستخدم ان يطبع التقرير اثناء المعاينة (واليك الصعوبات وخطوات الحل):

عند معاينة التقرير ، يستطيع المستخدم ان يطبع التقرير من شريط الادوات عن طريق ايقونة الطباعة ،

حتى ولو اخفيت شريط الادوات ولا تُظهر ايقونة الطباعة ، فالمستخدم يستطيع بالنقر على الفأرة باليمين ومن القائمة ان يطبع ،

وحتى لو لم اخفيت قائمة النقر بيمين الفأرة ، فالمستتخدم يستطيع ان يضغط على Ctrl + P ويطبع ،

فالحل هنا يكون ان:

ان تُخفي شريط الادوات ، وان تُخفي قائمة النقر باليمين ، وان تعمل كود يصطاد الضغط على الزر Ctrl فيُلغيه 

ب- ان تضع صورة مائية على التقرير المعاينة ، تقول فيها مثلا: ان التقرير غير رسمي بغير رقم الوصل ، وهذا الرابط يشرح عمل الصورة المائية:

http://www.officena.net/ib/topic/59776-اسئله-عن-التقارير/?do=findComment&comment=387356

 

2. ان تضع كود خاص بالوندوز (وليس للأكسس) ، بحيث عند اعطاء امر الطباعة ، فنتدخّل ونعطي رقم الوصل ، ثم نسمح للوندوز ان تطبع التقرير 

 

 

جعفر

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

[jjafferr]

السلام عليكم 

 

لماذا لا تضع قائمة باسماء الطابعات في النموذج ، ويجب عليه اختيار الطابعه قبل الطباعة؟

هذا الرابط به عدة مرفقات وروابط اخرى ، وفيها الطريقة:

http://www.officena.net/ib/topic/49802-اختيار-اسم-الطابعة-عند-طباعة-تقرير/

 

جعفر