Passing Dictionary object byref

[Ryan Malone]

Passing Dictionary object byref

Ive created an ASP class that uses a dictionary object which is filled
from a recordset. It passes the object to the propterty of another ASP
class byref:

Public Property Let dicReplaceVars( byref vdicReplaceVars )
set p_ReplaceVars = vdicReplaceVars
End Property
Private p_ReplaceVars
where it is used in this other class a few times to replace values in
an array:

Function ReplaceVars(vAr rayItem)

' turn it into an array split at spaces
vArrayItem = split(vArrayIte m," ")
' loop through the array
for count = lbound(vArrayIt em) to ubound(vArrayIt em)

'See if it is a replacement variable and exists in the dictionary
if left(vArrayItem (count),6) = "tkRep_" and
p_ReplaceVars.e xists(vArrayIte m(count)) then
' then replace it
Error occurs here >> vArrayItem(coun t) =
p_ReplaceVars.I tem(cstr(vArray Item(count)))
end if
next

dim vArrayItemNew
vArrayItemNew = ""

' Loop through the array and put it back together
for count = lbound(vArrayIt em) to ubound(vArrayIt em)

if vArrayItem(coun t) = ubound(vArrayIt em) then
vArrayItemNew = vArrayItemNew & vArrayItem(coun t)
else
vArrayItemNew = vArrayItemNew & vArrayItem(coun t) & " "
end if
next

' return the vArrayItemNew to the function
ReplaceVars = vArrayItemNew
End Function

The error message I get is:

ADODB.Field (0x800A0D5C)
Object is no longer valid.
D:\WWW\LCDEV\DO C_FUNCTIONS\../classes/classlcDocTKit_ item.asp, line 52

However I have no idea why, it is a dictionary object and not a
recordset, the object should still be open.

Any help is greatly appreciated.

Thanks

[Ray at]

Are you looking at the right line in the right page? Like, is
classlcDocTKit_ item.asp an include file perhaps, and you're looking at line
52 in the page with the include directive instead?

Ray at work

"Ryan Malone" <ry**********@h otmail.com> wrote in message
news:e8******** *************** **@posting.goog le.com...

ADODB.Field (0x800A0D5C)
Object is no longer valid.
D:\WWW\LCDEV\DO C_FUNCTIONS\../classes/classlcDocTKit_ item.asp, line 52

However I have no idea why, it is a dictionary object and not a
recordset, the object should still be open.

Any help is greatly appreciated.

Thanks

[Ryan Malone]

Hi Ray

Thanks for the reply, the code that ive included is from
classlcDocTKit_ item.asp. It has got me completely stumped.

"Ray at <%=sLocation% >" <myfirstname at lane34 dot com> wrote in message news:<eP******* *******@TK2MSFT NGP12.phx.gbl>. ..

Are you looking at the right line in the right page? Like, is
classlcDocTKit_ item.asp an include file perhaps, and you're looking at line
52 in the page with the include directive instead?

Ray at work

"Ryan Malone" <ry**********@h otmail.com> wrote in message
news:e8******** *************** **@posting.goog le.com...

ADODB.Field (0x800A0D5C)
Object is no longer valid.
D:\WWW\LCDEV\DO C_FUNCTIONS\../classes/classlcDocTKit_ item.asp, line 52

However I have no idea why, it is a dictionary object and not a
recordset, the object should still be open.

Any help is greatly appreciated.

Thanks