hola amigos
tengo un problemita pequeño,
lo que pasa es que tengo una busqueda sencilla, como una consulta, pero lo malo es que por default, me manda el primer registro de la base de datos, el realiza la busqueda cool, pero el defecto es ese, la idea es que muestre el archivo cuando se consulta no cuando la pagina cargue.
aqui esta el codigo:
****************
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/galope.asp" -->
<%
Dim rsbusqueda__MMColParam
rsbusqueda__MMColParam = "%"
If (request.querystring("search") <> "") Then
rsbusqueda__MMColParam = request.querystring("search")
End If
%>
<%
Dim rsbusqueda
Dim rsbusqueda_numRows
Set rsbusqueda = Server.CreateObject("ADODB.Recordset")
rsbusqueda.ActiveConnection = MM_galope_STRING
rsbusqueda.Source = "SELECT * FROM dbo.TAB_PDA_EB_MAESTRO where cod_cliente LIKE '" + Replace(rsbusqueda__MMColParam, "'", "''") + "'"
rsbusqueda.CursorType = 0
rsbusqueda.CursorLocation = 2
rsbusqueda.LockType = 1
rsbusqueda.Open()
rsbusqueda_numRows = 0
%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento sin título</title>
</head>
<body>
<table width="200" border="1" align="center">
<tr>
<th scope="row"><form name="form1" method="get" action="PRUEBA.ASP">
<p>
<input name="search" type="text" id="search" style="width:100 px;" value="<%= Request.QueryString("search") %>"/>
<input type="submit" value="Enviar">
</p>
</form></th>
</tr>
<tr>
<th scope="row"> <p><%=(rsbusqueda.Fields.Item("cod_cuenta").Value) %> </p>
<p><%=(rsbusqueda.Fields.Item("fecha").Value)%></p>
<p> </p></th>
</tr>
</table>
<p> </p>
<p> </p>
<p> </p>
</body>
</html>
<%
rsbusqueda.Close()
Set rsbusqueda = Nothing
%>
****************