ScriptObjectModel.Events Proprietà

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

Valore della proprietà

La IDTSComponentEvents raccolta di eventi esistenti definita nel pacchetto che contiene il compito Script.

Esempio

Il seguente esempio di codice da utilizzare all'interno di un compito Script dimostra come generare eventi dall'interno del compito Script. L'esempio utilizza una funzione API nativa di Windows per determinare se è disponibile una connessione Internet. Se non è disponibile alcuna connessione, si genera un errore. Se è in uso una connessione modem potenzialmente volatile, l'esempio solleva un avvertimento. Altrimenti, restituisce un messaggio informativo che indica che è stata rilevata una connessione Internet.

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  

Commenti

Usa la Events proprietà dell'oggetto Dts nel codice del task Script per generare errori, avvisi e messaggi informativi.