asp jmail - evt. softspot som har hjulpet indtil videre
<!--#include file="db.inc"--><%
aktiv="nej"
ID = Request.QueryString("id")
strSQL = "SELECT DISTINCT u.email, b.overskrift " & _
"FROM (blog b " & _
"INNER JOIN bruger u ON u.brugernavn = b.forfatter) " & _
"INNER JOIN kommentar k ON k.blogid = b.id " & _
"WHERE b.id = " & ID & " " & _
"AND u.send_email = true"
set rs = Conn.Execute(strSQL)
num = 0
while not rs.eof
if rs("email") <> "" then
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "localhost"
JMail.ContentType = "text/html"
JMail.Charset = "iso-8859-1"
JMail.ContentTransferEncoding = "8bit"
JMail.Sender = "robot@xxx.dk"
JMail.Subject = "Der er oprettet en nyhed på xxx.dk"
JMail.AddRecipient rs("email")
JMail.HTMLBody = "Hej"
JMail.HTMLBody = "Hej "& rs("brugernavn") & "<br><br>Der er en ny kommentar til nyheden <b><i>" & rs("overskrift") &"</b></i> som du deltager i.<br>Log på <a href=""http://v0011cvc/default.asp?sitepage=blogview_indlag&id="&id&""">http://www.xxx.dk</a> og se kommentaren.<br><br>Mvh Kristian"
JMail.Priority = 3
If aktiv="ja" then
JMail.Execute
End if
response.write jmail.htmlbody
response.write ("<br>")
response.write ("----------------------------------------------------")
response.write ("<br>")
set JMail = nothing
else
End If
num = num + 1 ' tilføjer 1 til varariablen for hvert gennemløb
rs.MoveNext
Wend
Response.write "<span class='text' align='center'>Nyhedsmailen blev sendt til <b>" & num & " </b> brugere<br>"
'Reset server objects
Conn.Close
Set Conn = Nothing
Set rs = Nothing
'Response.Redirect "default.asp?sitepage=blogview_indlag&id=" & id
%>
Jeg har 2 problemer.
1. Den sender konsekvent kun til 1 bruger selvom jeg har lavet et lille test scenarie hvor den skal sende til 2
2. Jeg ville gerne kunne skriver Hej rs("brugernavn") på den jeg skriver til. Det kan jeg bare ikke lige gennemskue. Hvis jeg selecter b.brugernavn så er det kun blog opretter den skriver som navn og skifter ikke.
Id Brugernavn Kodeord send_email email
1 Kristian redzone SAND krc@bec.dk
2 test test SAND test@test.dk
3 test2 test2 SAND test2@test.dk
4 test3 test3 FALSK
5 test4 test4 SAND test4@test.dk
6 test5 test5 FALSK test5@test.dk
7 test6 test6 SAND
Scenarie nr Bruger Handling Resultat Script problem
1 kristian opret blogindlæg email til 3 send_email.asp ok
3 test opret kommentar til scenarie 1 email til 1 kommentar_Send_email.asp
4 kristian opret kommentar til scenarie 1 email til 1 kommentar_Send_email.asp
5 test4 opret kommentar til scenarie 1 email til 2 kommentar_Send_email.asp sender kun til 1 nemlig kristian
