共用方式為


StatusReport Method

Sends a status report to all Cc recipients (recipients returned by the StatusUpdateRecipients property) with the current status for the task. Returns an Object representing the status report.

expression**.StatusReport**

*expression    * Required. An expression that returns a TaskItem object.

Example

This Visual Basic for Applications (VBA) example uses the StatusReport method to report the status of the currently open task.

Sub SendStatusReport()
    Dim myOlApp As New Outlook.Application
    Dim myTask As Outlook.TaskItem
    Dim myinspector As Outlook.Inspector
    Dim myReport As Object
    Set myinspector = myOlApp.ActiveInspector
    If Not TypeName(myinspector) = "Nothing" Then
        If TypeName(myinspector.CurrentItem) = "TaskItem" Then
            Set myTask = myinspector.CurrentItem
            Set myReport = myTask.StatusReport
            myReport.Send
        Else
            MsgBox "No task item is currently open."
        End If
    Else
        MsgBox "No inspector is currently open."
    End If
End Sub

If you use Microsoft Visual Basic Scripting Edition (VBScript) in a Microsoft Outlook form, you do not create the Application object. This example shows how to perform the same task using VBScript.

Sub CommandButton1_Click()
   If TypeName(Item) = "TaskItem" Then
     Set myReport = Item.StatusReport
     myReport.Send
   Else
     MsgBox "The current item is not a task item."
 End If
End Sub

Applies to | TaskItem Object

See Also | CC Property | Recipients Property | Status Property | StatusOnCompletionRecipients Property | StatusUpdateRecipients Property