Invio emai...cdosys da modificare!

[yro]

boh...

proviamo così! cambia quasi nulla dalla tua... ma è un tentativo...

'---Funzioni per inviare mail

Function InvioMail(byVal ServerMail, byVal Mittente, byVal Destinatario, byVal Titolo, byVal Corpo)

'---Script per CDOSYS

Dim MiaMail
Set MiaMail = Server.CreateObject("CDO.Message")
MiaMail.From = mittente
MiaMail.To = destinatario
MiaMail.Cc = ""
MiaMail.Bcc = ""
MiaMail.Subject = titolo
MiaMail.TEXTBody = corpo
MiaMail.Fields("urn:schemas:httpmail:importance").Value = 2
MiaMail.Fields.Update()
MiaMail.Send()
Set MiaMail = Nothing

End Function

[Pierhagi]

Aspetta!...ripartiamo da qui!

Ho trovato e provato con SUCCESSO i file x testare l'invio dell'email con i server ARUBA. Ho cambiato l' "smtp.aruba.it" con "localhost" ed ha funzionato!

Il codice è questo:
-------------------------------------------------------------------
DIM iMsg, Flds, iConf

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

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "localhost"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update
----------------------------------------------------------------------

cmq se vuoi scaricare il file lo trovi lo zip qui:

http://vademecum.aruba.it/start/cont...ulo_cdosys.asp

io ho utilizzato la coppia di file:

"contatto.htm" e "formcdosys.asp"

Ora c'è solo da integrarli nel mio "inc_libreria.asp" che è il primo codice di questo post.

[Pierhagi]

Ho provato ad inserire questo codice nel mio file ma credo di nn essere in grado.

[yro]

Originariamente inviato da Pierhagi
Ho provato ad inserire questo codice nel mio file ma credo di nn essere in grado.

hai provato, cn il mio codice? ho riscritto la funzione basta sostituirla.

sempre se funziona!

[Pierhagi]

Si ho provato ma non mi arriva nulla.

Purtroppo nn riesco a visualizzare l'errore xchè visualizzo una pagina che mi dice che l'email è stata spedita correttamente...ma così non è!

[yro]

hai guardato se percaso è bloccatta nella mailroot?

[Pierhagi]

no come si fa?

[yro]

Originariamente inviato da Pierhagi
no come si fa?

lo fai se hai accesso al server... come ad un pc normale.