<% 'creo el objeto correo set mail = server.createObject("Persits.MailSender") 'configuro el mensaje 'señalo el servidor de salida para enviar el correo mail.host = "info@mc2g.com" 'indico la dirección de correo del remitente mail.from = "info@mc2g.com" 'indico la dirección del destinatario del mensaje mail.addAddress "info@mc2g.com" 'Obtengo los datos del formulario nombre = request.form("nombre") cargo = request.form("cargo") empresa = request.form("empresa") telefono = request.form("telefono") email = request.form("email") comentario = request.form("comentario") 'compongo el cuerpo del mensaje cuerpo = "Formulario De Contacto MC2G"& VBNEWLINE & VBNEWLINE cuerpo = cuerpo & "Nombre: " & nombre & VBNEWLINE cuerpo = cuerpo & "Cargo: " & cargo & VBNEWLINE cuerpo = cuerpo & "Empresa: " & empresa & VBNEWLINE cuerpo = cuerpo & "Telefono: " & telefono & VBNEWLINE cuerpo = cuerpo & "Email: " & email & VBNEWLINE cuerpo = cuerpo & "Comentario: " & comentario & VBNEWLINE 'mando el correo... 'indico el cuerpo del mensaje mail.body = cuerpo 'lo envio 'aseguro que no se presenten errores en la página si se producen On Error Resume Next mail.send if Err ><0 then response.write "Error, no se ha podido completar la operación" else Request.Form("nombre") 'Declaro Saludo de despedida del visitante saludo = "Gracias por escribirnos:" & nombre & ", el formulario se ha enviado correctamente" 'Muestro saludo response.write saludo end if %> .:GRACIAS POR ESCRIBIRNOS:.