标签：
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)
标签：
原文地址：http://www.cnblogs.com/jiningning/p/4735903.html
