Hi!
I hope some one can tell me what I am doing wrong with the following code:
Dim cmdObj As ADODB.Command
Dim rsObj As ADODB.Recordset
Set cmdObj = New ADODB.Command
With cmdObj
.ActiveConnection = g_objConn
.CommandText = "dbo.usp_SELECT_Info"
.CommandType = adCmdStoredProc
.Parameters("@intID" = g_lngCustomerID
End With
Set rsObj = cmdObj.Execute
Do While Not rsObj.EOF
'----
Loop
I receive a Runtime error #3704 on the "Do While.." line(it thinks the rsObj is closed).
Any suggestions would be greatly appreciated!
Thanks!
I hope some one can tell me what I am doing wrong with the following code:
Dim cmdObj As ADODB.Command
Dim rsObj As ADODB.Recordset
Set cmdObj = New ADODB.Command
With cmdObj
.ActiveConnection = g_objConn
.CommandText = "dbo.usp_SELECT_Info"
.CommandType = adCmdStoredProc
.Parameters("@intID" = g_lngCustomerID
End With
Set rsObj = cmdObj.Execute
Do While Not rsObj.EOF
'----
Loop
I receive a Runtime error #3704 on the "Do While.." line(it thinks the rsObj is closed).
Any suggestions would be greatly appreciated!
Thanks!