---
title: "Queue i AspEmail"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/181117-queue-i-aspemail"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "hypatia"
published: "2009-11-06T20:35:10.000Z"
updated: "2009-11-07T19:55:05.000Z"
replies: 8
views: 811
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/181117-queue-i-aspemail"
---

# Queue i AspEmail

## #1 — hypatia, 2009-11-06T20:35Z

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?  :)

Permalänk: https://www.webforum.nu/p/181117

## #2 — preben, 2009-11-07T16:15Z

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.

Permalänk: https://www.webforum.nu/p/2210724

## #3 — hypatia, 2009-11-07T17:07Z

> **[preben skrev:](https://www.webforum.nu/p/1487265)**
>
> 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.

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  :).

Permalänk: https://www.webforum.nu/p/2210728

## #4 — aleborg, 2009-11-07T17:41Z

hypatia, vet du vilken server du ligger på?

Permalänk: https://www.webforum.nu/p/2210730

## #5 — colione, 2009-11-07T18:00Z

Användaren som sidan kör under har inte rätt att skriva till kö-katalogen. Ta upp problemet med binero.

Permalänk: https://www.webforum.nu/p/2210731

## #6 — hypatia, 2009-11-07T18:03Z

> **[aleborg skrev:](https://www.webforum.nu/p/1487272)**
>
> hypatia, vet du vilken server du ligger på?

Tjatte  :)

Permalänk: https://www.webforum.nu/p/2210733

## #7 — aleborg, 2009-11-07T19:01Z

Kan du göra ett försök nu?

Permalänk: https://www.webforum.nu/p/2210742

## #8 — hypatia, 2009-11-07T19:07Z

> **[aleborg skrev:](https://www.webforum.nu/p/1487285)**
>
> Kan du göra ett försök nu?

Funkish!   (y)

Tack för vad du än gjorde  :f

Permalänk: https://www.webforum.nu/p/2210744

## #9 — aleborg, 2009-11-07T19:55Z

Gött (y)

Permalänk: https://www.webforum.nu/p/2210749

---

Tråden på webben: https://www.webforum.nu/amne/asp/181117-queue-i-aspemail