Página principal IV

Independientemente de la secuencia del archivo que estemos ejecutando, queremos que se nos proponga siempre un cambio de lengua. Esto lo haremos de la misma forma que para la página de entrada (home.asp):

<tr><td align="center" bgcolor="#999966" colspan="5"><FONT face="verdana,arial,helvetica" size=2 color="#ffffff">
<!-- #include file="scripts_lengua/cambiolengua.inc" -->
</font></td></tr>

También queremos que en todo momento podamos ver cuál es el estado de nuestro carrito y que se nos proponga la posibilidad de verlo y editarlo. Esta proposición no queremos por supuesto que se dé en el caso en el que nuestro carrito esté vacío. He aquí la forma en la que se ha gestionado esto:

-Estudiamos las posibles situaciones de nuestro carrito y actuamos en consecuencia. El carrito puede estar vacío, poseer un único articulo o presentar más de uno. Para cada una de esas circunstancias el mensaje a imprimir ha de ser diferente. Este tipo de situaciones en las que los valores de una variable pueden ser englobados en distintos casos pueden ser fácilmente regulados con condiciones del tipo If. Sin embargo, hemos preferido mostraros otra forma de llevar a cabo este tratamiento mediante la estructura Select Case la cual resulta fácilmente comprensible:

'Comprobamos si el carrito esta vacio, tiene un articulo o mas de uno para poner el mensaje apropiado
Select Case Session("num_articulos")
Case 0   imprimir("carrito_vacio")
Case 1   imprimir("carrito_uno")
Case Else   imprimir("carrito_muchos1")
            Response.Write " "&Session("num_articulos")
            imprimir("carrito_muchos2")
End Select

-Para los casos en el que el carrito no esta vacío, proponemos también un enlace para verlo y editarlo. Estas tareas serán llevadas a cabo por el script carrito.asp:

<%
If Session("num_articulos")<>0 Then
%>
<tr>
<td bgcolor="#cc9900" align="center"><FONT face="verdana,arial,helvetica" size=2 color="#ffffff"><a href="carrito.asp"><%imprimir("vercarrito")%></a></font><br></td>
</tr>
<%End If%>

-Terminamos cerrando la conexión a la base de datos:

<!--#include file="plantillas/connoff.inc"-->

Ir la librería