Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8) se requiere un objeto

Carlos
12 de Noviembre del 2009
Buenas tardes,
Señores tengo este error y no se a que se deba?

Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto

ahora les explico tengo una aplicacion ASP que se conecta via COM+ a la BD ORACLE 10g, he revisado la conexion via Origen de datos ODBC y es OK. Les mando las lineas de progrmacion:

<%@ TRANSACTION = Requires_New %>
<%
option explicit
dim oUsuario, strMensaje, rs

Response.Expires = -1
Response.CacheControl = "Private"

if cbool(request("login")) = true then
strMensaje = "Verifique su usuario y contraseña"
set oUsuario = CreateObject("bp_sosm1.vbUsuarioData")
set rs = oUsuario.validar(ucase(session("id")), ucase(session("clave")) )
if not rs.eof then

EN LA ULTIMA LINEA SE CAE, por favor si alguien puede ayudarme.