Andorra Principat

<%@LANGUAGE="VBSCRIPT"%> <% set parroquia = Server.CreateObject("ADODB.Recordset") parroquia.ActiveConnection = MM_andorraprincipat_STRING parroquia.Source = "SELECT * FROM Parroquies WHERE ID = " & Request.Querystring("Parroquia") & ";" parroquia.CursorType = 0 parroquia.CursorLocation = 2 parroquia.LockType = 3 parroquia.Open() parroquia_numRows = 0 %> <% Const adOpenStatic = 3 Const adCmdText = &H0001 Const adUseClient = 3 set restaurants = Server.CreateObject("ADODB.Recordset") restaurants.ActiveConnection = MM_andorraprincipat_STRING strSQL = "SELECT * FROM Restaurants WHERE ID = " & Request.Querystring("Parroquia") & " ORDER BY Prioritat DESC, Tenedors DESC, Restaurant ASC;" restaurants.Open strSQL, ,adOpenStatic , , adCmdText If NOT restaurants.EOF AND NOT restaurants.BOF Then intNumRecs = restaurants.RecordCount end if %> Andorra Principat

<% if (parroquia.Fields.Item("Banner_restaurant").Value) <> "" then %> " target="_blank">

" border="0"> <% else %>

<% end if %>

contacteu amb nosaltres

Busca en www.google.com

PRESENTACIÓ

EL PRINCIPAT D'ANDORRA

PAISATGES del PRINCIPAT

SENYERES, MAPES I ...

+ Premsa al dia

PATROCINADOR

PUBLICACIONS DE PREMSA
sobre el Portal
andorraprincipat.com
> veure

El idioma oficial al Principat d'Andorra es el Català; així doncs els continguts rebuts per els nostres usuaris de les seccions de IMMOBILIÀRIA BORSA DE TREBALL i ANUNCIS VARIS només es publicaran en tal idioma.

Avís legal

Per visitar >> Parròquies >><%=(parroquia.Fields.Item("Parroquia").Value)%> >> On menjar

" width="119" height="103" alt="<%=(parroquia.Fields.Item("Parroquia").Value)%>">

<%=UCASE(parroquia.Fields.Item("Parroquia").Value)%> - ON MENJAR
<%=(parroquia.Fields.Item("Text_parroquia").Value)%>

<% If restaurants.EOF And restaurants.BOF Then %> <% else If NOT restaurants.EOF AND NOT restaurants.BOF Then %>

	No hem trobat cap hotel a la base de dades.	S'han trobat <%=(intNumRecs)%> coincidències
	Restaurants

<% Do While Not restaurants.EOF %>

> <%=(restaurants.Fields.Item("Restaurant").Value)%> <% if (restaurants.Fields.Item("Tenedors").Value) = 5 then %><% else if (restaurants.Fields.Item("Tenedors").Value) = 4 then %><% else if (restaurants.Fields.Item("Tenedors").Value) = 3 then %><% else if (restaurants.Fields.Item("Tenedors").Value) = 2 then %><% else if (restaurants.Fields.Item("Tenedors").Value) = 1 then %><% else if (restaurants.Fields.Item("Tenedors").Value) = 0 then %> <% end if %><% end if %><% end if %><% end if %><% end if %><% end if %>
   <%=(parroquia.Fields.Item("Parroquia").Value)%>
   <% if (restaurants.Fields.Item("Adressa").Value) <> "" then %><%=(restaurants.Fields.Item("Adressa").Value)%><% end if %>
   <% if (restaurants.Fields.Item("Telefon").Value) <> "" then %>Tel: <%=(restaurants.Fields.Item("Telefon").Value)%><% end if %><% if (restaurants.Fields.Item("Fax").Value) <> "" then %> - Fax: <%=(restaurants.Fields.Item("Fax").Value)%><% end if %>
<% if (restaurants.Fields.Item("Web").Value) <> "" then %>   " target="_blank"><%=(restaurants.Fields.Item("Web").Value)%>
<% end if %> <% if (restaurants.Fields.Item("Email").Value) <> "" then %>   "><%=(restaurants.Fields.Item("Email").Value)%>
<% end if %>

<% restaurants.MoveNext Loop %> <% end if %> <% end if %>

ESCUT

   > BREU RESUM
   > ROMÀNIC
   > OCI I CULTURA
   > ESPORTS
   > ACTIVITATS
   > DATES D'ACTES          IMPORTANTS
   > PER VISITAR
   > AGENDA
   > COMPOSICIÓ POLÍTICA
   > TOPONOMÍA
   > DADES D'INTERÉS
   > ON MENJAR
   > ON DORMIR
   > COMERÇ