This Visual Basic for Applications example uses the StatusReport method to report the status of the currently open task.
Set myOlApp = CreateObject("Outlook.Application")
Set myTask = myOlApp.ActiveInspector.CurrentItem
Set myReport = myTask.StatusReport
myReport.Send
If you use VBScript, you do not create the Application object. This example shows how to perform the same task using VBScript.
Set myTask = Application.ActiveInspector.CurrentItem
Set myReport = myTask.StatusReport
myReport.Send