Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 alguien me puede ayudar con un buscador ip
 Foro Bloqueado  Tema Bloqueado


Autor Temas
templan1
Starting Member

Chile
7 Posts
Mensajes - 15 Feb 2006 :  15:42:52  Ver Perfil  Enviar Email
miren toy realizando un buscador sobre ip miren aki esta el codigo pero me da un error y el eerror es el siguiente

Tipo de error:
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.


el codigo del formulario es este


buscar.asp (Formulario)

html>

<head>
<title>BUSCADOR</title></head>

<body>

<div align="center">
<center>
<form method="GET" action="resultados.asp">
<table border="1" cellpadding="2" cellspacing="0" style="border-collapse: collapse" bordercolor="#C0C0C0" width="58%" id="AutoNumber1">
<tr>
<td width="104%" align="right" style="border-right-style: none; border-right-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#000000" colspan="2">
<p align="center"><b><font face="Arial" size="2" color="#FFFFFF">Buscador
Avanzado sobre una BD</font></b></td>
</tr>
<tr>
<td width="104%" align="right" style="border-right-style: none; border-right-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB"><strong><font size="2" face="Arial">IP:</font></strong></td>
<td width="65%" style="border-left-style: none; border-left-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">
<font face="Arial"><input name="IP" type="text" id="IP" size="20">
</font></td>
</tr>
<tr>
<td width="104%" align="right" style="border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">&nbsp;</td>
<td width="65%" style="border-left-style: none; border-left-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">&nbsp;</td>
</tr>
<tr>
<td width="104%" align="right" style="border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">
<b><font face="Arial" size="2">Ordenar resultados por:</font></b></td>
<td width="65%" style="border-left-style: none; border-left-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" width="277" id="AutoNumber2" height="85">
<tr>
<td width="20" style="border-style: none; border-width: medium" height="18">
<font face="Arial"><input type="radio" value="titulo" name="orden"></font></td>
<td width="32" style="border-style: none; border-width: medium" height="18"><font size="2" face="Arial">Ip</font></td>
<td width="25" style="border-style: none; border-width: medium" height="18">
<font face="Arial">
<input type="radio" value="artista" name="orden"></font></td>
<td width="40" style="border-style: none; border-width: medium" height="18"><font size="2" face="Arial">Macara</font></td>
<td width="20" style="border-style: none; border-width: medium" height="18">
<font face="Arial"><input type="radio" value="tracks" name="orden"></font></td>
<td width="126" style="border-style: none; border-width: medium" height="18"><font size="2" face="Arial">Sub Red </font></td>
</tr>
<tr>
<td width="20" style="border-style: none; border-width: medium" height="16">&nbsp;</td>
<td width="32" style="border-style: none; border-width: medium" height="16">&nbsp;</td>
<td width="25" style="border-style: none; border-width: medium" height="16">&nbsp;</td>
<td width="40" style="border-style: none; border-width: medium" height="16">&nbsp;</td>
<td width="20" style="border-style: none; border-width: medium" height="16"></td>
<td width="126" style="border-style: none; border-width: medium" height="16"></td>
</tr>
<tr>
<td style="border-style: none; border-width: medium" colspan="6" height="12">&nbsp;</td>
</tr>
<tr>
<td width="20" style="border-style: none; border-width: medium" height="17">&nbsp;</td>
<td style="border-style: none; border-width: medium" height="17" colspan="3">&nbsp;</td>
<td width="20" style="border-style: none; border-width: medium" height="17">&nbsp;</td>
<td width="126" style="border-style: none; border-width: medium" height="17">&nbsp;</td>
</tr>
</table> </td>
</tr>
<tr>
<td width="104%" align="right" style="border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">
<b><font face="Arial" size="2">Cantidad de resultados:</font></b></td>
<td width="65%" style="border-left-style: none; border-left-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: none; border-bottom-width: medium" bgcolor="#EBEBEB">
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" width="100%" id="AutoNumber3">
<tr>
<td width="22" style="border-style: none; border-width: medium"><font face="Arial">
<input type="radio" value="10" name="cantidad">
</font></td>
<td width="34" style="border-style: none; border-width: medium">
<font face="Arial" size="2">1</font></td>
<td width="20" style="border-style: none; border-width: medium">
<font face="Arial"><input type="radio" value="20" name="cantidad"></font></td>
<td width="35" style="border-style: none; border-width: medium">
<font face="Arial" size="2">2</font></td>
<td width="20" style="border-style: none; border-width: medium">
<font face="Arial"><input type="radio" value="30" name="cantidad"></font></td>
<td width="147" style="border-style: none; border-width: medium">
<font face="Arial" size="2">3</font></td>
</tr>
</table> </td>
</tr>
<tr>
<td width="104%" align="right" style="border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium" bgcolor="#EBEBEB"> </td>
<td width="65%" style="border-left-style: none; border-left-width: medium; border-top-style: none; border-top-width: medium" bgcolor="#EBEBEB">
<font face="Arial"><input type="submit" value="Buscar"></font></td>
</tr>
</table>
</form>
</center>
</div>

</body>

</html>

y eesto es el asp Resultado.asp

<%
Dim mostrar 'cantidad de registros a mostrar por página'
Dim cant_paginas 'cantidad de páginas que recibimos'
Dim pagina_actual 'La página que mostramos'
Dim registro_mostrado 'Contador utilizado para mostrar las páginas'
Dim I

ip = request.querystring("ip")
mascara = request.querystring("mascara")
cantidad = request.querystring("cantidad")
subred = request.querystring("subred")
orden = request.querystring("orden")
alf = request.querystring("alf")

if cantidad="10" then
mostrar = 10
elseif cantidad="20" then
mostrar = 20
elseif cantidad="30" then
mostrar = 30
end if
if orden = "" then
response.redirect "BUSCADOR.asp"
end if

If Request.QueryString("page") = "" Then
pagina_actual = 1
Else
pagina_actual = CInt(Request.QueryString("page"))
End If
strsql = "SELECT * FROM table1 where UCase(ip) like '%" & UCase(Request("ip")) & "%' AND UCase(mascara) like '%" & UCase(Request("mascara")) & "%' AND UCase(Subred) like '%" & UCase(Request("subred")) & "%' order by "& ordesn & " "&alf

Set oConn = Server.CreateObject("ADODB.Connection")
OConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Datos\Consultas2.mdb"

' creo el RecordSet y defino la cantidad de registros a mostrar'
Set RS = Server.CreateObject("ADODB.Recordset")
RS.PageSize = mostrar
RS.CacheSize = mostrar

' Abro la tabla...'
RS.Open strSQL, oConn,3,1
'cuento las páginas que se formaron con la variable mostrar'
cant_paginas = RS.PageCount

' Si el pedido de página cae afuera del rango,'
' lo modifico para que caiga adentro'
If pagina_actual > cant_paginas Then pagina_actual = cant_paginas
If pagina_actual < 1 Then pagina_actual = 1
%>
<body style="background-color: #FFFFF4">
<%

If cant_paginas = 0 Then%>

<p><font face="Arial">Se encontraron <font color="#FF0000"> <b>0</b> resultados</font></font></p>

<ul>
<li><font face="Arial"><a href="buscador.asp">Buscar nuevamente</a></font></li>
<li><font face="Arial">
<a href="resultados.asp?orden=mascara&ip=<%=ip%>&cantidad=10">Repetir la busqueda sin restricciones</a></font></li>
</ul>
<%
'sino, si es que encuentra registros'
Else
' Nos movemos a la página elegida'
RS.AbsolutePage = pagina_actual
' muestra el dato de la página en la que estamos...'
%>
<div align="center">
<table border="1" cellspacing="1" style="border-width:0; border-collapse: collapse" bordercolor="#111111" width="42%" id="AutoNumber1">
<tr>
<td width="44%" bgcolor="#CCCCFF" style="border-left:medium none #111111; background-color: #DDDDFF; border-right-style:none; border-right-width:medium; border-top-style:none; border-top-width:medium; border-bottom-style:none; border-bottom-width:medium" align="center"><p style="text-align: left"><b><font color="#003366" face="Arial" size="2"> IP </font></b></td>
<td width="28%" bgcolor="#CCCCFF" style="border-style: none; border-width: medium; background-color: #DDDDFF; text-align:center"><font color="#003366" face="Arial" size="2"><b>Mascara</b></font></td>
<td width="18%" bgcolor="#CCCCFF" style="border-style: none; border-width: medium; background-color: #DDDDFF" align="center"><p align="center"><font color="#003366" face="Arial" size="2"><b> Subred</b></font></td>
<%

' Hacemos el bucle mostrando los datos del registro'
registro_mostrado = 0
Do While registro_mostrado < mostrar And Not RS.EOF
if colorfila = 0 then
color= "#FFFFFF"
colorfila=1
else
color="#F3F3F3"
colorfila=0
end if
%>
<tr>
<td width="44%" style="border-style:none; border-width:medium; background-color: <%= color %>; "><font face="Arial" size="2"><b><%=RS("ip")%></b> </font></td>
<td width="28%" style="border-style:none; border-width:medium; background-color: <%= color %>; text-align:left; "><font face="Arial" size="2"><%=RS("mascara")%></font> </td>
<td width="18%" align="center" style="border-style:none; border-width:medium; background-color: <%= color %>; text-align:center; "><font face="Arial" size="2"><%=RS("subred")%> </font></td>
<td width="1%" align="center" style="border-style:none; border-width:medium; background-color: <%= color %>; text-align:center; "><font face="Arial" size="2"> </font></td>
<td width="9%" align="center" style="border-style:none; border-width:medium; background-color: <%= color %>; text-align:center; "><p></td>
</tr>
<%
' Sumamos 1 a los mostrados'
registro_mostrado = registro_mostrado + 1
' Nos movemos al próximo registro...'
RS.MoveNext
Loop

End If
%>
</table>
</center>
</div>

<%
' Cerramos y limpiamos...'
RS.Close
Set RS = Nothing
oConn.Close
Set oConn = Nothing
%>
<div align="center"><br>
<font size="2" face="Arial">
<%

If pagina_actual > 1 Then
%> </font><font size="2"> <a href="resultados.asp?eje=30&page=<%= pagina_actual - 1 %>&ip=<%=ip%>&mascara=<%=mascara%>&subred=<%=subred%>&orden=<%=orden%>&cantidad=<%=cantidad%>">
<font face="Arial">[</font><b><font face="Arial"></font></b><font face="Arial"> anterior ]</font></a><font face="Arial"> <%
End If

' mostramos la paginacion por numeros de página'
For I = 1 To cant_paginas
if I = pagina_actual Then
%> <font color="#FF3300">
<b><%= I %></b></font>
<%
Else
%>
<a href="resultados.asp?eje=30&page=<%= I %>&ip=<%=ip%>&mascara=<%=mascara%>&subred=<%=subred%>&orden=<%=orden%>&cantidad=<%=cantidad%><%= I %>"></a>
<%
End if
Next

If pagina_actual < cant_paginas Then
%>
</font> <a href="resultados.asp?eje=30&page=<%= pagina_actual + 1 %>&ip=<%=ip%>&mascara=<%=mascara%>&subred=<%=subred%>&orden=<%=orden%>&cantidad=<%=cantidad%>">
<font face="Arial">[ </font>


<font size="2" face="Arial"> Siguiente
</font>


<font face="Arial" size="2">]</font></a><font size="2">
<br>
</font>

<%
End If

%>
</div>

<br>
<center><font face="Arial" size="1"><a href="buscador.asp">Buscar de nuevo</a></font></center>
</BODY>
</HTML>

pero no se que esta malo si alguien me puede ayudar gracias


   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar