Dall'archivio script > Classic ASP

Inviare e-mail utilizzando un server esterno con CDO per Windows 2000

di Daniele BochicchioDaniele Bochicchio, in Classic ASP, E-mail,

CDO per Windows 2000 consente di utilizzare un server SMTP diverso da quello locale per l'invio di e-mail con CDONTS.
Per sfruttare questa caratteristica è necessario utilizzare un oggetto di tipo Configuration a cui appendere alcuni flag di configurazioni, riportati nello script che segue:e

<%

Set Config = Server.CreateObject("CDO.Configuration")
Set Fields = Config.Fields
Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ' cdoSendUsingPort
 Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.server.ext"
Fields.Update

Set objMail = Server.CreateObject("CDO.Message")
Set objMail.Configuration = Config

objMail.To          = "admin@server.ext"
objMail.From        = "utente@server.ext"
objMail.Subject    = "Prova messaggio"
objMail.TextBody    = "Con CDO 2.0 in Windows 2000 server"
objMail.Send

set objMail = Nothing
Set Fields = Nothing
Set Config = Nothing
%>

Commenti

Visualizza/aggiungi commenti

| Condividi su: Twitter, Facebook, LinkedIn
Aggiorna

Per inserire un commento, devi avere un account.

Fai il login e torna a questa pagina, oppure registrati alla nostra community.

Approfondimenti

Nessuna risorsa collegata

I più letti di oggi