' Windows Script Host Sample Script ' ' ----------------------------------------------------------------- ' Copyright (C) 2003 MyServiceCenter ' ----------------------------------------------------------------- Call StartEmail() Sub StartEmail() Set Outlook = WScript.CreateObject("Outlook.Application") Set MyItem = Outlook.CreateItem(olMailItem) Set MyRecipients = MyItem.Recipients MyRecipients.Add "client@xyz.com" MyItem.Display MyItem.Subject = "MySC announcement" StrBody = "** Introducing MySC solutions **" StrBody = StrBody & vbCrLf & vbCrLf & vbTab & "Making technology work." & vbCrLf & vbTab & vbTab & "Making technology affordable." MyItem.Body = StrBody End Sub