|
如果要将 crystal report 当成 external report
要如何写呢?
我是酱写,不过如果电脑没有 Crystal Report 就会出 error
Public objReport As Object
Public locReport As String 'Location
Dim CR As New CRAXDDRT.Application
Private Sub Form_Load()
Set objReport = CR.OpenReport(locReport)
objReport.DiscardSavedData
objReport.Database.SetDataSource rsReport, 3, 1
CRViewer91.ReportSource = objReport
CRViewer91.ViewReport
End Sub
请问有没有更好的方法呢? |
|