
26/03/2004, 07:39
|
(Desactivado) | | Fecha de Ingreso: agosto-2002
Mensajes: 1.458
Antigüedad: 22 años, 8 meses Puntos: 0 | |
LES PASO PARTE DEL CODIGO A VER SI ME AYUDAN :
<form method="Post" action="buscar.asp">
<body bgcolor="#FFFFCC">
<p align="center"><font face="Tahoma" size="2"><b><i>Ingrese Palabra a buscar</i></b></font>
</p>
<p align="center"><input type="text" name="palabra" size="20">
</p>
<p align="center">
<input type="submit" value="Buscar" name="boton1">
<input type="reset" value="Restablecer" name="boton"></form>
<p> </p>
<p><font face="Tahoma" size="2">Resultados obtenidos con <strong><%=Request("Palabra") %></strong></font></p>
<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla=Server.CreateObject("adodb.recordset")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("equivalencias.mdb")
Dim Temp
Temp="SELECT TOP 6 * FROM equivalencias WHERE 'LINEA 36 ORIGINAL=palabra ORDER BY id DESC"
Tabla.Open Temp, Conexion
If Tabla.BOF And Tabla.EOF Then
%> |