<%@LANGUAGE="VBSCRIPT" %>
Usuario smtp:
(El usuario puede encontrarlo en el panel de control, E-mail, Administrar cuentas)
E-mail destinatario:
<% ' Se verifica que los datos han sido enviados desde el formulario, para la validación con el SMTP If Request("enviar") = 1 Then If Not Request("usuario") = "" And Not Request("passwd") = "" And Not Request("destinatario") = "" Then Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "localhost" Mail.Username = "" Mail.Password = "" Mail.AddAddress Request("destinatario") Mail.From = Request("usuario") Mail.FromName = "Ferozo Windows Edition" Mail.Subject = "E-mail de prueba" Mail.Body = "Este es un e-mail enviado desde la página de ejemplo de Ferozo Windows Edition" Mail.Send If Err <> 0 Then Response.Write "Ha ocurrido un error: " & Err.Description End If Set Mail = Nothing Else ' Respuesta en caso de que no se completen todos los datos Response.Write("Complete todos los campos para ejecutar el ejemplo") End If End If %>