Construccion - Remodelacion - Remodelacion De Casa - Remodelacion Hogar - Remodelacion Completa - Remodelar Hogar - Remolar Oficinas - Albañileria - Ampliacion de Casa

<% 'Primero nos fijamos si ambos campos fueron completados. 'Si no se cumple, redireccionamos a pagina1.asp Dim usuario, oConn, RS, text, servic, imag, vin 'Guardamos los datos del Form en variables. 'num = Request.QueryString("menu") usuario = Request.QueryString("menu") 'usuario2 = Request.Cookies("nombre") if usuario = 2 then layer = 1 link = "o_especial.asp" end if if usuario = 21 then layer = 2 link = "esp2.asp" end if if usuario = 16 then layer = 3 link = "esp3.asp" end if if usuario = 20 then layer = 4 link = "esp4.asp" end if if usuario = 8 then layer = 5 link = "esp5.asp" end if If usuario > 27 then Response.Redirect("default.asp") End If If usuario = 0 then Response.Redirect("servicios_lista.asp") End If 'Conectamos a nuestra BD. Set oConn = Server.CreateObject ("ADODB.Connection") Set RS = Server.CreateObject ("ADODB.RecordSet") oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/servicios.mdb") 'Seleccionamos de la tabla solo los registros que concuerden con el usuario del Form. sql = "SELECT * FROM servicios WHERE num='"&usuario&"'" RS.Open sql, oConn, 1, 1 'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el usuario. 'Si el campo de la tabla es igual a nuestra variable, estas logueado. text = Rs.Fields("texto") servic = Rs.Fields("servicio") imag = Rs.Fields("imagen") vin = Rs.Fields("vin") RS.Close oConn.Close Set RS = Nothing %> Construccion - Remodelacion - Remodelacion De Casa - Remodelacion Hogar - Remodelacion Completa - Remodelar Hogar - Remolar Oficinas - Albañileria - Ampliacion de Casa - Servicio de Carpinteria

Asistencia Hogar Diseña, planifica y construye proyectos inmobiliarios que satisfacen las necesidades de adquirir vivienda con estándares de calidad a precios convenientes. Brindamos apoyo y asesoramiento arquitectónico, financiero, legal a todos nuestros clientes con seriedad y experiencia. Atendemos Todas las Comunas de la Región Metropolitana.

Para solicitar nuestros servicios comuníquese al
800 20 79 60

Servicios