<% session.LCID=1040 %> <% 'recupero il nome della pagina corrente NomePagina = Request.ServerVariables("SCRIPT_NAME") NomePagina = Mid(NomePagina, InstrRev(NomePagina, "/") + 1) 'recupero l'array dalla variabile session, se esiste ovviamente... arrayForm = Session(NomePagina) Function RecuperaValArray(NomeControlloForm, ValoreAssociato) On Error Resume Next 'cerco il numero di valori contenuti nell'array intValoreArry = UBound(arrayForm, 2) 'se la funzione Ubound() non mi genera errori If Err.Number <> 0 Then Exit Function 'comincio a leggere l'array per 'recuperare i valori dei controlli della precedente sessione For intLoop = 0 To intValoreArry 'guardo se il nome del controllo è presente nell'array If LCase(arrayForm(0, intLoop)) = LCase(NomeControlloForm) Then 'se c'è valuto la possibilità che il valore ad esso 'associato sia quello di una checkbox o un bottone di opzione, ad esempio If ValoreAssociato <> "" Then 'se è così setto il valore appropriato If LCase(ValoreAssociato) = LCase(arrayForm(1, intLoop)) Then RecuperaValArray = "CHECKED" Else RecuperaValArray = "" End If Else 'se invece il valore è una stringa RecuperaValArray = arrayForm(1, intLoop) End If Exit Function End If Next End Function %> La Luisa Cioccolata - Vendita cioccolato, praline, torroni, confezioni regalo
 
<% if request.cookies("codCLIE")="" then %><% else %><% end if %>
uova di cioccolata
torroni
tavolette cioccolata
confezioni regalo
 
visite guidate
show room
ricette cioccolata
cioccolata e benessere
progetto africa
cube grand cru
cube grand cru
 
       
       
   
 
 
Inserisci l'email con la quale ti sei registrato:
 
 
   
     
 
       
       
   
Le informazioni riportate su www.laluisa.com possono essere soggette a modifiche senza preavviso.
E' vietata la riproduzione anche parziale di materiali presenti in questo sito.
2007 - all rights reserved© La Luisa Cioccolato S.r.l.