<% if zona <> "" then if porto = "fiu" then select case pag case "cont" pag = " in contanti" query = "SELECT zona, tariffa FROM tab_zone, tab_tar_cont_fiu where tab_tar_cont_fiu.cod_zona_cont_fiu = tab_zone.cod_zona_cont_fiu AND tab_zone.zona = '" & zona & "'" case "diff" pag = " 30 giorni" query = "SELECT zona, tariffa FROM tab_zone, tab_tar_diff_fiu where tab_tar_diff_fiu.cod_zona_diff_fiu = tab_zone.cod_zona_diff_fiu AND tab_zone.zona = '" & zona & "'" end select else if porto = "cia" then select case pag case "cont" pag = " in contanti" query = "SELECT zona, tariffa FROM tab_zone, tab_tar_cont_cia where tab_tar_cont_cia.cod_zona_cont_cia = tab_zone.cod_zona_cont_cia AND tab_zone.zona = '" & zona & "'" case "diff" pag = " 30 giorni" query = "SELECT zona, tariffa FROM tab_zone, tab_tar_diff_cia where tab_tar_diff_cia.cod_zona_diff_cia = tab_zone.cod_zona_diff_cia AND tab_zone.zona = '" & zona & "'" end select end if end if set connection = Server.createObject("ADODB.Connection") connection.open(conn) Set result = connection.execute(query) if not (result.EOF) then zona = result.fields("zona") tariffa = result.fields("tariffa") %> <% if porto = "fiu" then aeroporto = "Fiumicino" else aeroporto = "Ciampino" end if %> <% 'response.write(zona & "-" & tariffa & " Pagamento " & pag) else %> <% end if ELSE query = "SELECT * FROM tab_zone ORDER BY zona" set connection = Server.createObject("ADODB.Connection") connection.open(conn) Set result = connection.execute(query) if result.eof then %> <% response.end() result.close() ELSE %>

Tariffa richiesta per il servizio di autonoleggio.

Servizio di Andata o Ritorno.

Tratta: <%=zona%> - <%=aeroporto%>

Tariffa: €. <%=tariffa%>  - esclusa I.V.A. 10%

Condizioni di pagamento:<%=pag%>

Corrispondenza non trovata

Selezionare l'aeroporto Fiumicino Ciampino

Selezionare zona di partenza o arrivo <% do while(not result.EOF) %> "><%=result.fields("zona")%> <% if not(result.eof) then result.moveNext() end if loop end if %>

Metodo di pagamento: Contanti

<%end if%>