Hvordan sender jeg 2 eller flere forskellige HTML-mails v.hj.a. JMail?
Jeg har kreeret 2 forskeligge HTML-mails på samme side. Brugeren udfylder formularfelter. Values fanges, den første HTML-mail smutter fint afsted, ingen problemer<!-- #include virtual="/users/userdata.asp" -->
<html>
<%
If Request.Form("mode") = sendmail" Then
Dim dima, dimb, JMail
dima = Request.Form("dim1")
dimb = Request.Form("dim2)
Set JMail = Server.CreateObject("JMail.Message")
JMail.AddRecipient "" & vUsermail "", "vUsername"
JMail.From = "noreply@mitdomæne.dk"
JMail.Subject = "Sagsnummer: " & no & ""
JMail.appendHTML "<html><body>"
JMail.appendHTML "</body></html>"
JMail.Send("mailout1.surf-town.net")
Set JMail = Nothing
Response.Redirect "/"
End If
%>
<body>
<form method="post" action=/default.asp">
<input type="hidden" name="mode" value="sendmail">
<input type="text" name="dima">
<input type="text" name="dimb">
</form>
</body>
</html>
Det virker fint, ingen problemer. Men hensigten er, at én mail med samtlige oplysninger og specifikationer skal sendes til afdelingen. En anden mail skal sendes til kunden med en kort bekræftelse på, at opgaven er udført. Og så får jeg et problem. Jeg tilføjer values til formularen, som skal bruges i mailen til kunden. Til det skal jeg jo bruge en ny JMail, med kundens e-mailadresse (JMail.AddRecipient). Så jeg regner med, at "Set JMail = Nothing" vil afslutte det ene script, så det næste kan gennemføres. Bemærk jeg flytter Response.Redirect ned til det nye script, så der ikke bliver redirected, før begge scripts er kørt:
<!-- #include virtual="/users/userdata.asp" -->
<html>
<%
If Request.Form("mode") = sendmail" Then
Dim dima, dimb, JMail
dima = Request.Form("dim1")
dimb = Request.Form("dim2)
Set JMail = Server.CreateObject("JMail.Message")
JMail.AddRecipient "" & vUsermail & "", "" & vUsername & ""
JMail.From = "noreply@mitdomæne.dk"
JMail.Subject = "Sagsnummer: " & no & ""
JMail.appendHTML "<html><body>dima & dimb"
JMail.appendHTML "</body></html>"
JMail.Send("mailout1.surf-town.net")
Set JMail = Nothing
Dim JMail
Set JMail = Server.CreateObject("JMail.Message")
JMail.AddRecipient "" & vUsermail & "", "vUsername"
JMail.From = "noreply@mitdomæne.dk"
JMail.Subject = "Sagsnummer: " & no & ""
JMail.appendHTML "<html><body>Kundeinfo1 & Kundeinfo2"
JMail.appendHTML "</body></html>"
Response.Redirect "/"
JMail.Send("mailout1.surf-town.net")
Set JMail = Nothing
End If
%>
<body>
<form name="frmName" method="post" action=/enellerandenside.asp">
<input type="hidden" name="mode" value="sendmail">
<input type="text" name="dima">
<input type="text" name="dimb">
</form>
</body>
</html>
Jeg ved ikke hvad der skal til, for at kunne sende begge mails. Det kunne være lækkert, og det er det store ønske, at brugerne ikke bliver redirected alle mulige steder hen. Det skal gerne kunne laves, så de indtaster det de nu skal på siden, og sender mailen afsted.
"Set JMail = Nothing" er åbenbart ikke det, der skal til for at kunne stoppe det ene, så det andet kan lade sig gøre. Håber MEGET på svar.
