Nun so wi ich es sehe wird immer nur der letzte
datensatz geschickt weil die anderen immer ueberschrieben werden.
Vorschlag
redim arrMessage(pcartIndex)
for f=1 to pcartIndex
if arrCart(f,10) = 0 then
arrMessage(f) = arrCart(f,2)& "," .......
end if
next
message = join(arrMessage)
So nun muesste es klappen :-)
Gruss
Roman Pittroff
Consulting
Bangkok, Thailand
-----Original Message-----
From: Lukas Reghof [mailto:[EMAIL PROTECTED]]
Sent: Thursday, November 15, 2001 9:38 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] ASPMail
Ich m�chte per ASPMail daten verschicken
Die "for f=1 to pcartIndex"-Schleife zeigt mir alle ausw�hlten Produkte
an. Wie packe ich nun das ganze in die message zum versenden?
mit
for f=1 to pcartIndex
if arrCart(f,10) = 0 then
message = arrCart(f,2)& "," & arrCart(f,0)& "," &arrCart(f,1)& ","
&arrCart(f,4)& "," &arrCart(f,12) & "," & pCurrencySign &
((arrCart(f,2) *
(arrCart(f,5)+arrCart(f,3)) )) & VbCrLf
end if
next
wird leider immer nur ein Datensatz �bertragen
mfg
code
<%
Set mailer = Server.CreateObject("ASPMAIL...")
recipient = [EMAIL PROTECTED]
sender = Request.Form("email")
subject = "TestEmail"
arrCart = session("MyCart")
pCartIndex = session("cartIndex")
for f=1 to pcartIndex
if arrCart(f,10) = 0 then
Response.write arrCart(f,2)& "," & arrCart(f,0)& "," &arrCart(f,1)& ","
&arrCart(f,4)& "," &arrCart(f,12) & "," & pCurrencySign &
((arrCart(f,2) *
(arrCart(f,5)+arrCart(f,3)) )) & VbCrLf
end if
next
result = mailer.SendMail("smtpserver", recipient, sender, subject,
message)
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv Sie
| knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp