چاپ گزارش به صورت رول

[m_shadow]

سلام من یه سوال دارم لطفا اگه بلدید جواب بدید
من میخوام گزارشی روکه تهیه کردم که طولهای متفاوتی داره رو پرینت کنمکخ ممکنه 1 یا 5 یا مثلا چند صفحه باشه حالا مشکل اینه که طول گزارش هرچی باشه پرینتر یک صفحه A4 رد میکنه من میخوام وقتی پرینت میگیرم در انتهای گزارش پرینتر ایست کنه و کاغذ سفید بیرون نده پرینتر epson LQ300 است

[Behrouz_Rad]

در انتهای دستور چاپ بنویسید:


Printer.EndDoc


موفق باشید.
:wise1:

[m_shadow]

اقا بهروز دستت درد نکنه که زود جواب دادی امااین جوری نمیشه بازم کاغذ بیرون میده
ببین من میخوام وقتی که مثلا طول گزارش من 5 خط شد وقتی این 5 خط پرینت شد انتهای خط پنجم پرینتر ایست کنه و من کاغذ رو ببرم :sorry:

[Behrouz_Rad]

آها.
اینو بنویس:


Printer.KillDoc

:wise1:

[hmm]

killdoc که بافر چاپگر رو خالی میکنه
شما موقعی که end doc مینویسید یعنی تمام موارد که در بافر هست چاپ بشه و در آخرین خط چاپگر متوقف میشه شما چک کن خط یا مقداری رو در آخر صفحه نداشته باشی چون در این موقع چاپگر میخواهد آخرین خط رو هم چاپ کنه که نتیجه اون توقف در آخر صفحه است.
برای چاپ اطلاعات بافر و رفتن به صفحه بعد هم از Printer.NewPage استفاده کنید

[Behrouz_Rad]

KillDoc Procedure Immediately terminates the current print job
:گیج:

[m_shadow]

آقایون ممنون از جوابتون اما همه اینهارو امتحان کردم نمیشه :sorry:
یه نفر امروز میگفت باید از زبانهای posscript یا hcpl اسفاده کنم
کسی میدونه اینا چیه یا بلده :embr: :thnx:

[taha_gh]

برای چاپ بر روی رول paper soure را بر روی tractor feed
تنظیم کنید:تشویق:

[حامد مصافی]

printer.papersize = vbprpsuser
printer.height = 5000
printer.width = 200

'prinet on printer onj.

printer.enddoc