problema strano nel mandare email con aruba

[s0r42]

ho una serie di siti su aruba, e per inviare email ho sempre utilizzato la stessa funzione, ma adesso su di uno mi da un problema, o meglio non mi da nessun segno
la funzione non si blocca, non da problemi, ma l'email non arriva per niente

la funzione che utilizzavo usava questo script

	Set myMail = CreateObject("CDO.Message")
	myMail.Subject = IM_titolo
	myMail.From = IM_mittente
	myMail.To = IM_destinatario
	myMail.Bcc = ""
	myMail.Cc = ""
	myMail.HTMLBody = IM_messaggio
	myMail.Send

poi facendo alcune ricerche ho visto che si usa questa

	Set myMail = CreateObject("CDO.Message")
	Set myMailConfig = CreateObject("CDO.Configuration")
	Set myMailConfigCampi = myMailConfig.Fields
	
	myMailConfigCampi(cdoSendUsingMethod) = cdoSendUsingPort
	myMailConfigCampi(cdoSMTPServer) = "smtp.aruba.it"
	myMailConfigCampi(cdoSMTPServerPort) = 25
	myMailConfigCampi(cdoSMTPAuthenticate) = 0
	myMailConfigCampi.Update
	
	With myMail
		Set .Configuration = myMailConfig
		.To = IM_destinatario
		.From = IM_mittente
		.Sender = IM_mittente
		.Subject = IM_titolo
		.HTMLBody = IM_messaggio
		.Send
	End With

all'inizio mi dava un errore, allora ho incluso questo

solo che ho scoperto che alcune variabili vanno in conflitto con altre dichiarate nella classe di upload di baol


al posto di cdoSendUsingPort che devo metterci?
devo contattare il servizio di assistenza di aruba o c'è qualcosa che mi sfugge?

[Vincent.Zeno]

... prova...

myMailConfigCampi(cdoSMTPAuthenticate) = cdoAnonymous '0