<%@LANGUAGE="VBSCRIPT" LCID="1034"%> <% cSQL = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("..\..\DB\carabelas.mdb") Set conn = Server.CreateObject("ADODB.Connection") conn.Open cSQL Dim cadSQL Dim errTxt Set rsTipos = Server.CreateObject("ADODB.Recordset") rsTipos.ActiveConnection = conn rsTipos.Source = "SELECT tip_ms.tip_cod, tip_des FROM tip_ms INNER JOIN apart_tip ON tip_ms.tip_cod = apart_tip.tip_cod WHERE apart_cod = 2" rsTipos.CursorType = 1 rsTipos.LockType = 3 rsTipos.Open() if Request.QueryString("Error") <> "" then select case Request.QueryString("Error") case "errNomApe" errTxt = "El Nombre/Apellido es obligatorio" case "errFormatoFechaInicio" errTxt = "La fecha de inicio no es una fecha válida" case "errFormatoFechaFin" errTxt = "La fecha de fin no es una fecha válida" case "errFormatoFechaInicio" errTxt = "La fecha de inicio no es una fecha válida" case "errTelefono" errTxt = "Por favor, introduzca su número de teléfono o corrija el formato" case "errCorre" errTxt = "Por favor, introduzca una dirección de e-mail correcta" end select end if %> Ver_apartamentos
 
Indien u kontakt met ons wilt opnemen kunt u dit doen, door de volgende gegevens te gebruiken welke wij hieropvolgend geven.



Avda. Filipinas, 9
03503 Benidorm (Alicante)
Spain.

Tlf.: 00 34 96 585 94 14
       00 34 96 585 94 05

Fax: 00 34 96 586 20 65



©2003, Appartementen Trebol. Alle rechten voorbehouden.
Pagina optimaal voor een resolutie van 800x600 pixels.