definire un servizio smtp differente

[mjungle]

Ciao a tutti,
volevo domandarvi se c'è un modo per inviare e-Mail con CDonts utilizzando un server che non sia quello locale.
Mi spiego meglio. Se invio 10000 e-Mail tramite il mio webserver (IIS), il PC comincia a rallentare e a prendersi le sue precedenze su altri servizi. Posso dire al mio simpatico sistema di puntare al nostro server di posta interno?

Ciao e grazie ;-)

[Luis33]

che codice utilizzi?

[mjungle]

Perdonami ma non ho capito cosa intendi per codice.

[deleted_c]

con cdonts no... con cdosys si!

[mjungle]

Caro cicciopie,
tu non sai che illuminazione mi hai dato!!!

Qualche tempo fa avevo creato una piattaforma ASP per l'e-Mail Markentig dell'azienza, ma aveva un limite, utilizzava CDONTS e questo mi dava parecchi problemi con gli allegati (postai ai tempi una mia valutazione su CDONTS su questo forum).
Beh, ho appena usato CDOSYS e finalmente riesco a fare tutto!!!

In una giornata uggiosa finalmente un sorriso!
GRAZIE!

[mjungle]

Ok, ora sono incappato in un problema di comprensione.
Ho letto l'esempio di codice che c'è nella sezione ASP del sito in merito a CDOSYS.

Come definisco il server remoto?
Questo è quello che riporta l'esempio:

Dim iMsg, iConf, Flds

'Crea l'oggetto email
Set iMsg = CreateObject("CDO.Message")
'Crea l'oggetto configurazione
Set iConf = CreateObject("CDO.Configuration")
'Impostazione delle configurazioni per l'invio remoto
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True

[..]

Il mio server di posta è all'indirizzo 192.168.10.100, ovviamente diverso dal web server che processa la pagina in questione.
Come indico il server di posta?

Ciao

[deleted_c]

piccolo esempio

<%

Set objmail = CreateObject("CDO.Message")
objmail.configuration.fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'CdoSendUsingPort
objmail.configuration.fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "qui il tuo server"
objmail.configuration.fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objmail.configuration.fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 0 'anonimo
objmail.configuration.fields.Update

objmail.From = "..."
objmail.To = "..."
objmail.Subject = "..."
objmail.TextBody = "..."
objmail.Send

%>

[mjungle]

Ok, ho capito e ho gia visto che funziona. :-D
Grazie.

Mi sapresti dire, e poi non ti stresso più, perchè c'è un link al sito di Microsoft? Es. http://schemas.microsoft.com/cdo/con...ion/sendusing.

Grazie di nuovo per l'aiuto!!!

[deleted_c]

è il nome del campo non un link
non so perchè lo abbiano chiamato così