Hejsan!
Har använt forumet som resursbank och tittat samt testat själv lite...nu funkar inte det längre...*ler*...
Måste be om lite hjälp angående en "enkel" grej? Har säkert stirrat mig blind =)
Vill ju skicka ut ett mail till registrerade användare i databasen. Allt verkara funka? Användarna finns där och det skrivs ut att det har skickats men...nope...nada kommer fram. Är nu lite lat kanske men har en massa andra applikationer jag jobbar med så...vore tacksam med lite hjälp/ledtrådar...
Använder ett enkelt formulär och här är scriptet skicka.asp:
<%
Set db=Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("../databas.mdb")
SQL = "SELECT Epost From Maillist"
Set rs = db.Execute(SQL)
%>
Följande har fått mailet:
<p>
<%
do until rs.EOF
SendEmail "mailinglista",rs("Epost"),Request.Form("Rubrik"),Request.Form("Message")
%>
<%=rs("Epost")%><br>
<%
rs.MoveNext
Loop
%>
<%
Sub SendEmail(sFrom,sTo,sSubject,sMessage)
Set objMail = CreateObject("CDONTS.Newmail")
objMail.From = sFrom
objMail.To = sTo
objMail.Subject = sSubject
objMail.Body = sMessage
objMail.BodyFormat = 0
objMail.Send
Set objMail = Nothing
End Sub
%>
Ps. Ursäkta fulkoden =)