---
title: "skicka epost med Jmail"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/9843-skicka-epost-med-jmail"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "pellsäter"
published: "2001-06-02T15:00:00.000Z"
updated: "2001-06-02T17:30:00.000Z"
replies: 6
views: 237
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/9843-skicka-epost-med-jmail"
---

# skicka epost med Jmail

## #1 — pellsäter, 2001-06-02T15:00Z

Har sett att frågan varit uppe förut men hittar inga bra svar!

Jag har en databas med ca 30 adresser. Jag vill att medlemmarna lätt ska kunna från hemsidan skicka epost till alla på en gång. Använder mig  av Jmail och loopar igenom databasen, lägger det i BCC.

Det går oerhört långsamt. så sakta att jag får script timeout.

Hjälp!!

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

## #2 — @nders, 2001-06-02T15:02Z

skulle man kunna få kika på koden du använder dig av?

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

## #3 — pellsäter, 2001-06-02T15:04Z

\<%	
	Set Conn = Server.CreateObject("ADODB.Connection")
	Conn.Open "xxxxxxx"
	Set rs = Server.CreateObject("ADODB.Recordset")
    Visa = "SELECT \* FROM epost"
    rs.Open Visa, Conn, 3,3 
%\> 

\<%
amne        = Request.Form("amne")
meddelande  = Request.Form("meddelande")
fnamn		= Request.Form("fnamn")
enamn		= Request.Form("enamn")
 
uppg = "Från: " & fnamn & " " & enamn  & vbCrLf & vbCrLf 
uppg = uppg &  meddelande 
 
     set Jmail = Server.CreateOBject( "JMail.SMTPMail" )
     JMail.Sender = "info@amts.nu"
     JMail.AddRecipient "info@amts.nu" 
do while not rs.EOF
	 JMail.AddRecipientBCC "" & rs("epost") & "" 
rs.MoveNext 
loop
     JMail.Subject = amne
     JMail.Body = uppg
	 
     

	 Jmail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")

	 Jmail.execute

%\>

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

## #4 — @nders, 2001-06-02T15:10Z

jag ser inget spontant som kan vara galet, men ett par förändringar kan vi ta och göra i alla fall.

byt sql-frågan till

```
select distinct epost from epost
```

byt raden där du lägger till bcc-mottagare till:

```
JMail.AddRecipientBCC rs("epost")
```

känns lite onödigt att lägga till tomma strängar här och där när det absolut inte behövs.

vet inte om det kommer göra nån nytta, men...

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

## #5 — pellsäter, 2001-06-02T15:17Z

Hittade felet!

Hade glömt lääga in

JMail.ServerAddress

Då funkade det kanon

"än så länge"

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

## #6 — @nders, 2001-06-02T16:26Z

ahh! såklart! :)

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

## #7 — eriks, 2001-06-02T17:30Z

På tal om JMail. Vet någon ett bra webbhotell där man får stöd för Jmail? Billigt!

/Erik

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/9843-skicka-epost-med-jmail