Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <%@ Language=VBScript Debug='true' %> 'Debug=true doesn't work
- Set Mailer = Server.CreateObject("Persits.MailSender")
- Mailer.Host = "mail.mydomain.com" ' Specify a valid SMTP server
- Mailer.From = Request.Form("AgentEmail") ' Specify sender's address
- Mailer.FromName = Request.Form("AgentsName") ' Specify sender's name
- Mailer.Port = 587
- Mailer.isHTML = True
- Mailer.AddAddress "person1@email.com"
- Mailer.AddAddress "person2@email.net"
- Mailer.AddAddress "person3@email.com"
- Mailer.AddAddress Request.Form("AgentEmail")
- Mailer.Body = "stuff in my email"
- Mailer.Username = "me@emailcom"
- Mailer.Password = "123456"
- On Error Resume Next
- Mailer.Send
- If Err <> 0 Then
- Response.Write "Error encountered: " & Err.Description
- Else
- Response.Write "Success"
- End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement