pdf文件的作成 

 Dim Report As New crProgressList

 Report.PrintOptions.PaperSize = CrystalDecisions.Shared.PaperSize.PaperA4

 Report.SetDatabaseLogon(strUser, strPassword, strServer, strDatabase)

 Report.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.PortableDocFormat, plPDFDirectory & plPDFFileName)

 

posted @ 2015-08-17 10:29  快乐的小太阳  阅读(173)  评论(0)    收藏  举报