报表应用对象问题！

Question

我在VB6中调用水晶报表使用如下方法，系统提示“要求对象”。
Private Rm_CA As New CRAXDRT.Application
Dim RrptApp As New CRAXDRT.Application    '报表应用对象
Dim Rrpt As New CRAXDRT.Report            '报表对象
Dim Rrs As ADODB.Recordset                '记录集对象
Dim RConn As ADODB.Connection             '连接对象
 
Private Sub Command1_Click()
        Dim rsql As String
        Dim Comm_LS1 As Object
        Dim Comm_LS As String
        Rrs.Close
        rsql = "select * from 表名" 
        Rrs.Open rsql, RConn
       ’此方法没问题。
        Set Rrpt = RrptApp.OpenReport("E:\Microsoft Visual Studio\ZH012_REPORT1.rpt")
        YS_DM_NAME =“ZH012”
    Comm_LS = "E:\Microsoft Visual Studio\" + YS_DM_NAME + "_REPORT1.rpt"
    ‘用此方法系统提示“要求对象”
    Set Rrpt = rptApp.OpenReport(Comm_LS)
END SUB
请高手给予帮忙，谢谢！！！

Answer 1

"E:\Microsoft Visual Studio\" + YS_DM_NAME + "_REPORT1.rpt"与你上面的"E:\Microsoft Visual Studio\ZH012_REPORT1.rpt"
是否确实一样？