水晶报表

水晶报表连接数据库打印 

1 Dim Report As New crEnvironment
2 
3 Report.SetDatabaseLogon(strUser, strPassword, strServer, strDefaultDatabase)
4 Report.PrintOptions.PaperSize = CrystalDecisions.Shared.PaperSize.PaperA4
5 Report.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.PortableDocFormat, "d:	est.pdf")
6 Report.PrintToPrinter(1, True, 0, 0)

can row :允许打印多行数据

 

原文地址:https://www.cnblogs.com/jiningning/p/4708110.html