<%
SQL_Consulta = "SELECT * FROM identificador where id=1"
Set Consulta = fp_db.Execute(SQL_Consulta)
if not Consulta.eof then
identificador = consulta.Fields.Item("identificador")
identificador=identificador*1
identificador=identificador+1
SQL_Modificacion = "UPDATE identificador SET identificador= '"&identificador&"' "
SQL_Modificacion = SQL_Modificacion &"WHERE id=1"
Set Modificacion = fp_db.Execute(SQL_Modificacion)
end if
asesor = Request.Form("asesor")
metrostotales = Request.Form("metrostotales")
telefonocontacto= Request.Form("telefonocontacto")
ubicacion = Request.Form("ubicacion")
precio=Request.form("precio")
descripcion=Request.form("descripcion")
municipio=Request.form("municipio")
colonia=Request.form("colonia")
ciudad=Request.form("ciudad")
tipo=Request.form("tipo")
metros=Request.form("metros")
frente=Request.form("frente")
fondo=Request.form("fondo")
ventarenta=Request.form("ventarenta")
estado=Request.form("estado")
bano=Request.form("bano")
usosuelo=Request.form("usosuelo")
desc1=Request.form("desc1")
desc2=Request.form("desc2")
desc3=Request.form("desc3")
desc4=Request.form("desc4")
desc5=Request.form("desc5")
asesor=Request.form("asesor")
guian=Request.form("guian")
guiap=Request.form("guiap")
guil=Request.form("guil")
antiguedad=Request.form("antiguedad")
construido=Request.form("construido")
niveles=Request.form("niveles")
habitaciones=Request.form("habitaciones")
lineas=Request.form("lineas")
horario=Request.form("horario")
cita=Request.form("cita")
autos=Request.form("autos")
tipococina=Request.form("tipococina")
supniveles=Request.form("supniveles")
zona=Request.form("zona")
supoficinas=Request.form("supoficinas")
cp=Request.form("cp")
saldorestante=Request.form("saldorestante")
tiemporestante=Request.form("tiemporestante")
hipotecaria=Request.form("hipotecaria")
remodelacion=Request.form("remodelacion")
conservacion=Request.form("conservacion")
estilo=Request.form("estilo")
instalacionelectrica=Request.form("instalacionelectrica")
topografia=Request.form("topografia")
tipodeproyecto=Request.form("tipodeproyecto")
formadepago=Request.form("formadepago")
tipodepiso=Request.form("tipodepiso")
metrostotales=Request.form("metrostotales")
alarma = Request.form("alarma")
cisterna=Request.form("cisterna")
alberca=Request.form("alberca")
interphone=Request.form("interphone")
carpinteria=Request.form("carpinteria")
despacho=Request.form("despacho")
biblioteca=Request.form("biblioteca")
lamparas=Request.form("lamparas")
jacuzzi=Request.form("jacuzzi")
aire=Request.form("aire")
bomba=Request.form("bomba")
arealavado=Request.form("arealavado")
closet=Request.form("closet")
cortinas=Request.form("cortinas")
estudio=Request.form("estudio")
cable=Request.form("cable")
jardin=Request.form("jardin")
clasepropiedad=Request.form("clasepropiedad")
ventaneria=Request.form("ventaneria")
boiler=Request.form("boiler")
tipofachada=Request.form("tipofachada")
gas=Request.form("gas")
tipoalberca=Request.form("tipoalberca")
garage=Request.form("garage")
autosgarage=Request.form("autosgarage")
servicio=Request.form("servicio")
chimeneas=Request.form("chimeneas")
tamanojardin=Request.form("tamanojardin")
numeroterrazas=Request.form("numeroterrazas")
SQL_Altas ="INSERT INTO datos(desc1,estado,bano,telefonocontacto,usosuelo,ventas,desc2,desc3,desc4,desc5,ubicacion,precio"
SQL_Altas = SQL_Altas &",descripcion,municipio,colonia,ciudad,tipo,metros,frente,fondo,"
SQL_Altas = SQL_Altas &"asesor,guian,guiap,guil,antiguedad,construido,niveles,habitaciones,"
SQL_Altas = SQL_Altas &"lineas,horario,cita,autos,tipococina,supniveles,zona,supoficinas,cp,saldorestante,tiemporestante,"
SQL_Altas = SQL_Altas &"hipotecaria,remodelacion,conservacion,estilo,instalacionelectrica,topografia,tipodeproyecto,"
SQL_Altas = SQL_Altas &"formadepago,tipodepiso,alarma,cisterna,alberca,interphone,carpinteria,despacho,biblioteca,"
SQL_Altas = SQL_Altas &"lamparas,jacuzzi,aire,bomba,arealavado,closet,cortinas,estudio,cable,jardin,clasepropiedad,ventaneria,"
SQL_Altas = SQL_Altas &"boiler,tipofachada,gas,tipoalberca,garage,servicio,chimeneas,tamanojardin,numeroterrazas,"
SQL_Altas = SQL_Altas &"metrostotales,identificador,autosgarage)VALUES ("
SQL_Altas = SQL_Altas &"'"&desc1&"',"
SQL_Altas = SQL_Altas &"'"&estado&"',"
SQL_Altas = SQL_Altas &"'"&bano&"',"
SQL_Altas = SQL_Altas &"'"&telefonocontacto&"',"
SQL_Altas = SQL_Altas &"'"&usosuelo&"',"
SQL_Altas = SQL_Altas &"'"&ventarenta&"',"
SQL_Altas = SQL_Altas &"'"&desc2&"',"
SQL_Altas = SQL_Altas &"'"&desc3&"',"
SQL_Altas = SQL_Altas &"'"&desc4&"',"
SQL_Altas = SQL_Altas &"'"&desc5&"',"
SQL_Altas = SQL_Altas &"'"&ubicacion&"',"
SQL_Altas = SQL_Altas &"'"&precio&"',"
SQL_Altas = SQL_Altas &"'"&descripcion&"',"
SQL_Altas = SQL_Altas &"'"&municipio&"',"
SQL_Altas = SQL_Altas &"'"&colonia&"',"
SQL_Altas = SQL_Altas &"'"&ciudad&"',"
SQL_Altas = SQL_Altas &"'"&tipo&"',"
SQL_Altas = SQL_Altas &"'"&metros&"',"
SQL_Altas = SQL_Altas &"'"&frente&"',"
SQL_Altas = SQL_Altas &"'"&fondo&"',"
SQL_Altas = SQL_Altas &"'"&asesor&"',"
SQL_Altas = SQL_Altas &"'"&guian&"',"
SQL_Altas = SQL_Altas &"'"&guiap&"',"
SQL_Altas = SQL_Altas &"'"&guil&"',"
SQL_Altas = SQL_Altas &"'"&antiguedad&"',"
SQL_Altas = SQL_Altas &"'"&construido&"',"
SQL_Altas = SQL_Altas &"'"&niveles&"',"
SQL_Altas = SQL_Altas &"'"& habitaciones&"',"
SQL_Altas = SQL_Altas &"'"&lineas&"',"
SQL_Altas = SQL_Altas &"'"&horario&"',"
SQL_Altas = SQL_Altas &"'"&cita&"',"
SQL_Altas = SQL_Altas &"'"&autos&"',"
SQL_Altas = SQL_Altas &"'"&tipococina&"',"
SQL_Altas = SQL_Altas &"'"&supniveles&"',"
SQL_Altas = SQL_Altas &"'"&zona&"',"
SQL_Altas = SQL_Altas &"'"&supoficinas&"',"
SQL_Altas = SQL_Altas &"'"&cp&"',"
SQL_Altas = SQL_Altas &"'"&saldorestante&"',"
SQL_Altas = SQL_Altas &"'"&tiemporestante&"',"
SQL_Altas = SQL_Altas &"'"&hipotecaria&"',"
SQL_Altas = SQL_Altas &"'"&remodelacion&"',"
SQL_Altas = SQL_Altas &"'"&conservacion&"',"
SQL_Altas = SQL_Altas &"'"&estilo&"',"
SQL_Altas = SQL_Altas &"'"&instalacionelectrica&"',"
SQL_Altas = SQL_Altas &"'"&topografia&"',"
SQL_Altas = SQL_Altas &"'"&tipodeproyecto&"',"
SQL_Altas = SQL_Altas &"'"&formadepago&"',"
SQL_Altas = SQL_Altas &"'"&tipodepiso&"',"
SQL_Altas = SQL_Altas &"'"&alarma&"',"
SQL_Altas = SQL_Altas &"'"&cisterna&"',"
SQL_Altas = SQL_Altas &"'"&alberca&"',"
SQL_Altas = SQL_Altas &"'"&interphone&"',"
SQL_Altas = SQL_Altas &"'"&carpinteria&"',"
SQL_Altas = SQL_Altas &"'"&despacho&"',"
SQL_Altas = SQL_Altas &"'"&biblioteca&"',"
SQL_Altas = SQL_Altas &"'"&lamparas&"',"
SQL_Altas = SQL_Altas &"'"&jacuzzi&"',"
SQL_Altas = SQL_Altas &"'"&aire&"',"
SQL_Altas = SQL_Altas &"'"&bomba&"',"
SQL_Altas = SQL_Altas &"'"&arealavado&"',"
SQL_Altas = SQL_Altas &"'"&closet&"',"
SQL_Altas = SQL_Altas &"'"&cortinas&"',"
SQL_Altas = SQL_Altas &"'"&estudio&"',"
SQL_Altas = SQL_Altas &"'"&cable&"',"
SQL_Altas = SQL_Altas &"'"&jardin&"',"
SQL_Altas = SQL_Altas &"'"&clasepropiedad&"',"
SQL_Altas = SQL_Altas &"'"&ventaneria&"',"
SQL_Altas = SQL_Altas &"'"&boiler&"',"
SQL_Altas = SQL_Altas &"'"&tipofachada&"',"
SQL_Altas = SQL_Altas &"'"&gas&"',"
SQL_Altas = SQL_Altas &"'"&tipoalberca&"',"
SQL_Altas = SQL_Altas &"'"&garage&"',"
SQL_Altas = SQL_Altas &"'"&servicio&"',"
SQL_Altas = SQL_Altas &"'"&chimeneas&"',"
SQL_Altas = SQL_Altas &"'"&tamanojardin&"',"
SQL_Altas = SQL_Altas &"'"&numeroterrazas&"',"
SQL_Altas = SQL_Altas &"'"&metrostotales&"',"
SQL_Altas = SQL_Altas &"'"&identificador&"',"
SQL_Altas = SQL_Altas &"'"&autosgarage&"')"
Set Altas = fp_db.Execute(SQL_Altas)
response.redirect "fotos.asp?identificador="&identificador
%>