Merhaba,
Aşağıdaki script ile SMTP sunucu bilgilerinizi girerek email göndermeyi sağlayabilirsiniz. Script Zamanlanabilir veya çeşitli uygulamalarda kullanılabilir.
Set objMessage = CreateObject(“CDO.Message”)
objMessage.Subject = “Example CDO Message”
objMessage.From = “[email protected]”
objMessage.To = “[email protected]”
objMessage.TextBody = “This is some sample message text.”
‘==This section provides the configuration information for the remote SMTP server.
‘==Normally you will only change the server name or IP.
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/sendusing”) = 2
‘Name or IP of Remote SMTP Server
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserver”) = “smtp.myserver.com”
‘Server port (typically 25)
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserverport”) = 25
objMessage.Configuration.Fields.Update
‘==End remote SMTP server configuration section==
objMessage.Send

Senior IT Pro Trainer & Consultant focused on MS technologies relating to System Center Products SCCM, SCOM, SCO, SCSM