
11/05/2005, 21:33
|
 | | | Fecha de Ingreso: enero-2002 Ubicación: Rancagua - Chile
Mensajes: 1.328
Antigüedad: 23 años, 3 meses Puntos: 2 | |
chucha sorry mariano ahi va el codigo adaptalo a tu antojo
Código:
<table width="195" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="12"><img src="images/spacer.gif" alt="" width="12" height="10"></td>
<%
counter=0
Do While Not Rs.EOF
%>
<td width="183"><table width="182" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="11"><img src="images/index28.gif" alt="" width="11" height="11"></td>
<td width="153"><img src="images/index29.gif" alt="" width="153" height="11"></td>
<td width="18"><img src="images/index30.gif" alt="" width="11" height="11"></td>
</tr>
<tr>
<td background="images/index31.gif"> </td>
<td><table width="153" border="0" cellspacing="0" cellpadding="0">
<tr align="right">
<td colspan="2" class="text1"><SPAN class=Titulos><STRONG>
<Input name="cant<%=Rs("id_prod")%>" type="hidden" class="input" value="1" size="2" maxlength="2">
<%=Rs("producto")%></STRONG></SPAN></td>
</tr>
<tr>
<td width="69"><img src="/v1/productos/<%=Rs("imagen")%>" alt="" width="60" height="60"></td>
<td width="84" align="right"><p class="text2">$<%=FormatNumber(Rs("valor"),0)%>.-</p>
<%
texto_corto = TRIM(RS("descripcion"))
if len(""&texto_corto&"")>60 then
texto_corto = mid(""&texto_corto&"",1,60)&".."
else
texto_corto = RS("descripcion")
end if
%>
<p class="text3 "><%=texto_corto%></p></td>
</tr>
</table></td>
<td background="images/index32.gif"> </td>
</tr>
<tr>
<td colspan="3"><table width="175" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/index33.gif" alt="" width="69" height="39"></td>
<td><img src="images/index34.gif" alt="Comprar <%=Rs("producto")%>" width="45" height="39" border="0" ONCLICK="javascript:window.location='/v1/includes/agregar.asp?cod=<%=Rs("id_prod")%>&cant='+cant<%=Rs("id_prod")%>.value"></td>
<td><img src="images/index35.gif" alt="" width="6" height="39"></td>
<td><a href="/v1/product_detail.asp?id_prod=<%=Rs("id_prod")%>"><img src="images/index36.gif" alt="" width="45" height="39" border="0"></a></td>
<td><img src="images/index37.gif" alt="" width="10" height="39"></td>
</tr>
</table></td>
</tr>
</table>
</td>
<%
counter=counter+1
'Mod me indica cuantas colummnas van el el recorset en este caso para el tamaño del sitio lo tengo en 3
If counter Mod 3=0 Then
%>
</tr>
<td> </td>
<td> </td>
</table>
<table width="195" height="0" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="12"><img src="images/spacer.gif" alt="" width="12" height="10"></td>
<%
End If
Rs.MoveNext
Loop
%>
</tr>
</table>
__________________ Usa títulos específicos y con sentido En las listas de correo o en los grupos de noticias, la cabecera del mensaje es tu oportunidad de oro para atraer la atención de expertos cualificados en aproximadamente 50 caracteres o menos. No los desperdicies en balbuceos como "Por favor ayúdame" (de "POR FAVOR AYÚDAME!!!" ya ni hablamos). No intentes impresionarnos con lo profundo de tu angustia; mejor usa ese preciado espacio para una descripción lo más concisa posible del problema. |