Return value

[Guest_imported]

I have this code:

<OBJECT RUNAT=&quot;server&quot; PROGID=&quot;OrdRev.cDataBase&quot; ID=&quot;objOrd&quot;></OBJECT>

Dim Obj
Obj = objOrd.Reload(Cint(Request.QueryString(&quot;Id&quot))

It calls a COM+ object which in turn run a store procedure that returns a string (message). This is a portion of the COM+ code:

Public Function Reload(ByVal OrdId As Integer) As String

Set cn = New ADODB.Connection
Set Cmd = New ADODB.Command
cn.Open sCnStrg

With Cmd
Set .ActiveConnection = cn
.CommandType = adCmdStoredProc
.CommandTimeout = 6000
.CommandText = &quot;UTL_ReloadReviewedOrder1&quot;
.Parameters.Append .CreateParameter(&quot;SrcOrdId&quot;, adInteger, adParamInput, , SrcOrdId)
.Parameters.Append .CreateParameter(&quot;Err_Msg&quot;, adVarChar, adParamOutput, 255, ErrMsg)
Set Rs = .Execute
End With


Each time I run the above code it gave me this error

ADODB.Fields error '800a0cc1' Item cannot be found in the collection corresponding to the requested name or ordinal.

Can you please help?

 

[Mighty]

This message usually means that you are trying to access a field name that doesn't exist. It is usually just a type. make sure that you have all you recordset values typed correctly. Mise Le Meas,

Mighty