kwjoey
Starting Member
19 Posts |
Posted - March 29 2007 : 19:28:41
|
Hello, I hope somebody can help me. I think it should be easy for someone who can code. I'm just tinker and can't get this to work. Below is the section of code from ShopMail.asp (vpasp 3.50). I use Persits Aspemail and it works fine. I have the full version so the Mail Queue function is turned on. I think the Mail Queue will speed up the cart a little. This is all that's needed to use Aspemail Mail Queue-
Mail.Queue = True Mail.Send
I tried putting the above lines in the code. The emails get sent but never through the mail queue. I have other forms outside of vpasp and the mail queue works. Here's my Shopmail.asp file-
If ucase(Mailtype) = "ASPEMAIL" Then Set Mailer = Server.CreateObject("Persits.MailSender") if err.number<> 0 then exit sub end if Mail.Host = "mail.XXXXXXXXXX.com" Mail.Port = "25" Mail.Username = "[email protected]" Mail.Password = "XXXXXXXXXX" Mailer.Host = my_system Mailer.From = my_fromAddress Mailer.FromName = my_from Mailer.AddAddress my_toaddress, my_to Mailer.Subject = my_subject If htmlformat="HTML" then Mailer.IsHTML = TRUE end if If my_attachment<>"" then Mailer.AddAttachment my_attachment end if Mailer.Body = body If Mailer.Send then setMailer=nothing exit sub else mailerror=langmailerror & " " & my_toaddress HandleMailError mailerror set mailer=nothing exit sub end if end if |
|