<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim Pagine__MMColParam
Pagine__MMColParam = "servizi"
If (Request("MM_EmptyValue") <> "") Then
Pagine__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim Pagine
Dim Pagine_numRows
Set Pagine = Server.CreateObject("ADODB.Recordset")
Pagine.ActiveConnection = MM_Generale_STRING
Pagine.Source = "SELECT ID, PaginaIT, TitoloEN, TestoEN, Foto1 FROM Pagine WHERE PaginaIT = '" + Replace(Pagine__MMColParam, "'", "''") + "'"
Pagine.CursorType = 0
Pagine.CursorLocation = 2
Pagine.LockType = 1
Pagine.Open()
Pagine_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
Pagine_numRows = Pagine_numRows + Repeat1__numRows
%>
Services / Naples Bed & Breakfast
Services
-Free
private parking
-On request guests may be fetched from the Capodichino Naples
airport and Aversa station or Sant'Antimo.
-Rooms
with independent entrance
-Each room has its own private outdoor space furnished
with chairs and table
-Daily cleaning of the room
-Change towels every three days
Children under the age of 3 years old are free of charge.
<% If Not Pagine.EOF Or Not Pagine.BOF Then %>
<%
While ((Repeat1__numRows <> 0) AND (NOT Pagine.EOF))
%>
-Free
private parking
Common Services: