ScriptObjectModel.Events Eigenschaft

public:
 property Microsoft::SqlServer::Dts::Tasks::ScriptTask::EventsObjectWrapper ^ Events { Microsoft::SqlServer::Dts::Tasks::ScriptTask::EventsObjectWrapper ^ get(); };

public Microsoft.SqlServer.Dts.Tasks.ScriptTask.EventsObjectWrapper Events { get; }

member this.Events : Microsoft.SqlServer.Dts.Tasks.ScriptTask.EventsObjectWrapper

Public ReadOnly Property Events As EventsObjectWrapper

Eigenschaftswert

Die IDTSComponentEvents Sammlung bestehender Ereignisse, die im Paket definiert sind, das die Script-Aufgabe enthält.

Beispiele

Das folgende Codebeispiel für die Verwendung innerhalb einer Script-Aufgabe zeigt, wie man Ereignisse innerhalb der Script-Aufgabe erzeugt. Das Beispiel verwendet eine native Windows-API-Funktion, um zu bestimmen, ob eine Internetverbindung verfügbar ist. Wenn keine Verbindung verfügbar ist, wird ein Fehler angezeigt. Wenn eine potenziell volatile Modemverbindung verwendet wird, löst das Beispiel eine Warnung aus. Andernfalls wird eine Informationsmeldung gesendet, dass eine Internetverbindung erkannt wurde.

Private Declare Function InternetGetConnectedState Lib "wininet" _  
    (ByRef dwFlags As Long, ByVal dwReserved As Long) As Long  

Private Enum ConnectedStates  
    LAN = &H2  
    Modem = &H1  
    Proxy = &H4  
    Offline = &H20  
    Configured = &H40  
    RasInstalled = &H10  
End Enum  

Public Sub Main()  

    Dim dwFlags As Long  
    Dim connectedState As Long  

    connectedState = InternetGetConnectedState(dwFlags, 0)  

    If connectedState <> 0 Then  
        If (dwFlags And ConnectedStates.Modem) = ConnectedStates.Modem Then  
            Dts.Events.FireWarning(0, "Script Task Example", _  
                "Volatile Internet connection detected.", String.Empty, 0)  
        Else  
            Dts.Events.FireInformation(0, "Script Task Example", _  
                "Internet connection detected.", String.Empty, 0, False)  
        End If  
    Else  
        ' If not connected to the Internet, raise an error.  
        Dts.Events.FireError(0, "Script Task Example", _  
            "Internet connection not available.", String.Empty, 0)  
    End If  

    Dts.TaskResult = ScriptResults.Success  

End Sub  

Hinweise

Verwenden Sie die Events Eigenschaft des Dts Objekts im Script-Aufgabencode, um Fehler, Warnungen und Informationsmeldungen auszulösen.