<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% ' *** Edit Operations: declare variables Dim MM_editAction Dim MM_abortEdit Dim MM_editQuery Dim MM_editCmd Dim MM_editConnection Dim MM_editTable Dim MM_editRedirectUrl Dim MM_editColumn Dim MM_recordId Dim MM_fieldsStr Dim MM_columnsStr Dim MM_fields Dim MM_columns Dim MM_typeArray Dim MM_formVal Dim MM_delim Dim MM_altVal Dim MM_emptyVal Dim MM_i MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Request.QueryString End If ' boolean to abort record edit MM_abortEdit = false ' query string to execute MM_editQuery = "" %> <% ' *** Insert Record: set variables If (CStr(Request("MM_insert")) = "form1") Then MM_editConnection = MM_connPWPR_STRING MM_editTable = "MainTable" MM_editRedirectUrl = "../HTML_Pages/ES_Contracts.html" MM_fieldsStr = "EntryDate|value|MoreInfo|value|Resort|value|HouseStyle|value|AvailableToPay|value|Title|value|FirstName|value|HomePhone|value|Surname|value|Mobile|value|HomeMail|value|Address1|value|Address2|value|Town|value|TRANSACTION|value|County|value|PostCode|value|Country|value" MM_columnsStr = "EntryDate|',none,''|MoreInfo|',none,''|Resort|',none,''|HouseStyle|',none,''|AvailableToPay|',none,''|Title|',none,''|FirstName|',none,''|HomePhone|',none,''|Surname|',none,''|Mobile|',none,''|HomeMail|',none,''|Address1|',none,''|Address2|',none,''|Town|',none,''|TRANSACTION|',none,''|County|',none,''|PostCode|',none,''|Country|',none,''" ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If End If %> <% ' *** Insert Record: construct a sql insert statement and execute it Dim MM_tableValues Dim MM_dbValues If (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_formVal = MM_fields(MM_i+1) MM_typeArray = Split(MM_columns(MM_i+1),",") MM_delim = MM_typeArray(0) If (MM_delim = "none") Then MM_delim = "" MM_altVal = MM_typeArray(1) If (MM_altVal = "none") Then MM_altVal = "" MM_emptyVal = MM_typeArray(2) If (MM_emptyVal = "none") Then MM_emptyVal = "" If (MM_formVal = "") Then MM_formVal = MM_emptyVal Else If (MM_altVal <> "") Then MM_formVal = MM_altVal ElseIf (MM_delim = "'") Then ' escape quotes MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'" Else MM_formVal = MM_delim + MM_formVal + MM_delim End If End If If (MM_i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbValues & "," End If MM_tableValues = MM_tableValues & MM_columns(MM_i) MM_dbValues = MM_dbValues & MM_formVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End If End If %> Polaris World Reventas - Llama 666 136 501

La Torre Golf Resort

La Torre Golf Resort ofrece una amplia variedad de viviendas, con opciones adaptadas a todos los estilos de vida y presupuestos.

Apartamentos de dos dormitorios con unas excelentes vistas sobre el campo de golf y piscina comunitaria, adosados de dos plantas con jardín privado y posibilidad de piscina y villas de 2 y 3 dormitorios con grandes parcelas, para aquellos que buscan espacio para sus días de relax. Dispone de un magnífico Town Centre, estructurado en torno a un espléndido lago, que ofrece la más completa oferta de servicios, incluyendo un Hotel InterContinental de 5 estrellas y la más variada oferta gastronómica y de ocio que puedas imaginar.Grandes avenidas flanqueadas por la más variada vegetación. Un universo al alcance de la mano y la tranquilidad de sentirse protegido por un eficaz servicio de seguridad. Así es La Torre Golf Resort.

Articulado alrededor de un gran campo de golf de 18 hoyos diseñado por Nicklaus Design, La Torre Golf Resort cuenta con 1.400.000 m2 y un total de 2.648 viviendas de diferentes características: villas, casas adosadas y apartamentos de lujo, repartidos dentro de un perímetro cerrado. La Torre Golf Resort se encuentra a tan solo 15 Km de las mejores playas del Mar Menor, y a mitad de camino entre éstas y la ciudad de Murcia. Un emplazamiento ideal para disfrutar de todos los encantos que ofrece la región de Murcia, incluido el Parque Regional de El Valle que se encuentra a tan solo unos pocos kilómetros del resort.

A nivel de comunicaciones, La Torre Golf Resort está perfectamente comunicado por carretera, y a tan solo 15 minutos del Aeropuerto Internacional de Murcia – San Javier y una hora del Aeropuerto de Alicante, lo que le permite estar perfectamente comunicado con las principales capitales de Europa.

 

PROPIEDADES