
12/03/2007, 03:34
|
| | Fecha de Ingreso: marzo-2007
Mensajes: 3
Antigüedad: 18 años, 1 mes Puntos: 0 | |
por que no me funciona la consulta SQL? Hola
Estoy empezando en esto del ASP, y seguro que preguntoalgo muy basico, pero ahi va..
Tengo una pagina Html desde la cual envio un valor, un texto a otra pagina asp desde la cual recojo ese valor y lo utilizo para hacer una consulta SQL. La cuestion es que la consulta solo funciona con la sintaxis..
"SELECT * FROM ejemplo WHERE Nombre LIKE '%"&nom&"%'"
donde nom es el valor que se pasa desde la pagina Html.Si se cambia la consulta por ...
"SELECT * FROM ejemplo WHERE Nombre = '%"&nom&"%'
No da error, pero no muestra nada.
El codigo de la pagina html es...
<HTML>
<HEAD>
<TITLE>Formulario de ejemplo</TITLE>
</HEAD>
<BODY>
<H1>FORMULARIO DE EJEMPLO</H1>
<FORM method="post" action="PruebaConsultaDatos.asp">
Introduzca su nombre: <INPUT TYPE="TEXT" NAME="nomb">
<INPUT TYPE="submit" NAME="Enviador">
</FORM>
</BODY>
</HTML>
El codigo de la pagina asp es...
<HTML>
<HEAD>
<TITLE>Busqueda de datos</TITLE>
</HEAD>
<BODY>
<TABLE BORDER="1">
<TD><B>Nombre<B></TD>
<TD><B>Email<B></TD>
<TD><B>Url<B></TD>
<%
Dim sql, con, rs, nom
nom=Trim(CStr(Request.Form("nomb")))
sql= "SELECT * FROM ejemplo WHERE Nombre = '%"&nom&"%'"
Set con = Server.CreateObject("ADODB.Connection")
con.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("\asp\BD\version2000.mdb"))
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,con,1
Do While Not rs.EOF
%>
<TR>
<TD><%= RS.Fields("Nombre").Value %></TD>
<TD><%= RS.Fields("Email").Value %></TD>
<TD><%= RS.Fields("Url").Value %></TD>
</TR>
<%
RS.MoveNext
Loop
rs.Close
con.Close
Set rs = nothing
Set con = nothing
%>
</table>
</BODY>
</HTML>
Gracias, por adelantado |