Consulta

[manolo572]

hola acabo de generar la siguiente consulta para impriir valores en una pagina de asp, mi duda es de como imprimir un valor nulo si no existe en la base de datos gradesco su ayuda!!!
Xq quiero que si no existe un valor me imprime con un response.write que no hay informacion solo eso...
Xq me genera el siguiente error:
Microsoft VBScript runtime error '800a01a8'
Object required

Código ASP:

<%Set rs1_e = Server.CreateObject("ADODB.Recordset")
selectSQL1 ="select * from Aprobacion where categoria='"&consulta&"' " 
Set rs1_e=prycxn.execute(selectSQL1)%>
 

[goteen_mx]

Si no existe la tupla con el EOF sabes si hay o no registros, si tu existe el registro pero en el campo que quieres es null, puedes poner en su sentencia sql isNull(campo, "valor a reemplazar"), no entendi bien cual de las dos necesitas, pero en el ejemplo puse las dos

Código ASP:

<%Set rs1_e = Server.CreateObject("ADODB.Recordset")
      selectSQL1 ="select isNull(campo1,"no hay") from Aprobacion where categoria='"&consulta&"' "
      Set rs1_e=prycxn.execute(selectSQL1)
     if rs1_e.eof then
        response.write "no hay"
    else
       do while not rs1_e.eof
         response.write rs1_e.eof(0) & chr(13)
         rs1_e.eof.movenext
      loop
   end if
 

Saludos

[manolo572]

si es lo que necesitaba gracias por la ayuda!!!!