A script to write an email with a problem!

[CodyOebel]

Im developing an application console based in c++ , and needed a quick and easy way to script an outlook email. I found the below script to use which works great, but for one problem.
PROBLEM:

When the script is ran, outlook prompts me to let me know an application is useing itself and it could be a virus of some type and gives me three options. I need this to be fully automated without the prompts.. e.g script runs email gets sent nothing more! Can someone help me.. I dont know alot about scripting.

Dim theApp, theMailItem

Set theApp = WScript.CreateObject("Outlook.Application")
Set theNameSpace = theApp.GetNameSpace("MAPI")

Set theMailItem = theApp.CreateItem(0)

theMailItem.Recipients.Add "[e-mail]"
theMailItem.Subject = "TESTING EMAIL"
theMailItem.Body = "I GOSH I THINK IT WORKED"
theMailItem.Send
theNameSpace.Logoff