Crystal reports 需要动态设置Crystal Report的Recordsource

Crystal reports 需要动态设置Crystal Report的Recordsource,crystal-reports,vb6,Crystal Reports,Vb6,我已经尽了我所能,现在有一个日志堵塞没有进展了。 我的VB6应用程序中有大约100个crystal报表,它们都使用DSN(ODBC)连接到数据库,现在我希望能够从VB6代码中设置所有crystal报表的数据源,而不再使用DSN。 请帮忙,我真的需要它,经过这么多天的努力寻找解决方案 我目前使用以下代码调用报告: Dim Appl As New CRAXDRT.Application Dim Report As New CRAXDRT.Report Set Report = Appl.OpenRe

我已经尽了我所能,现在有一个日志堵塞没有进展了。 我的VB6应用程序中有大约100个crystal报表,它们都使用DSN(ODBC)连接到数据库,现在我希望能够从VB6代码中设置所有crystal报表的数据源,而不再使用DSN。 请帮忙,我真的需要它,经过这么多天的努力寻找解决方案

我目前使用以下代码调用报告:

Dim Appl As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
Set Report = Appl.OpenReport(App.path & "\Reports\rptBooks.rpt")
frmReport!CRViewer1.ReportSource = Report
Screen.MousePointer = vbDefault
frmReport!CRViewer1.ViewReport
frmReport.Show 1
现在我想从VB6代码设置整个recordsource,需要帮助