Loop i jmail fungerer ikke rigtigt
Hej X-prtr. Nu har jeg brugt en hel nat på at få min loop til at fungere, uden held.Først koden:
<%
Set con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;" &_
"Data Source=D:\XXXXXXXXXX.dk\database\produkter.mdb;" &_
"Persist Security Info=False;"
%>
<% set rst = con.execute("Select * from tblkunde")%>
<% set rst1 = con.execute("Select * from tblordreindhold" )%>
<% set rst4 = con.execute("Select * from qrysmykker where billedepath=" & rst1("id"))%>
<% set rst5 = con.execute("select * from tblordreindhold where ordrenr=" & rst("nr"))%>
<%
Dim mail, body, mailtekst
Set mail = Server.CreateObject("JMail.SMTPMail")
MailTekst = "Tak for din ordre! Den vil blive sendt hurtigst muligt!" & vbcrlf & vbcrlf
MailTekst = MailTekst & "Ordren vil blive sendt til:" & vbcrlf
MailTekst = MailTekst & Request.Form("Navn") & vbcrlf
MailTekst = MailTekst & Request.Form("Adresse") & vbcrlf
MailTekst = MailTekst & Request.Form("Postnr") & " " & Request.Form("By") & vbcrlf
MailTekst = MailTekst & "Tlf: " & Request.Form("Tlf") & vbcrlf
MailTekst = MailTekst & "E-mail: " & Request.Form("Email") & vbcrlf
MailTekst = MailTekst & "Bemærkninger: " & Request.Form("Bemaerkninger") & vbcrlf & vbCRLF
MailTekst = MailTekst & "Betaling: " & Request.Form("Betaling") & VBcrlf
MailTekst = MailTekst & "----------------------------------------" & vbCRLF
MailTekst = Mailtekst & "Ordrenr.:" & rst("nr") & vbcrlf
MailTekst = MailTekst & "----------------------------------------" & vbCRLF
do while not rst5.eof
MailTekst = Mailtekst & "Billedenr. " & rst4("billedepath") & vbcrlf
MailTekst = MailTekst & "Produkt-kategori: " & rst4("kategori") & vbcrlf
MailTekst = MailTekst & "Antal. : " & rst5("antal") & vbcrlf
MailTekst = MailTekst & "Pris. : " & rst4("pris") & vbcrlf
MailTekst = MailTekst & "----------------------------------" & vbcrlf
rst5.MOVENEXT
LOOP
--------------------------------------------------
Mailen bliver sendt fint nok, men hvis jeg fx. har bestilt 2 ting og får ordren bekræftet på mailen, viser den den sidste post 2 gange, i stedet for de 2 forskellige som den skal.
Hvad gør jeg forkert?! Jeg kan ikke gennemskue den.