次の方法で共有

ScriptObjectModel.Events Property

  • [アーティクル]

スクリプト タスクを含むパッケージで定義された既存のイベントの IDTSComponentEvents コレクションを返します。

名前空間: Microsoft.SqlServer.Dts.Tasks.ScriptTask
アセンブリ: Microsoft.SqlServer.ScriptTask (microsoft.sqlserver.scripttask.dll 内)

構文

'宣言
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

プロパティ値

スクリプト タスクを含むパッケージで定義された既存のイベントの IDTSComponentEvents コレクションです。

解説

エラー、警告、および情報メッセージを発生させるには、スクリプト タスク コードで Dts オブジェクトの Events プロパティを使用します。

使用例

スクリプト タスク内で使用する次のサンプル コードは、スクリプト タスク内からイベントを発生させる方法を示しています。この例では、ネイティブ Windows API 関数を使用してインターネット接続が利用できるかどうかを確認します。接続が利用できない場合は、エラーが発生します。潜在的に不安定なモデム接続が使用されている場合、この例では警告が発生します。それ以外の場合は、インターネット接続が検出されたことを示す情報メッセージを返します。

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

スレッド セーフ

この型の public static (Microsoft Visual Basic では共有 ) メンバは、スレッド セーフです。インスタンス メンバの場合は、スレッド セーフであるとは限りません。

プラットフォーム

開発プラットフォーム

サポートされているプラットフォームの一覧については、「SQL Server 2005 のインストールに必要なハードウェアおよびソフトウェア」を参照してください。

対象プラットフォーム

サポートされているプラットフォームの一覧については、「SQL Server 2005 のインストールに必要なハードウェアおよびソフトウェア」を参照してください。

参照

関連項目

ScriptObjectModel Class
ScriptObjectModel Members
Microsoft.SqlServer.Dts.Tasks.ScriptTask Namespace