8 svar · 788 visningar · startad av hypatia
När jag försöker använda mail.queue i AspEmail får jag det här felmeddelandet:
Persits.MailSender.4 error '800a0011'
Access is denied.
Webbhotell: Binero
epost=rs("epost")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.IsHTML = True
Mail.Host = "smtp.domain.se"
Mail.Port = 587
Mail.From = "mail@domain.se"
Mail.FromName = "Name"
Mail.AddAddress epost
Mail.Subject = subject
Mail.Body = str
Mail.Username = "username"
Mail.Password = "password"
Mail.Queue = True
Mail.Send
Set Mail = Nothing
Någon som vet vad som är fel eller hur jag ska lösa det? :)
Ja. Du använder fel komponent. Kör med CDONTS.
set CDOMail = Server.CreateObject("CDONTS.NewMail")
CDOMail.From = listMessage(10,0) & "<" & listMessage(11,0) & ">"
CDOMail.To = myRow(1,j)
CDOMail.Subject = listMessage(1,0)
CDOMail.Body = listMessage(13,0) & vbCRLF & listMessage(2,0) & vbCRLF & listMessage(14,0) & vbCRLF & strUnsubscribe
CDOMail.Send
Set CDOMail = Nothing
Rensa denna koden och använd för dina grejer. Jag har haft Binero i sju år.
Ja. Du använder fel komponent. Kör med CDONTS.
set CDOMail = Server.CreateObject("CDONTS.NewMail") CDOMail.From = listMessage(10,0) & "<" & listMessage(11,0) & ">" CDOMail.To = myRow(1,j) CDOMail.Subject = listMessage(1,0) CDOMail.Body = listMessage(13,0) & vbCRLF & listMessage(2,0) & vbCRLF & listMessage(14,0) & vbCRLF & strUnsubscribe CDOMail.Send Set CDOMail = NothingRensa denna koden och använd för dina grejer. Jag har haft Binero i sju år.
Jag använde CDONTS tills för några dagar sedan. Problemet är att Binero inte tillåter att jag skickar mer än 300 mail per 30 minuter. När jag sökte här på wF verkade lösningen vara att använda köfunktionen i AspEmail för att hantera en större mängd mottagare. I dagsläget ligger listan på runt 900 mottagare :).
hypatia, vet du vilken server du ligger på?
Användaren som sidan kör under har inte rätt att skriva till kö-katalogen. Ta upp problemet med binero.
Kan du göra ett försök nu?
Gött (y)