Missing Default Property

[obuspider]

I'm getting the error Missing Default Property on this(session("oRs&quot = oRs) line
Can anyone help me with this?

dim oRs
Set oConn = Server.CreateObject( "ADODB.Connection" )
Set objCmd = Server.CreateObject( "ADODB.Command" )
Set session("oRs&quot = Server.CreateObject( "ADODB.Recordset" )

sConn = "uid=Foodsrvc;pwd=gA15L6;dsn=StockStatus"
oConn.Open sConn
objCmd.ActiveConnection = oConn
objCmd.CommandTimeout = 180


with objCmd
.commandText = "ProcTrackingOverview "
.CommandType = &H0004
.parameters(1) = Cdate(fsale_date)
.parameters(2) = CDate(tsale_date)

End With
Set oRs = objCmd.Execute()
session("oRs&quot = oRs
Set oRs = nothing
'objCmd = nothing

if not session("oRs&quot.eof then
response.write "you made it"
End if

 

[Tarwn]

Try using set:
Set Session("oRS&quot = oRs


If that doesn't work then try using Session("oRs&quot in place of the variable oRs, ie
instead of:
Set oRs = objCmd.Execute()
session("oRs&quot = oRs
try:
Set session("oRs&quot = objCmd.Execute()


-Tarwn --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- ---
For my next trick I will pull a hat out of a rabbit (if you think thats bad you should see how the pigeon feels...)

 

[obuspider]

Tarwn,

I had tried this before. Tried it again and now I am getting
Item cannot be found in the collection corresponding to the requested name or ordinal.