anyone got a newsletter app that i can use my site ?

i think someone asked before but i can't find the posting

..............................................................................
Hear'Say : Music for the man in the street. I've met the man in the street and he's a cunt.
..............................................................................

i have written several...what functionality do you want and what is your web server/database architecture?

Doc
Rangewalk Digital Studios

hi... it will be basically to send out regular updates to subsribed members... be it plain txt or html emails

server supports ASP (CDONTS, VSEmail 2.09)

..............................................................................
Hear'Say : Music for the man in the street. I've met the man in the street and he's a cunt.
..............................................................................

what database technology are you using?

Doc
Rangewalk Digital Studios

MS Access 2000

..............................................................................
Hear'Say : Music for the man in the street. I've met the man in the street and he's a cunt.
..............................................................................

OK, I'm going to assume you know how to open a recordset and all that (if I'm mistaken, let me know).

I guess I need to know how you plan to populate the body of the email.

The only thing that's not completely straight forward is populating the To field. I'll do that below. Other than that, this app should take less than 20 lines of code. If you need more meat than what I post, let me know.


Open your recordset

do the following to populate the To field



<%
' ::::: POPULATE THE TO FIELD
While Not rsMyRecordset.EOF
strTo = strTo & ";" & rsMyRecordset.Fields.Item("fldEmail Address".Value
rsMyRecordset.MoveNext
Wend

' ::::: SEND THE EMAIL

Set oMail = Server.CreateObject("CDONTS.NewMail"
oMail.From = strFrom
oMail.To = strTo
oMail.Subject = strSubject
oMail.Body = strBody
'oMail.Cc = " ; "
'oMail.Bcc = " ; "


oMail.Send
Set oMail = Nothing

%>

Hope this helps...

Doc
Rangewalk Digital Studios