Inviare e-mail utilizzando un server esterno con CDO per Windows 2000
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
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
