Håller på med en aspsida som jag skall använda för e-postutskick till folk som reggat sig, deras e-postadresser läggs till i en databas. Så här ser scriptet ut som skickar det: Antingen loppar du ut dem. Eller slår du samman alla adresser och låter maildservern skicka dem. Okej, har du lust att ge en lite utförligare beskrivning, jag är kass på att koda? <% wow, det verkar vara ett gigantiskt resursslöseri, spec om listan på mottagare är stor. Till [hobbe].Enkel CDONTS/Access fråga
set mail = server.createobject("CDONTS.NewMail")
mail.from = """News from xxx.com "" <xxx@xxx.com>"
mail.to = "?"
mail.subject = request.form("subject")
mail.body = request.form("body")
mail.BodyFormat=0
mail.MailFormat=0
mail.send
set mail = nothing
response.write "Newsmail was sent successfully!<br><br>"
Frågan är hur jag skall skriva efter mail.to för att maila samtliga adresser som finns i databasen? Kolumnen där e-postadresserna ligger heter email.Sv: Enkel CDONTS/Access fråga
Sv: Enkel CDONTS/Access fråga
Sv: Enkel CDONTS/Access fråga
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open DINDATABAS
Set Adresser = Conn.Execute ("Select email, id From DITTFÄLT")
Do While Not Adresser.EOF
Set Nyhetsbrev = Server.CreateObject("CDONTS.NewMail")
Nyhetsbrev.From = "DINEMAIL"
Nyhetsbrev.To = Adresser("email")
Nyhetsbrev.Subject = request.form("subject")
Nyhetsbrev.Body = request.form("body")
'Dom här två raderna är om du kör med HTML. Annars kan du ta bort dom.
Nyhetsbrev.BodyFormat = CdoBodyFormatHTML
Nyhetsbrev.MailFormat = CdoMailFormatMime
Nyhetsbrev.Send
Set Nyhetsbrev = Nothing
Adresser.MoveNext
Loop
Adresser.Close
Set Adresser=Nothing
Conn.Close
Set Conn=Nothing
%>Sv: Enkel CDONTS/Access fråga
bättre då att hämta dem via recordsetets getstring() funktion och smälla in dem i BCC fältet, då slipper du iterera över recordsetet n (antal medlemmar i listan) antal ggr och istället bara sätter BCC (blind carbon copy) variabeln...
Eller är det något jag missat?Sv: Enkel CDONTS/Access fråga
Tjena.
Visa gärna ett kodexempel. Alltid kul att kunna spara på resurserna.
Har skrivit min kod efter pelle(sysop) s exempel i Kurser & Artiklar. Kanske en artikel om det vore nåt hobbe, det är ganska många som kör enligt exemplet ovan.
MVH/Hampus