VP-ASP :: Shopping Cart Software

Shopping Cart Software Solutions for anywhere in the World

US/Canada(Toll Free): +1 888 587 2278
Europe/UK: +44 (020) 7193 9408
Australia/New Zealand: +61 3 9016 4497

VP-Cart StoreFront Customer Forum

Home | Profile | Register | Active Topics | Members | Search | FAQ
Save Password
Forgot your Password?

 All Forums
 VPCart Forum
 New Topic  Reply to Topic
 Printer Friendly
Author Previous Topic Topic Next Topic  

Starting Member

19 Posts

Posted - March 29 2007 :  19:28:41  Show Profile  Reply with Quote
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

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
exit sub
mailerror=langmailerror & " " & my_toaddress
HandleMailError mailerror
set mailer=nothing
exit sub
end if
end if
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
 Printer Friendly
Jump To:
Snitz Forums 2000