急啊，哪里出错了？帮忙来看看吧？？？？？在线等候？？？

[ylljony]

Dim RS As ADODB.Recordset
Set RS = New ADODB.Recordset
Set RS = Conn.Execute("exec sp_PSXFRR00 '" & Trim(lblfstrcode.Caption) & "','" & strRegister & "', '" & CDate(lblfxfrdate.Caption) & "','" & Trim(txtfxfrno.Text) & "','10010'")
Set rpt_XfrR00.DataSource = RS
‘或者下面执行================
Set rpt_XfrR00.DataSource = Conn.Execute("exec sp_PSXFRR00 '" & Trim(lblfstrcode.Caption) & "','" & strRegister & "', '" & CDate(lblfxfrdate.Caption) & "','" & Trim(txtfxfrno.Text) & "','10010'")
’=============================能这样吗？
rpt_XfrR00.Refresh
rpt_XfrR00.Show
注：其中rpt_XfrR00为报表，
左想右想都不知道哪里错了。不明白啊，

[ylljony]

没人进来啊？？？

[qiangsheng]

单从这段代码上看不出错误。你看看存储过程执行是否有错，调用存储过程的字符串是否有错。。。

[hhtt518]

编译系统报的是什么错误？？

[ylljony]

存储过程是没有错误的，测试过了的，错误提示为：“对象关闭时，不能操作”

[qiangsheng]

那是你的conn没有打开