<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1__MMColParam Recordset1__MMColParam = "CA" if (Request("MM_EmptyValue") <> "") then Recordset1__MMColParam = Request("MM_EmptyValue") %> <% prov = request.QueryString("speciali") Set TConn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") TConn.connectionSTRING = "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("agsar.mdb") TConn.Open ag = lcase(ag) ag = replace(ag,"age","") ' Creo la stringa sql ssql = "SELECT Elenco.IDElencoIndirizzi, Elenco.Nome_Agenzia, Elenco.Loc, Elenco.plus, Elenco.Foto FROM Elenco where " & prov & "='" & prov & "' ORDER BY Elenco.plus DESC, Elenco.Nome_Agenzia;" 'response.write (sSQL) 'response.End() ' Creo un recordSet e lo apro Set Recordset1 = Server.CreateObject("ADODB.Recordset") set Recordset1 = TConn.Execute(sSQL) %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> LE AGENZIE DI VIAGGIO DELLA SARDEGNA

       


 

Le Agenzie di Viaggio della
SARDEGNA
Elenco delle agenzie facenti parte della tipologia " <% = prov %> "

Cliccando sul nome dell'agenzia compaiono i dettagli dell'Azienda


<% fp_sQry="SELECT * FROM ""Elenco indirizzi"" WHERE (operatore = '::operatore::') ORDER BY Loc ASC,Nome_Agenzia ASC" fp_sDefault="operatore=operatore" fp_sNoRecords="" fp_sDataConn="Database1" fp_iMaxRecords=256 fp_iCommandType=1 fp_iPageSize=0 fp_fTableFormat=True fp_fMenuFormat=False fp_sMenuChoice="Nome_Agenzia" fp_sMenuValue="Nome_Agenzia" fp_iDisplayCols=2 fp_fCustomQuery=False BOTID=0 fp_iRegion=BOTID %> <% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %>
Nessun record restituito.
  " class="testoblu"><%=(Recordset1.Fields.Item("Nome_Agenzia").Value)%> <%=(Recordset1.Fields.Item("Loc").Value)%> " >

 

 

 

home | come arrivare | dettaglianti | ricettivo | tour operator | congressi DMC
Cagliari | Sassari | Nuoro | Oristano | Medio Campidano | Ogliastra | Olbia Tempio | Carbonia Iglesias
 

L'Annuario delle Agenzie di Viaggio e dei Tour Operator della Sardegna www.agenziediviaggiosardegna.it é un'idea di Sa Oche ® - servizi per la comunicazione
e-mail: info@agenziediviaggiosardegna.it
<% Recordset1.Close() %>