Error

Hola, recibo este error cuando intento leer un recordset (una consulta, en
access)

(0x80020009)
Exception occurred.

este es el fragmento de mi codigo:

' abre consulta con Totales
Set mdbconn = Server.CreateObject("ADODB.CONNECTION")
mdbconn.Open = "DRIVER={Microsoft Access Driver
(*.mdb)};DBQ=C:\Projects\Symbol\Base.mdb"
Set rsaccess = Server.CreateObject("ADODB.Recordset")
'rsaccess.LockType = 3
sqlaccess = "select * from Pedido_Total where idNum= " &
Request.QueryString("Pedido_id")
rsaccess.Open sqlaccess, mdbconn


'pasas los valores de la access recordset a variables

Dim LastID
Dim v_fact_num
Dim LastID2
LastID = CCDLookup("max(Fact_Num)","Pedidos","",DBConnection3)
v_fact_num = LastID + 1
LastID2 = LastID + 1

v_status= Trim(rsaccess.fields("status")) ' en esta linea envia el error
v_co_cli= Trim(rsaccess.fields("co_cli"))
v_co_tran= Trim(rsaccess.fields("co_tran"))
v_forma_pag= Trim(rsaccess.fields("forma_pag"))
v_co_sucu= Trim(rsaccess.fields("co_sucu"))
v_fec_emis= Trim(rsaccess.fields("fec_emis"))
v_co_ven= Trim(rsaccess.fields("co_ven"))
v_feccom= Trim(rsaccess.fields("fec_emis"))