VB6怎样调用水晶报表9的？？

[lingxiang]

该用什么控件或代码？谢谢！！

[jadehong]

Dim CRY As CRAXDRT.Report
Dim CRYAT As CRAXDRT.Application

Set CRYAT = New CRAXDRT.Application

Set CRY = CRYAT.OpenReport(App.Path & "\CP91.rpt")
CR91.ReportSource = CRY
CR91.ViewReport

加控件CRViewer91