Questa è la pagina di invio NewsLetters di un CMS che si trova su un host di Aruba con Widows 2003 :

<%
strSubject = Request.Form("subject")
strMessage = Request.Form("message")
If strSubject = "" Or strMessage = "" Then
Response.Write "Please fill in subject and message details!"
Else
Set objRS = connect.Execute ("SELECT * FROM maillista")
If objRS.EOF Then
Response.Write "There are no current subscribers to the newsletter service"
Else
Do Until objRS.EOF
Response.Write "Sent to " & objRS("email") & "
"
' CDONTS
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = tipsmail
objMail.To = objRS("email")
objMail.Subject = strSubject
objMail.Body = strMessage
objMail.Send
Set objMail = Nothing

Response.Flush
objRS.MoveNext
Loop
Response.Write "

Clear!"
End If
objRS.Close
Set objRS = Nothing

End If
%>


si può cambiare il codice invece di CDONTS usare CDOSYS ??? Grazie per le risposte....