<% if request("Confirmacion") = "True" then varComentarios = Session("varComentarios") varCorreo = Session("varCorreo") varUsuario = Session("varUsuario") varDireccion = Session("varDireccion") varFax = Session("varFax") varTelefono = Session("varTelefono") varTipoMensaje = Session("varTipoMensaje") varContacto = Session("varContacto") varFecha = Session("varFecha") varAsunto = Session("varAsunto") varOtro = Session("varOtro") varEquipoRemoto = Session("varEquipoRemoto") varUsuarioRemoto = Session("varUsuarioRemoto") varExplorador = Session("varExplorador") varMarcahora = Session("varMarcahora") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open(strCN) set rs = Server.createobject("ADODB.Recordset") rs.CursorType = adOpenKeyset rs.LockType = adLockOptimistic rs.open "Ciudadanos",conn rs.addnew rs("Direccion") = varDireccion rs("Comentarios") = varComentarios rs("Correo_electrónico_usuario")=varCorreo rs("Nombre_usuario")=varUsuario rs("Fax_usuario")=varFax rs("Teléfono_usuario")=varTelefono rs("Tipo_mensaje")=varTipoMensaje rs("FechaAudiencia")=varFecha rs("Asunto") = varAsunto rs("Otro_asunto") = varOtro rs("Nombre_del_equipo_remoto") = varEquipoRemoto rs("Nombre_de_usuario") = varUsuarioRemoto rs("Tipo_de_explorador") = varExplorador rs("Marca_de_hora") =varMarcahora rs("Solicitado_contacto") = varContacto rs.update rs.close conn.close else if request("Comentarios") <> "" then varComentarios = request("Comentarios") varCorreo = request("Correo_electrónico_usuario") varUsuario = request("Nombre_usuario") varDireccion = request("Direccion") varFax = request("Fax") varTelefono = request("Teléfono_usuario") varTipoMensaje = request("Tipomensaje") varAsunto = request("Asunto") varOtro = request("Otro_asunto") varFecha = date - 50 varEquipoRemoto = Request.ServerVariables("REMOTE_HOST") varUsuarioRemoto = Request.ServerVariables("REMOTE_USER") varExplorador = Request.ServerVariables("HTTP_USER_AGENT") varMarcahora = now if varTipoMensaje = "Audiencia" then varContacto = "Si" else varContacto = "No" end if Session("varComentarios") = varComentarios Session("varCorreo") = varCorreo Session("varUsuario") = varUsuario Session("varDireccion") = varDireccion Session("varFax") = varFax Session("varTelefono") = varTelefono Session("varTipoMensaje") = varTipoMensaje Session("varContacto") = varContacto Session("varFecha") = varFecha Session("varAsunto") = varAsunto Session("varOtro") = varOtro Session("varEquipoRemoto") = varEquipoRemoto Session("varUsuarioRemoto") = varUsuarioRemoto Session("varExplorador") = varExplorador Session("varMarcahora") = varMarcahora %>

POR FAVOR REVISA TU COMENTARIO (Si la información señalada abajo es correcta pulse en CONFIRMAR)
 


Estimado : <%=varUsuario%>

Su comentario será enviado solo si usted pulsa en "Confirmar". Pronto nos pondremos en contacto con usted, utilizaremos la siguiente información:

Correo electrónico:<%=varCorreo%>
Teléfono : <%=varTelefono%>
 Fax : <%=varFax%>

Si esta información no es correcta regrese al formulario anterior y cámbiela, en caso contrario confírmela.

Atentamente,

Despacho del Alcalde Juan Fernández

Confirmar /  Regresar

<% else %> Comentarios de los Ciudadanos


 

¿Qué clase de comentario quiere enviar?
 Queja Problema Sugerencia Elogio Audiencia

¿Su solicitud esta relacionada con?
 Otros:

Escriba sus comentarios en el espacio siguiente:

Díganos cómo ponernos en contacto con usted:

Nombre

Correo electrónico

Dirección

Teléfono

Fax

<% end if end if %>