Smart Host e web-mail

[b_lilith]

Salve a tutti!
Avevo aperto un 3D qualche giorno fa per problemi di invio mail via web pensando di sbagliare io, ma poi ho scoperto che il problema è del server e, visto che gli amministratori del server non riescono a risolvere il problema, mi rivolgo a voi, in cui ripongo infinita fiducia!!
Loro mi hanno risposto inviandomi un file in asp.net che funziona (con CDONTS), ma che mi costringerebbe a riscrivere 3 pagine fitte di asp in un linguaggio a me sconosciuto...

Sto tentando di inviare una newsletter dal web da un sito ospitato su un server WIN2000, NON DOTATO DI EXCHANGE (!)
Con CDONTS non rilevo errori, eccetto il fatto che le mails non arrivano...
con CDOSYS, senza configurazioni mi dà come errore:
Error Type: CDO.Message.1 (0x80040220)
The "SendUsing" configuration value is invalid.
Mettendo i parametri di configurazione relativi all'SMTP mi restituisce questo errore:
errore n° -2147220973 The transport failed to connect to the server.
oppure
errore n° -2147220978 The server rejected the sender address. The server response was: 501 Bad address syntax

Mi hanno detto che il server controlla l'esistenza dell'indirizzo di posta in uscita prima di spedirlo, ma io ho fatto la prova anche con una loro mail (gestita quindi direttamente dal loro SMTP)

gironzolando qua e là ho visto che si può risolvere il problema settando uno SMART HOST, ma non ho trovato come è possibile farlo.

Qulcuno sa aiutarmi?
Questo è il codice di configurazione che uso:

		Set objMessage = Server.CreateObject("CDO.Message") 
		Set iConf = CreateObject("CDO.Configuration")
		Set Flds = iConf.Fields
		
		Flds("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "193.43.96.16" ' SMTP del server su cui è ospitato il sito
		Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ' cdoSendUsingPort
		Flds("http://schemas.microsoft.com/cdo/configuration/cdoSMTPServerPort") = 25 ' cdoSMTPServerPort
		Flds("http://schemas.microsoft.com/cdo/configuration/cdoSMTPAuthenticate") = cdoBasic 
		Flds.Update
		
		With objMessage 
		Set .Configuration = iConf
		.To = "longhi.barbara@virgilio.it" 
		.From = "info@polipositivi.com"
		.Sender = "La Newsletter di PoliPositivi"
		.CC = "" 
		.Subject = "prova CDOSYS da polipositivi" 
		.HTMLBody = messaggio
		.Send

Ciao e grazie!

[b_lilith]

RISOLTO!
...mancava il .item nel campo fields....