دستور Print

[arman2000]

سلام
چطور مي شه دكمه پرينتي ساخت كه پنجره Print رو نمايش بده نه شرع به پرينت كنه؟ منظورم نمايش پنجره زير هست:

64708

[eastprogrammer]

از سربرگ dialogs يه كامپوننت printdialog رو فرمت بزار و دستور زير رو روي button مربوطه بنويس:


PrintDialog1.Execute;

[arman2000]

سلام دوست من

در dialog، كامپوننت printdialog رو نتونستم بذارم. ممنون می شم با نمونه راهنمائی بفرمائید.

سوال 2-: بزرگوار چطور می شه دستور چاپ فقط صفحه اول رو داد؟

سوال 3-: امکان داره دستور پرینت رو پویا کرد؟ مثلا با کلیک دکمه پرینت، فرم یا پنجره ای باز بشه که داخل اون دو باکس باشه که در در کنار این دوباکس به فارسی نوشته شده باشه: "از صفحه" و "تا صفحه"

[arman2000]

ممنون می شم راهنمایی بفرمائید.

[mehdi_fiz]

سلام دوست عزیز
این نمونه فکر کنم به کار شما بیاد پست 267
http://barnamenevis.org/showthread.php?53141/page27
موفق باشید

[arman2000]

سلام. نمونه ای که پیشنهاد دادید جالب بود ممنونم

1- امکان داره که به محض کلیک دکمه پرینت فقط صفحه اول چاپ بشه (بدون نمایش پنجره Print)
2- ممنون می شم در مورد سربرگ dialogs و كامپوننت printdialog راهنمایی کنید.

3- زماني كه Minimize the Ribbon تيكداره و آيتمها هم در سمت چپ Close Button هست اگه يك گزارش باز بشه، دسترسي به فرمي كه دستور پرينت اون گزارش رو داده نيست. من مجبور مي شم بانك رو از كلا Close كنم تا به فرمها دسترسي پيدا كنم.

[arman2000]

ممنون مي شم راهنمايي بفرمائيد.

[mehdi_fiz]

سلام دوست عزیز
1- از دستور زیر استفاده کنید
DoCmd.SelectObject acReport, "r_test", True
DoCmd.PrintOut acPages, 1, 1

3- خاصیت pop Up و modal در برگه other طراحی فرم را برابر yes قرار دهید

موفق باشید.

[arman2000]

سلام دوست من. بسیار ممنونم از راهنمایی شما. احسنت :تشویق::تشویق::تشویق:

1- چطور مي شه دكمه پرينتي ساخت كه پنجره Print رو نمايش بده؟ (بدون نمایش گزارش، پنجره Print، همون Ctrl+P نمایش داده بشه، یعنی از فرم خارج نشه)

2- چطور می شه در گزارش (Report)، دکمه پرینت گذاشت؟ مثلا دکمه پرینت همان صفحه و دکمه دیگه ای که با کلیک اون پنجره Print باز شود (بدون زدن Ctrl+P)

[mehdi_fiz]

سلام دوست عزیز
1-
Private Sub Command1_Click()
DoCmd.SelectObject acReport, "r_test", True
DoCmd.RunCommand acCmdPrint
End Sub

موفق باشید

[arman2000]

سلام دوست من ممنونم. عالي بود. لذت بردم :تشویق::تشویق::تشویق:
بزرگوار وقتي اين دستور اجرا مي شه، پنجره Objects در سمت چپ كه Close Button بوده، باز مي شه. راهي هست كه اين پنجره بسته بمونه؟

[arman2000]

ممنون مي شم راهنمايي بفرمائيد.

[mehdi_fiz]

سلام دوست عزیز
من با اکسس 2007 کار نکردم و این کدها در اکسس 2003 مشکل نداره
موفق باشید

[arman2000]

سلام دوست من
من در 2003 هم چک کردم ولی پنجره Objects باز مي شه.

[arman2000]

دوست من در نمونه ضميمه با كليك دكمه چاپ، پنجره Objects در سمت چپ كه Close Button بوده (در 2007)، باز مي شه. در 2003 هم اين پنجره ميآد رو. راهي هست كه اين پنجره، موقع پرينت ديده نشه (از روي همون فرمي كه كليك چاپ شده، بيرون نره)؟

در ضمن با توجه به اينكه ماكروي Autoexec گذاشتم ولي با اجراي برنامه، پيغام زير رو مي ده. مشكل چيه؟
65820

[payman_xxp]

سلام
این برنامتم دانلود و اجرا کردم.
هلو نه ولی مثل زردآلو کار میکنه. :چشمک:
واسه دیده نشدن آبجکتها هم پیشنهاد میدم که pop up فرمتو yes کنی اینجوری فرمت full screen میشه و بجز فرم چیزی دیده نمیشه.
اون خطا هم بخاطر تنظیمات سکیوریتی اکسس هستش ببین more info کمک میکنه سطح امنیتی رو پایین بیاری.
موفق باشید.

[arman2000]

عالی بود دوست من احسنت :چشمک::قلب::تشویق::تشویق:
از منوی Tools-Macro-security سطح Low رو انتخاب کردم و جواب گرفتم. امکان داره این انتخاب، مشکلی به وجود بیاره؟ کلا این سطوح چه تاثیری می تونند داشته باشند؟

[payman_xxp]

عالی بود دوست من احسنت :چشمک::قلب::تشویق::تشویق:
از منوی Tools-Macro-security سطح Low رو انتخاب کردم و جواب گرفتم. امکان داره این انتخاب، مشکلی به وجود بیاره؟ کلا این سطوح چه تاثیری می تونند داشته باشند؟

سلام
درکل چون با برنامه نویسی میشه کدهای مخرب نوشت این سطح امنیتی لازمه، از طرفی اگه از برنامه های مطمئن استفاده میکنید میتونید اونو در سطح پایینی نگه دارید.
موفق باشید.

[arman2000]

دوست من واقعا ممنونم از كمك شما
بسيار سپاسگذارم بابت جواب سريع شما
آرزوي موفقيت
شاد باشيد :قلب: