<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% cMailUsu ="raul_015@hotmail.com" cAdmon = "RAUL SANCHEZ" cMailAdmon = "raulsanchezpoumian@gmail.com" if Request("parUsuario2") = "1" then Dim cuerpo cuerpo = "" & _ "De : " & cAdmon & "
" & "Evento : " & cRequi & "
" & _ "E-Mail :
" & _ " " set OBJ_EMAIL = server.createObject("CDONTS.NewMail") OBJ_EMAIL.From = cMailAdmon OBJ_EMAIL.To = cMailUsu OBJ_EMAIL.Subject = "Comentario enviado por: " & cAdmon OBJ_EMAIL.Body = cuerpo OBJ_EMAIL.Send 'Envia el mail 'Cierra el Objeto Set OBJ_EMAIL = Nothing response.redirect "mapa.htm" end if %> Documento sin título
Preguntas, Comentarios o Sugerencias
Nombre:
A: