ScriptObjectModel.Events Property
Returns the IDTSComponentEvents collection of existing events defined in the package that contains the Script task.
Espacio de nombres: Microsoft.SqlServer.Dts.Tasks.ScriptTask
Ensamblado: Microsoft.SqlServer.ScriptTask (in microsoft.sqlserver.scripttask.dll)
Sintaxis
'Declaración
Public ReadOnly Property Events As IDTSComponentEvents
public IDTSComponentEvents Events { get; }
public:
property IDTSComponentEvents^ Events {
IDTSComponentEvents^ get ();
}
/** @property */
public IDTSComponentEvents get_Events ()
public function get Events () : IDTSComponentEvents
Valor de propiedad
The IDTSComponentEvents collection of existing events defined in the package that contains the Script task.
Notas
Use the Events property of the Dts object in Script task code to raise errors, warnings and information messages.
Ejemplo
The following sample of code for use inside a Script task demonstrates how to raise events from within the Script task. The example uses a native Windows API function to determine whether an Internet connection is available. If no connection is available, it raises an error. If a potentially volatile modem connection is in use, the example raises a warning. Otherwise, it returns an informational message that an Internet connection has been detected.
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 = Dts.Results.Success
End Sub
Seguridad para subprocesos
Any public static (Shared in Microsoft Visual Basic) members of this type are thread safe. Any instance members are not guaranteed to be thread safe.
Plataformas
Plataformas de desarrollo
Para obtener una lista de las plataformas compatibles, vea Requisitos de hardware y software para instalar SQL Server 2005.
Plataformas de destino
Para obtener una lista de las plataformas compatibles, vea Requisitos de hardware y software para instalar SQL Server 2005.
Vea también
Referencia
ScriptObjectModel Class
ScriptObjectModel Members
Microsoft.SqlServer.Dts.Tasks.ScriptTask Namespace