اذهب الي المحتوي
أوفيسنا

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


شامل2

الردود الموصى بها

السلام عليكم

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

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

الكود هو:

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

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

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

رابط هذا التعليق
شارك

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

السلام عليكم :rol:

 

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


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

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

 

 

جعفر

الاخ جعفر

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

رابط هذا التعليق
شارك

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

 

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


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

او

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

 

جعفر

277.ترقيم.mdb.zip

رابط هذا التعليق
شارك

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

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

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

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

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

02.jpg

تم تعديل بواسطه alshamal
رابط هذا التعليق
شارك

 

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

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

 

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

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

 

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

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

.

 

جعفر

رابط هذا التعليق
شارك

منذ ساعه, jjafferr said:

 

 

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

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

 

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


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

.

 

جعفر

شكرا اخ جعفر

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

رابط هذا التعليق
شارك

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

 

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

 

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

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

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

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

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

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

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

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

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

 

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

 

 

جعفر

  • Like 2
رابط هذا التعليق
شارك

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

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

 

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

 

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

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

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

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

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

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

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

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

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

 

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

 

 

جعفر

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

رابط هذا التعليق
شارك

السلام عليكم :rol:

 

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

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

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

 

جعفر

  • Like 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information