form cdosysy da vademecum aruba non funzionante...sbaglio?

[bcera]

Salve a tutti, ho un problema con l'invio mail cdosysy.
Il seguente codice perso dal vademecum ed inserito in un form mi dà il seguente errore:

ADODB.Fields error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

alla riga:
Flds(cdoSendUsingMethod) = cdoSendUsingPort

Possibile? ma se il codice lo fornisce aruba come fa a non funzionare?
qui sotto il codice:


DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
Set .Configuration = iConf
.To = "qui la mail del destinatario"
.From = "qui la mail del mittente"
.Sender = "miaemail@alice.it"
.Subject = "Titolo della mail"
.HTMLBody = "Contenuto vero e proprio della mail"
.Send
End With


grazie.
Ale

[orcim]

ti hanno già risposto qui o sbaglio ?

[bcera]

Si, ho postato nello stesso momento perchè sul forum di aruba le risposte in genere arrivano molto più lentamente che qui.
ora provo.
Grazie

[bcera]

ora c'è un altro errore:
error '8004020f'

sulla fine dello script....sulla penultima riga:

.Send

Forse sto pasticciando un po troppo ma adesso non credo di aver dimenticato pezzi in giro.

[Roby_72]

Il mittente è una email configurata nel server di posta del dominio?

Roby

[bcera]

no, cavolo, scusate, avevo fatto un errore di sintassi sull'indirizzo email del destinatario e non partiva niente.
Adesso funziona.... non mi dà nessun errore però non arriva la mail nella mia casella di posta.
Può essere che ci siano dei tepi di risposta del server? di solito è immediata, almeno lo era quando usavo il perl per l'invio dei form.

Grazie.