This surely can be done via scripting, I don’t believe Outlook provides such feature actually.
Hereafter a rapid example that shows how to send an email from script.
Create a file named C:\emails.txt with lines as:
<b>target@emailserver.com#SubjectLine</b>
Thenrun the script below that will parse the lines in the script and split them in two parts: target address and subject line.
<pre>
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
Set objFile = objFSO.OpenTextFile(“C:\emails.txt”, 1)
Do Until objFile.AtEndOfStream
Extractinfo = Split(objFile.ReadLine,”#”)
SendMail Extractinfo(0), Extractinfo(1)
i = i + 1
Loop
objFile.Close
Sub SendMail(target,subject)
Set objEmail = CreateObject(“CDO.Message”)
objEmail.From = “admin1@fabrikam.com”
objEmail.To = target
objEmail.Subject = subject
objEmail.Textbody = “Server1 is no longer accessible over the network.”
objEmail.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/sendusing”) = 2
objEmail.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserver”) = _
“smarthost”
objEmail.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserverport”) = 25
objEmail.Configuration.Fields.Update
objEmail.Send
</pre>
***********
Simple solution? Copy the body and paste in into a new mail message and add the recipient and subject you want. 🙂
Discuss This Question: