Código vb:
Ver original
<% Dim errCount, errString, nombre, apellido, dni, nac_dia, nac_mes, nac_ano, sexo, calle, calleX, calleY, altura, nrocasa, edificio, manzana, parcela, depto, escalera, piso, barrio, lote, telefono, celular, email, solicitud, tipoSolicitud, observaciones, idBarrioSol, calleSol, alturaSol, calleSolX, calleSolY, coordX, coordY errCount = 0 apellido = Request.Form("apellido") nombre = Request.Form("nombre") dni = Request.Form("dni") nac_dia = Request.Form("Nac_Dia") nac_mes = Request.Form("Nac_Mes") nac_ano = Request.Form("Nac_Ano") sexo = Request.Form("sexo") calle = Request.Form("calle") calleX = Request.Form("calleX") calleY = Request.Form("calleY") altura = Request.Form("altura") nrocasa = Request.Form("nrocasa") edificio = Request.Form("edificio") manzana = Request.Form("manzana") parcela = Request.Form("parcela") depto = Request.Form("depto") escalera = Request.Form("escalera") piso = Request.Form("piso") barrio = Request.Form("barrio") lote = Request.Form("lote") telefono = Request.Form("telefono") celular = Request.Form("celular") email = Request.Form("email") solicitud = Request.Form("solicitud") tipoSolicitud = request.form("TipoSolicitud") observaciones = Request.Form("observaciones") idBarrioSol = Request.Form("idBarrioSol") calleSol = Request.Form("idCalleSol") alturaSol = Request.Form("alturaSol") calleSolX = Request.Form("idCalleSolX") calleSolY = Request.Form("idCalleSolY") coordX = Request.Form("coordX") coordY = Request.Form("coordY") If nombre <> "" Then Response.Write("apellido: " & apellido & "<br>") Response.Write("nombrebre: " & nombre & "<br>") Response.Write("DNI: " & dni & "<br>") Response.Write("Fecha de Nacimiento: " & nac_dia & "/" & nac_mes & "/" & nac_ano & "<br>") Response.Write("Sexo: " & sexo & "<br>") Response.Write("Idcalle: " & calle & " altura:" & altura & "<br>") Response.Write("IdcalleX: " & calleX & "<br>") Response.Write("IdcalleY: " & calleY & "<br>") Response.Write("Nro. de Casa: " & nrocasa & "<br>") Response.Write("Edificio: " & edificio & "<br>") Response.Write("Manzana: " & manzana & "<br>") Response.Write("Parcela: " & parcela & "<br>") Response.Write("Departamento: " & depto & "<br>") Response.Write("Escalera: " & escalera & "<br>") Response.Write("Piso: " & piso & "<br>") Response.Write("IdBarrio: " & barrio & "<br>") Response.Write("Lote: " & lote & "<br>") Response.Write("Telefono: " & telefono & "<br>") Response.Write("Celular: " & celular & "<br>") Response.Write("E-Mail: " & email & "<br>") Response.Write("Solicitud: " & solicitud & "<br>") Response.Write("Tipo de Solicitud: " & tipoSolicitud & "<br>") Response.Write("Observaciones: " & observaciones & "<br>") Response.Write("ID Barrio de Solicitud: " & idBarrioSol & "<br>") Response.Write("IdcalleSol: " & calleSol & " altura:" & alturaSol & "<br>") Response.Write("IdCalleSolX: " & calleSolX & "<br>") Response.Write("IdCalleSolY: " & calleSolY & "<br>") Response.Write("Coordenada X: " & coordX & "<br>") Response.Write("Coordenada Y: " & coordY & "<br>") End If %>
Saludos y desde ya les agradecere su ayuda.