News CDOSYS con errore numero email inviate

[tissi]

ciao,
sto cercando di adattare uno script per newsletter con allegato che sfruttava CDONTS per passare ad un server che invece utilizza CDOSYS.

Ho già sistemato iscrizione e cancellazione dalla mailing list e mi manca solo l'invio, o meglio l'invio viene eseguito correttamente ma lo script mi restituisce una pagina di errore anziché scrivermi quante email ha inviato in tutto:

Microsoft VBScript runtime error '800a000d'
Type mismatch: 'objMail.To'
/news-allega/send.asp, line 24


qualcuno ha un suggerimento?
grazie



################################################## ############

<%
set connection = Server.CreateObject("ADODB.Connection")
Conn_String = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/newsletter.mdb")
Connection.Open Conn_String
Set Recordsx = CreateObject("ADODB.Recordset")
sqltemp = "SELECT * FROM email"
Recordsx.Open sqltemp, Connection,2,3

i=0
Do While not Recordsx.eof
Set objMail = Server.CreateObject("CDO.Message")
objMail.addAttachment(Server.MapPath(request.form( "attachfile")))
objMail.From=request.form("fromName") & "<" & request.form("fromEmail") & ">"
objMail.To=Recordsx("email")
objMail.Subject=request.form("subject")
objMail.textBody=request.form("body") & chr(13) & request.form("ending")
objMail.Send()
Set objMail = nothing
Recordsx.movenext
i=i+1
loop

set rsEmail = nothing

response.write ("<font size=""2"" ace=""arial"">http://<b>Sono state inviate n° " & ... home page</b></font>")
%>

[tissi]

up

[Mizushi]

Stampa questo e vedi cosa restituisce:

x = Recordsx("email") 
response.write x
response.end

[tissi]

scusa il ritardo notevole con cui rispondo



continua a darmi l'errore alla stessa riga....

[Roby_72]

Secondo me hai qualche record in cui l'email non è presente.

Roby

[tissi]

quando c'è un record senza email mi restituisce un altro errore,
mi è già capitato varie volte....

questa newsletter ce l'ho su 4 siti differenti ma l'errore è sempre lo stesso: linea 24

[Roby_72]

Ma qui

objMail.From=request.form("fromName") & "<" & request.form("fromEmail") & ">"

che indirizzo metti??
Deve essere un indirizzo configurato nel server SMTP.
Cioè se spedisci da pippo.it l'email mittente deve essere una cosa del tipo info@pippo.it

Roby

[tissi]

l'indirizzo lo prende da un form (come pure il nome di chi scrive)
si tratta di una newsletter multiutente, puoi essere inviata cioè da
pinco info@sito1.it
pallino staff@sito2.it
ecc. ecc.

[Roby_72]

Sbagliato.
Può essere inviata da chi vuoi ma l'indirizzo di partenza deve essere presente nel dominio che la spedisce.

Roby