hola, la duda es ke, en la página de resultados, ya tengo hecho el esquema de representación de resultados xk kiero ke estos(si hay) se muestren de una manera determinada y ke solo relleno los datos de los ke van apareciendo y si no hay como en las tablas no tengo puesta ninguna altura ni anchura determinadas no me aparecerian, lo único es ke, el bloque while se supone ke tiene ke abarcar todas las tablas pero cuando deja de haber resultados tiene ke salir del bucle while y no rellenar + datos, eso es lo ke no se como hacer. Os paso un poco + de código a ver si entendeis mejor:
Código:
dim con,rs,sql,cuenta,cat
Set db = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
con="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/riojavina/data/bbddRiojavina.mdb")
db.open con
'definimos las variables de busqueda
Dim Temp,Rango,contador
Rango=Request("Tipo")
If Rango="1" Then
'En la Tabla la palabra que buscamos
Temp="Select * From Productos Where Criterio='" & Request("palabra")'"
Else
Temp="Select * From Productos Where InStr(UCase([Criterio]),'" & UCase(Request("palabra")) & "')>0"
End If
set rs=db.execute(Temp)
If rs.BOF And rs.EOF Then
%>
<!-- si no encuentra nada nos da este mensaje -->
<p><font face="Tahoma" size="2">No se ha encontrado nada con <font face="Tahoma" size="2"><strong><%=Request("palabra")%></strong></font>en la Base de Datos</font></p>
<!-- aquí comienza el Script que nos muestra los resultados, si los encuentra, en una tabla -->
<tr valign="top">
<td height="312" colspan="2"> <table width="748" height="312" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="18"> </td>
<td valign="top"><table width="712" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="178" height="106" id=11>
<%
Else
contador=1
%>
<%While Not rs.EOF%>
<table width="178" height="106" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="50" id=1><table width="50" height="106" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="8" align="left" class="normal"><strong><%=contador%></strong></td>
</tr>
<tr>
<td align="center" valign="top"><img src='<%=rs.Fields("URLImgPeke")%>'></td>
</tr>
</table></td>
<td width="1" bgcolor="#666666" class="vacio"> </td>
<td><table width="100%" height="106" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="11"> </td>
<td class="normal"><strong><%=rs.Fields("NomMarca")%></strong></td>
</tr>
<tr>
<td width="11"> </td>
<td class="normal"><%=rs.Fields("NomProducto")%></td>
</tr>
<tr>
<td width="11"> </td>
<td class="normal">Acidez <%=rs.Fields("Acidez")%></td>
</tr>
<tr>
<td width="11"> </td>
<td class="normal"><a href="datos_ejemplo.htm"><img src="../images/mas.gif" width="11" height="11" border="0"></a>
Información</td>
</tr>
</table></td>
</tr>
</table></td>
<td width="178" height="106" id=2>
<%
'si encuentra mas de un resultado nos hace una celda mas en la tabla
if rs.EOF=true then
wend
else
rs.MoveNext
contador=contador+1
end if
%>
<table width="178" height="106" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="50" id=1><table width="50" height="106" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="8" align="left" class="normal"><strong><%=contador%></strong></td>
</tr>
<tr>
<td align="center" valign="top"><img src='<%=rs.Fields("URLImgPeke")%>'></td>
</tr>
</table></td>
<td width="1" bgcolor="#666666" class="vacio"> </td>
<td><table width="100%" height="106" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="11"> </td>
<td class="normal"><strong><%=rs.Fields("NomMarca")%></strong></td>
</tr>
<tr>
<td width="11"> </td>
<td class="normal"><%=rs.Fields("NomProducto")%></td>
</tr>
<tr>
<td width="11"> </td>
<td class="normal">Acidez <%=rs.Fields("Acidez")%></td>
</tr>
<tr>
<td width="11"> </td>
<td class="normal"><a href="datos_ejemplo.htm"><img src="../images/mas.gif" width="11" height="11" border="0"></a>
Información</td>
</tr>
</table></td>
</tr>
</table></td>
<%
'si encuentra mas de un resultado nos hace una celda mas en la tabla
rs.MoveNext
Wend
rs.Close
db.Close
End If
%>
Muxas Gracias.