cm avreste capito dal titolo ho il seguente problema, ho fatto una newsletter qui sotto il codice che ho usato:

<%
Dim rs, mail, subject, message, data_source, sql_select, no

no = 0
subject = Request.Form("subject")
message = Request.Form("testo")
message = message & vbcrlf & vbcrlf & "




INFO: Stai ricevendo questa mail perchè sei iscritto alla mailing list di http://www.stasolution.it
Se questo messaggio ti giunge in errore o non desideri ricevere più questo tipo di informazioni per favore clicca il collegamento qui sotto e cancella il tuo indirizzo dalla mailing list e non sarai piu' disturbato."
message = message & vbcrlf & "www.miosito.it/del.asp?email="
sql_select = "select email from users"
data_source = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("mdb-database\mail.mdb")
If Len(message) Then

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql_select, data_source

Dim iMsg
Dim iConf
Dim Flds
set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
Flds.Update

With iMsg
Set .Configuration = iConf
.To = rs("email")
.From = "www.miosito.it"
.Bcc = ""
.Subject = subject
.CreateMHTMLBody "http://www.miosito.it/messaggio_newsletter.htm"
.Send
End With

Response.Write "Emails sent to " & no & " users."
rs.Close
Set rs = Nothing

Else
Response.Redirect "admin.htm"
End If
%>
ho fatto un pò di prove e la mail la manda solo ed esclusivamente al primo indirizzo memorizzato nella tabella di access e non riesco a capire come mai...qualcuno sa dirmi come fare a risolvere o dove ho sbagliato? grazie