:: Venta de equipos nuevos
:: Instalación permanente "a la medida"
:: Venta de equipos usados
:: Alquiler de equipos
:: Fabricación "a la medida"

Lista de equipos en mi canasta:

<% Dim prixTotalProduit, sousTotal sousTotal = 0 'Affichage des produits du panier Dim cptProduit cptProduit = Session("nbProduits") If (cptProduit > 0) Then Dim tabProduits, produitUnitaire tabProduits = Session("panier") For posProduit = 0 To cptProduit - 1 Step 1 If (Trim(tabProduits(4, posProduit)) <> "") Then 'Le produit à un prix produitUnitaire = "$" & tabProduits(4, posProduit) prixTotalProduit = CInt(tabProduits(3, posProduit)) * CDbl(tabProduits(4, posProduit)) sousTotal = sousTotal + prixTotalProduit prixTotalProduit = "$" & prixTotalProduit Else produitUnitaire = "N/D" prixTotalProduit = "N/D" End If %> <% Next End If %>

Equipos	Cantidad	Precio	Total	Suprimir
<%=tabProduits(1, posProduit)%> <%=tabProduits(2, posProduit)%>		<%=produitUnitaire%>	<%=prixTotalProduit%>
Presupuesto total *			$<%=sousTotal%>
Descuente que será aplicado por su representante			-____%

* Los precios que se muestran son a título indicativo solamente.
   Un responsable del Grupo Berger se comunicará con usted proximamente
   para discutir un precio final.

* Todos los precios son en dolares canadienses | Convertidor de divisas