作者:VB.NET开发
项目:System.Workflow.Runtime.Trackin
Shared Sub WriteTerminatedEventArgs(ByVal eventDescription As String, ByVal terminatedEventArgs As TrackingWorkflowTerminatedEventArgs, ByVal eventDataTime As DateTime)
Console.WriteLine(vbCrLf + "Terminated Event Arguments Read From Tracking Database:")
Console.WriteLine("EventDataTime: " + eventDataTime.ToString(CultureInfo.CurrentCulture))
Console.WriteLine("EventDescription: " + eventDescription)
If terminatedEventArgs.Exception IsNot Nothing Then
Console.WriteLine("TerminatedEventArgs Exception Message: " + terminatedEventArgs.Exception.Message.ToString())
End If
End Sub