WannaCry is just the start. Read how Liquid Web is protecting itself and its customers against new threats.
Dim sName, sEmail, sMessage Dim oCdoMail, oCdoConf, sConfURL sName = "DoNotReply@test.com" sMessage = "An Request is awaiting your review." Set oCdoMail = Server.CreateObject("CDO.Message") Set oCdoConf = Server.CreateObject("CDO.Configuration") sConfURL = "http://schemas.microsoft.com/cdo/configuration/" with oCdoConf .Fields.Item(sConfURL & "sendusing") = 2 .Fields.Item(sConfURL & "smtpserver") = "smtp.mail.fedex.com" .Fields.Item(sConfURL & "smtpserverport") = 25 .Fields.Update end with with oCdoMail .From = sName .To = "firstname.lastname@example.org" .Subject = "Test" .TextBody = sMessage .HTMLBody = sMessage .Configuration = oCdoConf .Send end with Set oCdoConf = Nothing Set oCdoMail = Nothing
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.