Error 80020009
Sometimes an error to do with accessing a database using ODBC.
Can also sometimes occur when accessing a variable passed to a sub for the second time.
For example might occur on the third line of
sub dosomething(id)
response.write id
response.write id
end sub
Try changing to
sub dosomething(id)
myid = id
response.write myid
response.write myid
end sub