| |
|
|
Produits/Panier |
|
<% strPedido = replace(request.cookies("PedidoTranspack")," "," ")
if instr(strPedido, "[") = 0 then%>
|
Il n'y a aucun produit dans votre panier.
Ajouter des produits à partir de la page correspondante.
(Cornières, Protège-coins en U, Plateaux, Papier Ondulé, Tubes et Anneaux)
|
|
<% else%>
Vérifiez que toutes les données de votre panier sont correctes, remplissez le formulaire avec vos données et cliquez sur
<Envoyer demande de devis>
| DEMANDE DE DEVIS |
| Quantité |
Description |
Eliminer |
<% inicio = instr(strPedido, "[") + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
i = 0
do while longitud > 0
i = i + 1
strTipoProducto = mid(strPedido, inicio, longitud)
inicio = final + 1
select case strTipoProducto
case "ANGULARES":
final = instr(inicio, strPedido, "|")
longitud = final - inicio
strDescripcion = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strLongitud = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "]")
longitud = final - inicio
strCantidad = mid(strPedido, inicio, longitud)%>
| <%=strCantidad%> CORNIÈRES (ANGULARES) |
<%=replace(strDescripcion,"#"," // ")%>
Longueur (Longitud): <%=strLongitud%> mm. |
 |
<% case "BANDEJA/PLATO/DISCO":
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strTipo = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "|")
longitud = final - inicio
strDescripcion = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "]")
longitud = final - inicio
strCantidad = mid(strPedido, inicio, longitud)%>
| <%=strCantidad%> <%=strTipo%> |
<%=replace(strDescripcion,"#"," // ")%> |
|
<% case "CANTONERAS EN U":
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strAlauno = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strAlados = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strAncho = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strEspesor = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "|")
longitud = final - inicio
strHendido = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strLongitud = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "]")
longitud = final - inicio
strCantidad = mid(strPedido, inicio, longitud)%>
| <%=strCantidad%> PROTÈGE-COINS EN U (CANTONERAS EN U) |
Rabat (Ala) 1: <%=strAlauno%> mm.
Rabat (Ala) 2: <%=strAlados%> mm.
Largeur (Ancho): <%=strAncho%> mm.
Épaisseur (Espesor): <%=strEspesor%> mm.
<%=strHendido%>
Longueur (Longitud): <%=strLongitud%> mm. |
|
<% case "DELICATESSEN":
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strAncho = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strLargo = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strGrosor = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "|")
longitud = final - inicio
strDescripcion = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "]")
longitud = final - inicio
strCantidad = mid(strPedido, inicio, longitud)%>
| <%=strCantidad%> DELICATESSEN |
Largeur (Ancho): <%=strAncho%> mm.
Longueur (Largo): <%=strLargo%> mm.
Épaisseur (Grosor): <%=strGrosor%> mm.
<%=replace(strDescripcion,"#"," // ")%> |
|
<% case "ONDULADO":
final = instr(inicio, strPedido, "|")
longitud = final - inicio
strDescripcion = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "]")
longitud = final - inicio
strCantidad = mid(strPedido, inicio, longitud)%>
<%=strCantidad%> mètres
PAPIER ONDULÉ (PAPEL ONDULADO) |
<%=replace(strDescripcion,"#"," // ")%> |
|
<% case "TUBOS/ANILLAS":
final = instr(inicio, strPedido, "|")
longitud = final - inicio
strDescripcion = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "#")
longitud = final - inicio
strLongitud = mid(strPedido, inicio, longitud)
inicio = final + 1
final = instr(inicio, strPedido, "]")
longitud = final - inicio
strCantidad = mid(strPedido, inicio, longitud)%>
| <%=strCantidad%> TUBES/ANNEAUX (TUBOS/ANILLAS) |
<%=replace(strDescripcion,"#"," // ")%>
Longueur (Longitud): <%=strLongitud%> mm. |
|
<% end select
inicio = final + 2
final = instr(inicio, strPedido, "#")
longitud = final - inicio
loop%>
|
|
<% end if%>
|
|
|
