Send mail through Outlook using BCE

Hi,
I need to send mail through outlook which is configured in the SCADA PC using BCE. I tried below code, but getting error on second line.

Set objOutlook = CreateObject("Outlook. Application")
Set objMail = objOutlook. CreateItem(0)

objMail. To = "recipient@example. com"
objMail. cc = "copyrecipient@example. com"
objMail. Subject = "Test Mail Subject"
objMail. Body = "This is Email Body"

'objMail. Send 'I intentionally commented this line
objOutlook. Quit
Set*objMail = Nothing
Set*objOutlook=Nothing

Any help appreciated..... Thanks