Avatar billede jansangill Nybegynder
27. december 2005 - 17:28 Der er 4 kommentarer og
1 løsning

jmail problem

eksperter, jeg har et lille problem, jeg kan godt få min jmail sendt osv, men kan kun få sendt det fra den første post i access, ikke næste.

Har prøvet at sætte mit form = id i sql, men sp giver den fejlen: data mistype in criteria.

Mit kode er dette:

<%
if request.Form("find") = "Send" then

dim mail
mail = CStr(trim(replace(request.form("mail"),chr(34),chr(39))))

set conn = server.CreateObject("ADODB.Connection")
conn.open = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& server.MapPath("../../database/uforum.mdb")

set rs = conn.execute("SELECT * FROM bruger WHERE mail = '"&mail&"'")

if not rs.eof then

if CStr(rs("mail")) = CStr(mail) then

set msg = Server.CreateOBject( "JMail.Message" )

msg.Logging = true
msg.silent = true
msg.From = "postmaster@123ogabc.dk"
msg.FromName = "Postmaster"
msg.AddRecipient mail
msg.Subject = "123ogABC.dk"
msg.HTMLBody = "Dit brugernavn er:&nbsp;" & "<strong>" & rs("bruger") & "</strong>" &"<br>" & "Dit kodeord er:&nbsp;" & "<strong>" & rs("kode") & "</strong>"
msg.Send("smtp.wannafind.dk")
check = msg.Send("smtp.wannafind.dk")
response.write check
set msg = nothing
end if       
end if
end if
%>
Avatar billede dj_uncas Nybegynder
29. december 2005 - 13:29 #1
Som det er nu tjekker du kun om rs er EOF, skriver det første ud. Hvis du vil løbe alle poster igennem skal du bug en løkke:

set msg = Server.CreateObject("JMail.Message")
msg.
....

Do While Not rs.EOF 'Start på løkke

If CStr(rs("mail")) = CStr(mail) Then
    msg.AddRecipient mail
End If

rs.MoveNext 'Gå til næste post
Loop 'Og kør igen
Avatar billede dj_uncas Nybegynder
29. december 2005 - 13:30 #2
Læ mærke til at jeg har instantieret "JMail.Message" før løkken, da det er meningsløst at lave et nyt objekt for hver post i databasen. msg.AddRecipient føjer bare en e-mail til listen i msg, så det er nok at sætte dette inde i løkken. Efter løkken kan du så slutte af med
msg.Send("...")
Avatar billede jansangill Nybegynder
29. december 2005 - 13:32 #3
uncas, jeg er ked af det, men jeg har fået det til at virke på dne måde det stod deroppe. Har bare glemt at lukke sopørgsmålet. Der var faktisk ikke noget glat med koden vist, det var bare mig der var en skovl og tjekkede de forkerte mail adresser:S
Avatar billede dj_uncas Nybegynder
29. december 2005 - 13:46 #4
ok.. Så husk at lukke nu ;-)
Avatar billede jansangill Nybegynder
29. december 2005 - 15:59 #5
koden var ok
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester