Compare cert salaries and plan your next career move
SMTPServer = "smtphost.domain.com" Recipient = "you@yours.com" From = "me@mine.com" Subject = "Test email" Message = "This is a two line test message" & vbcrlf & "Did you get it?" ' To add an attachment update the full path and uncomment the line ' There is one line below that must also be uncommented 'attachment = "c: \ test.txt" GenericSendmail SMTPserver, From, Recipient, Subject, Message Sub GenericSendmail (SMTPserver, From, Recipient, Subject, Message) set msg = WScript.CreateObject("CDO.Message") msg.From = From msg.To = Recipient msg.Subject = Subject msg.TextBody = Message ' To add an attachment uncomment this line 'msg.AddAttachment attachment msg.Configuration.Fields ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = SMTPServer msg.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 msg.Configuration.Fields.Update msg.Send
Compare salaries for top cybersecurity certifications. Free download for TechExams community.