webForumDet fria alternativet

Multiple Select Jmail

3 svar · 351 visningar · startad av pellsäter

pellsäterMedlem sedan aug. 2000526 inlägg
#1

Varför funkar inte detta????

<%
amne = Request.Form("amne_valj")
meddelande = Request.Form("meddelande_valj")

 set Jmail = Server.CreateOBject( "JMail.SMTPMail" )
 JMail.ServerAddress = "mail.amts.nu"
 JMail.Sender = "info@amts.nu"
 JMail.AddRecipient "info@amts.nu"

epost = request.form("epost")
if instr(epost, ",") >0 then
arrEpost = split(epost, ";")
for each item in request.form("epost")
JMail.AddRecipientBCC "" & arrEpost & ""
next
else
JMail.AddRecipientBCC "" & arrEpost & ""
end if

 JMail.Subject = amne
 JMail.Body = meddelande
 
 

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

 Jmail.execute

%>

Idag regnar det!!

PatrikBMedlem sedan mars 20002 836 inlägg
#2

Varför splitta up Request.Form("epost") till en array och sedan loopar igenom Request.Form("epost").
Vad är Request.Form("epost") för fält? checkbox? textarea?

cya,
PatrikB

------------------
*Det tar sig sa han som hade eld i håret*

pellsäterMedlem sedan aug. 2000526 inlägg
#3

Hmmmm vet inte..... varför

"epost" är en drop down lista där du väljer en eller flera adresser att skicka mail till

emissionMedlem sedan dec. 19996 721 inlägg
#4
epost = request.form("epost")
if instr(epost, ",") >0 then
arrEpost = split(epost, ";")
for each item in request.form("epost")
JMail.AddRecipientBCC "" & arrEpost & "" 
next
else
JMail.AddRecipientBCC "" & arrEpost & "" 
end if

En hel del konstigheter ;)

Du kollar om strängen innehåller komma, men splittar på semikolon, loopar igenom form collection, trots arrayen, och ger hela arrayen som argument till addrecipientbcc, även om arrayen aldrig skapats (if-satsen)

Så här borde det vara

for each item in request.form("epost")
JMail.AddRecipientBCC item
next
134 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)