Ciao sono Marco, il solito impedito :-)

Cerco di inviare una normalissima e-mail pero' usando CDONTS.

Vi allego quello che ho scrippo per avere le idee piu' chiare

-------------------------------------------------------------------------
<%

Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From="marco@pesaronline.com"
objMail.To = "marco@pesaronline.com"
objMail.Body="Questa è una prova di spedizione e-mail via CDO"
objMail.Subject="Prova e-mail"
objMail.importance=0
objMail.Send
set objMail = nothing
Conn.close
Set Conn = nothing
%>
-------------------------------------------------------------------------

La risposta che il serve mi da e'

Impossibile visualizzare la pagina desiderata. Si è verificato un problema.

Provare a eseguire le operazioni seguenti:

Aprire la pagina iniziale www.pesaronet.com, quindi cercare i collegamenti alle informazioni desiderate.
Scegliere il pulsante Aggiorna o riprovare in un secondo momento.

Fare clic sul pulsante Cerca per ricercare informazioni su Internet.
È anche possibile visualizzare un elenco di siti correlati.

HTTP 500 - Errore interno del server
Internet Explorer

----------------------------------------------------------------------
la prima curiosita' e' che il comando CDONTS deve essere configurato nel server ?
Altrimenti non mi si spiega il non funzionamento :-(

Grazie per il suggerimento almeno cosi vedo tutti gli errori

scusa ma nel frattempo ho cambiato !!!
ho provato con jmail !!!!
Sono riuscito a inviare una mail e crearmi una mia mailing list attraverso la lettura di un database.
un piccolo problema pero' che ancora non ho risolto e' questo:
mi da un errore se inserico la linea con la freccia

Mail.sender= mailing <-------------------------

Cioe' non posso mettere da dove arriva la posta altrimenti il server mi scrive


jmail.SMTPMail error '8000ffff'

The message was undeliverable. All servers failed to receive the message

/test/mlist/mailing.asp, line 40


dove ovviamente la riga 40 e'
mail.Execute
e senza la riga sopra descritta funziona tutto correttamente pero' mi arrivano email con da---> unknown

codice che ho scritto !!!


__________________________________________________
<%
Response.Buffer = true

mailing="mailing list"

set rs = server.createobject("adodb.recordset")
sqlstr="Select nomecompleto,email FROM tabellaclienti"
rs.open(sqlstr),cn

do while not rs.EOF

set mail = createObject("jmail.SMTPMail")
mail.ServerAddress = "mail.pesaronline.net"
mail.ServerPort="25"
mail.MailDomain="mail.pesaronline.com"
Mail.sender= mailing <-------------------------

alfa=rs("email")
mail.AddRecipient alfa
mail.Subject = request("oggetto")

Mail.Body= request("testo")
mail.Execute
rs.MoveNext
loop
%>