کمک در مورد دفتر اندیکاتور

[ravegoat]

سلام من می خوام از دیتا گریدم مستقینا بدون گزارش گیری پرینت بگیرم یه کد پیدا کردم که این کار رو انجام میده کد زیر:1
Private Sub Command1_Click()
On Error Resume Next
Printer.Print ""
Printer.PaintPicture Form1.DataGrid1.CaptureImage, 1 * 1440, 0.75 * 1440
Printer.EndDoc
End Sub


فقط یه مشکل داره اونم اینه که اگه اطلاعات دیتابیس زیاد باشه مثلا 100 رکورد همه اونها رو چاپ نمی کنه دوستان می تونند در این مورد کمک کنند

با این فرمان عکسی با ابعاد مشخص از داده های جاری DataGrid گرفته میشه و طبیعی هستش که اگر مقدار رکورد ها زیاد باشه همه شون در این تصویر جا نشن. برای این کار بهتره تمام داده های DataGrid رو لود کنید و در چندین صفحه رکورد ها رو برای چاپ مرتب کنید. همچنین می تونید داده ها تون رو به قالب اکسل یا اکسس تبدیل کنید و ازشون گزارش بگیرید. به علاوه یه سری کنترل دیتاگرید پویا وجود داره که به راحتی امکان چاپ چند صفحه ای رو فراهم می کنه ولی متاسفانه اسم دقیق این کامپوننت ها رو نمی دونم. برای اطلاعات بیش تر به سورس زیر مراجعه کنید:
http://bytes.com/topic/visual-basic/...tagrid-printer

موفق باشید
آرمین