Ver Mensaje Individual
  #8 (permalink)  
Antiguo 06/08/2002, 16:53
Avatar de Eutheola
Eutheola
 
Fecha de Ingreso: enero-2002
Mensajes: 70
Antigüedad: 23 años, 4 meses
Puntos: 0
Re: Consulta sencilla Ejecucion Imposible?

Gracias amigos pero ya casi me funciona, ahora aunque me salen los campos bien, encima de la tabla sale este error.

Error de Microsoft VBScript en tiempo de ejecución error '800a01a8'
Se requiere un objeto: ''

/Agro/EjBD1link.asp, line 25 la cual es la que dice <% Ob_RS.MoveNext.

Todo el codigo de esta pagina es.

<HTML>
<TITLE> Ejemplo sencillo de BD </TITLE>
<BODY>
<!-- #INCLUDE File="ADOVBS.inc" -->
<H3>Datos Personales</H3>

<% u_id=request.querystring("u_id")
Set Ob_Conn=Server.CreateObject("ADODB.Connection ")
Ob_Conn.Open "EjemploBD"
Set rs = Ob_Conn.Execute ("SELECT * FROM Dates WHERE DNI=" & request("u_id") & "") %>

<CENTER>
<TABLE BORDER=0 bgcolor="#cccc99">
<TR>
<TH> D.N.I. </TH>
<TH> EDAD </TH>
<TH> CIUDAD </TH>
<TH> GENERO </TH>
<TR>

<TD> <%= rs("DNI") %> </TD>
<TD> <%= rs("Edad") %> </TD>
<TD> <%= rs("Ciudad") %> </TD>
<TD> <%= rs("Genero") %> </TD>
<% Ob_RS.MoveNext

Ob_RS.Close
Ob_Conn.Close %>
</TR>
</TABLE>
</CENTER>
</BODY>
</HTML>

Le agradezco la ayuda.