<%@LANGUAGE="VBSCRIPT"%> <% Set oRS = Server.CreateObject("ADODB.Recordset") Set oRS2 = Server.CreateObject("ADODB.Recordset") Set oRS3 = Server.CreateObject("ADODB.Recordset") Set oRS4 = Server.CreateObject("ADODB.Recordset") Set oRS8 = Server.CreateObject("ADODB.Recordset") Set oConn = Server.CreateObject("ADODB.connection") oConn.ConnectionString = "DSN=madrideasy.com.mm_strmme_string" oConn.Open oRS.ActiveConnection = oConn oRS2.ActiveConnection = oConn oRS3.ActiveConnection = oConn oRS4.ActiveConnection = oConn oRS8.ActiveConnection = oConn aux = request("id_idioma") + 0 aux2 = session("id_idioma") + 0 If aux = 0 Then If aux2 = 0 Then session("id_idioma") = 1 Else session("id_idioma") = request("id_idioma") End If sSelect1 = "SELECT * FROM IDIOMAS WHERE id_idioma="&session("id_idioma")&"" sSelect2 = "SELECT id_idioma, gif FROM IDIOMAS" sSelect3 = "SELECT tipo_via, nombre_via, numero, bloque, escalera, piso, puerta, zona, amueblado, foto1 FROM PISOS WHERE destacado=1" sSelect8 = "SELECT textocomotrabajamos FROM IDIOMAS2 WHERE id_idioma="&session("id_idioma")&"" oRS.Source = sSelect1 oRS.Open() oRS2.Source = sSelect2 oRS2.Open() oRS3.Source = sSelect3 oRS3.Open() oRS8.Source = sSelect8 oRS8.Open() varaux1=oRS("textomenu3") varaux2=oRS("selecciona") %> ..:::Madrid Easy

<% While Not oRS2.EOF If oRS2("gif") <> "images/" Then %> ">" border=0 width="21" height="20"> <% End If oRS2.MoveNext Wend %>
<%=oRS("buscatupiso")%>     Go
<%=varaux1%>
')" onMouseOut="boxOff(this)" height="20"><%=oRS("menu1")%> ')" onMouseOut="boxOff(this)" height="20"><%=oRS("menu2")%> <%=oRS("menu3")%> ')" onMouseOut="boxOff(this)" bgcolor="#cfd797" height="20"><%=oRS("menu4")%> ')" onMouseOut="boxOff(this)" bgcolor="#cfd797" height="20"><%=oRS("menu5")%> ')" onMouseOut="boxOff(this)" bgcolor="#cfd797" height="20"><%=oRS("menu6")%> ')" onMouseOut="boxOff(this)" bgcolor="#cfd797" height="20"><%=oRS("menu7")%>

 

<%=oRS("comotrabajamos")%>
<%=oRS8("textocomotrabajamos")%>
     
<%=oRS("perfilclientes")%>
<%=oRS("comotrabajamos")%>
<%=oRS("consejos")%>
<%=oRS("faq")%>
<%=oRS("ayuda")%>
<%=oRS("formulario")%>
     
   

©2002 Madrid Easy.  <%=oRS("privacidad")%>.  <%=oRS("legal")%>.
<% oRS.Close() oRS2.Close() oRS3.Close() oRS8.Close() oConn.Close() %>