<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 'variabile catena e dimensione session("finituraCatena") = request.Form("finituraCatena") 'response.Write session("tipologia") 'response.Write session("tipoCatena") 'response.Write session("dimensioneCartena") 'response.Write session("finituraCatena") dimensioneCatena = session("dimensioneCatena") macroTipo = session("macroTipo") %> <% Dim cursori Dim cursori_numRows Set cursori = Server.CreateObject("ADODB.Recordset") cursori.ActiveConnection = MM_goldengates_STRING cursori.Source = "SELECT * FROM cursori WHERE a" & dimensioneCatena & " = -1 AND " & macroTipo & " = -1 AND plastica = 0 ORDER BY nome ASC" cursori.CursorType = 0 cursori.CursorLocation = 2 cursori.LockType = 1 cursori.Open() cursori_numRows = 0 %> <% Dim tiretti Dim tiretti_numRows Set tiretti = Server.CreateObject("ADODB.Recordset") tiretti.ActiveConnection = MM_goldengates_STRING tiretti.Source = "SELECT * FROM cursori WHERE a" & dimensioneCatena & " = -1 AND " & macroTipo & " = -1 AND plastica = -1 ORDER BY nome ASC" tiretti.CursorType = 0 tiretti.CursorLocation = 2 tiretti.LockType = 1 tiretti.Open() tiretti_numRows = 0 %> <% Dim HLooper1__numRows HLooper1__numRows = -7 Dim HLooper1__index HLooper1__index = 0 cursori_numRows = cursori_numRows + HLooper1__numRows %> <% Dim HLooper2__numRows HLooper2__numRows = -7 Dim HLooper2__index HLooper2__index = 0 tiretti_numRows = tiretti_numRows + HLooper2__numRows %> Golden Gates S.r.l. - Chiusure lampo, nastri a strappo, filati cucirini, nastri elastici, minuterie metalliche, minuterie plastiche, tessuti...
Golden Gates S.r.l. - Chiusure lampo, nastri a strappo, filati cucirini, nastri elastici, minuterie metalliche, minuterie plastiche, tessuti...
Golden Gates S.r.l.
Azienda Catalogo prodotti Ordini on-line News Contatti

Tipologia
e dimensioni

Tipologia
catena

Finitura
catena

Tipo e finitura cursore

Colore fettuccia

Quantità
richiesta

Dati
cliente

Conferma
ordine

<% if session("tipoCatena") <> "Invisibile" then %>

Tipo cursore
Seleziona un tipo di cursore: in metallo oppure tiretto in gomma.
I cursori proposti sono quelli disponibili per la misura di catena indicata in precedenza.

<% If Not cursori.EOF Or Not cursori.BOF Then %>

Cursori in metallo

<% startrw = 0 endrw = HLooper1__index numberColumns = 7 numrows = -1 while((numrows <> 0) AND (Not cursori.EOF)) startrw = endrw + 1 endrw = endrw + numberColumns %> <% While ((startrw <= endrw) AND (Not cursori.EOF)) %> <% startrw = startrw + 1 cursori.MoveNext() Wend %> <% numrows=numrows-1 Wend %>
" target="_blank">" alt="Clicca per ingrandire" height="100" border="0">

" onclick="abilitaGalvanica(false);MM_setTextOfTextfield('tiretto','','false')"> Tipo <%=(cursori.Fields.Item("nome").Value)%>

 

Finitura galvanica cursore in metallo
Se non specificata la galvanica del cursore sarà la stessa di quella della catena.

Stesso colore o galvanica della catena

Nickel antico opaco

Nickel antico

Nickel

Ottone

Ottone antico

Ottone brunito

Rame


<% End If ' end Not cursori.EOF Or NOT cursori.BOF %> <% If Not tiretti.EOF Or Not tiretti.BOF Then %>

Tiretti in gomma

<% startrw = 0 endrw = HLooper2__index numberColumns = 7 numrows = -1 while((numrows <> 0) AND (Not tiretti.EOF)) startrw = endrw + 1 endrw = endrw + numberColumns %> <% While ((startrw <= endrw) AND (Not tiretti.EOF)) %> <% startrw = startrw + 1 tiretti.MoveNext() Wend %> <% numrows=numrows-1 Wend %>
" target="_blank">" alt="Clicca per ingrandire" height="100" border="0">

" onclick="abilitaGalvanica(true);MM_setTextOfTextfield('tiretto','','true')"> Tipo <%=(tiretti.Fields.Item("nome").Value)%>

 
<% End If ' end Not tiretti.EOF Or NOT tiretti.BOF %>

 

 

<% end if %> <% if session("tipoCatena") = "Invisibile" then %>

Tipo cursore
Scelta non disponibile per catena "Invisibile". Verrà utilizzato un cursore standard.

<% end if %>

 

 

<% cursori.Close() Set cursori = Nothing %> <% tiretti.Close() Set tiretti = Nothing %>