调用存储过程的记录集无法打开的问题

Question

[align=left]如题
非常简单的代码：
 If Rs.State = 1 Then
    Rs.Close
 End If
                    
 cmd.ActiveConnection = ConnServer
 cmd.CommandText = "PROC_FETCH_XCVR_ORACLE"
 cmd.CommandType = adCmdStoredProc
                    
 Set param = cmd.CreateParameter("job_no_par", adChar, adParamInput, 50, txtjob.Text)
 cmd.Parameters.Append param
 Set param = cmd.CreateParameter("job_no_par", adChar, adParamOutput, 50, "")
 cmd.Parameters.Append param
 Set Rs = cmd.ExecuteIf Rs.RecordCount > 1 Then
但是运行到红色字体部分报错：Run-time error '3704':Operation is not allowed when the object is closed
我尝试在Set Rs = cmd.Execute之后加入Rs.Open，但仍然不起作用，帮忙看下是什么原因？ 

Answer 1

response一下rs.state的值，如果为1，肯定是“object is closed”。