invio mail da pagina asp risiedente su server aruba

[devil946]

Nel frattempo ho cambiato codice e questo non dà errore ma non ricevo la mail, perchè?
Forse perchè non uso una mail di aruba per invio?

	Dim objMail, objConfig 
	Set objMail = Server.CreateObject("CDO.Message") 
	Set objConfig = Server.CreateObject ("CDO.Configuration")
	With objConfig 
	.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.aruba.it" 
	.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
	.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
	.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 
	.Fields.Update 
	End With 
	
	Set objMail.Configuration = objConfig 
	objMail.From = "yyyyyyy@gmail.com"
	objMail.To = "xxxx@gmail.com"
	objMail.Subject = OggettoMail
	objMail.HTMLBody = "Sei stato convocato"
	objMail.Send() 
	Set objMail = Nothing