have a problem ADODB.Field error '800a0bcd'

hi, i have a problem with a page, when try to enter this page i recieve this error. ADODB.Field error '800a0bcd' i have no BOF or EOF condition and the field in the database is not empty. i am seen it in this moment. i already had some trouble with my data base but i dont know. heres part of my page

......

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open "DBQ=" & Server.Mappath("../SP_Proyectos/projectdb.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

.......


sSQL = "Select * From UsuariosTBL Where Role = 3"

set RS = Conn.Execute(sSQL)

sSQL1 = "Select Nombre From UsuariosTBL Where User = '" & User &"'"

set RS1 = Conn.Execute(sSQL1)

sSQL2 = "Select * From Proyecto Where NombrePro = '" & Request.QueryString("Proyecto") & "'"

set RS2 = Conn.Execute(sSQL2)

PID = RS2("ProyectoID") 'here is the problem

sSQLSel = " Select * From User Where ProyectoID = " & PID & ""

set RSSel = Conn.Execute(sSQLSel)

sSQLSelAct = "Select Distinct NombreAct, PesoActPro From Actividades Where ProyectoID = " & PID & ""

set RSSelAct = Conn.Execute(sSQLSelAct)

sSQLLider= "Select Nombre From UsuariosTBL"

set RSLidst = Conn.Execute(sSQLLider)
this field "proyectoID" changes automatically when a user enters a proyect. this error only occurs to a specific proyect, with proyectID 69 and works weel with any other entry.


thanks

 

I had problems a week ago with the database i don´t know if that´s the real problem cause the page works well with with other entries but not this one. some of the fields in DB fills automatically and are bounded to others functions. i have other pages that uses the field but take that proyect id from the page using "Request.QueryString" and works well but these pages are for another funcions. thanks