Ver Mensaje Individual
  #7 (permalink)  
Antiguo 23/12/2008, 09:05
YumCimil
 
Fecha de Ingreso: abril-2008
Mensajes: 9
Antigüedad: 17 años
Puntos: 0
Respuesta: Consulta desde ASP

Buenos días, ya logre hacer la consulta de esta manera...

<%
dim conexion,registros,serie,consulta

serie=Request.Form("serie")
set conexion=Server.CreateObject("ADODB.Connection")
set registros=Server.CreateObject("ADODB.RecordSet")

conexion.open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("DeviceName.mdb"))
consulta="SELECT * FROM nombres_equipos WHERE Ucase(serie_equipo) LIKE '%" & UCase(request.form("serie")) & "%'"
registros.open consulta,conexion

if not registros.EOF then

%>

<table width="275" border="0">
<tr>
<td width="133">Nombre de equipo:</td>
<td width="126"><%=registros.Fields("nombre_equipo")%> </td>
</tr>
<tr>
<td>Ciudad:</td>
<td><%=registros.Fields("ciudad_equipo")%></td>
</tr>
<tr>
<td>Localidad</td>
<td><%=registros.Fields("localidad_equipo")%></td>
</tr>
<tr>
<td>Oficina</td>
<td><%=registros.Fields("oficina_equipo")%></td>
</tr>
<tr>
<td>Tipo de equipo:</td>
<td><%=registros.Fields("tipo_equipo")%></td>
</tr>
<tr>
<td>Propietario:</td>
<td><%=registros.Fields("propietario")%></td>
</tr>
<tr>
<td>Piso / Edificio:</td>
<td><%=registros.Fields("piso_equipo")%></td>
</tr>
<tr>
<td>Usuario:</td>
<td><%=registros.Fields("usuario_equipo")%></td>
</tr>
</table>

<%
else
response.write("No existe ningún dato")
end if
conexion.close
Set registros= Nothing
%>

Ahora solo una pregunta que quizá suene muy básica... como hago para que de inicio los campos esten vacios, hasta que se haga una búsqueda...

Muchas gracias, sus consejos han sido muy útiles!

Saludos!