スクリプト タスクによるパフォーマンス カウンタの監視

更新 : 2006 年 4 月 14 日

システム管理者は、大容量のデータ上で複雑な変換を実行する Integration Services パッケージのパフォーマンスを監視する必要が生じる場合があります。Microsoft .NET Framework の System.Diagnostics 名前空間では、既存のパフォーマンス カウンタを使用したり、ユーザー独自のパフォーマンス カウンタを作成するためのクラスが用意されています。

パフォーマンス カウンタはアプリケーションのパフォーマンス情報を格納するので、これを使用して、時間経過に伴うソフトウェアのパフォーマンスを分析できます。パフォーマンス カウンタは [パフォーマンス モニタ] ツールを使用して、ローカルまたはリモートで監視できます。パフォーマンス カウンタの値を変数に格納して、後でパッケージ内で制御フローを分岐するために使用できます。

パフォーマンス カウンタを使用する代わりに、Dts オブジェクトの Events プロパティを介して、FireProgress イベントを発生させることができます。FireProgress イベントは、進捗状況および完了した割合に関する情報を、Integration Services ランタイムに返します。

メモ :
複数のパッケージでより簡単に再利用できるタスクを作成する場合は、このスクリプト タスク サンプルのコードを基にした、カスタム タスクの作成を検討してください。詳細については、「カスタム タスクの開発」を参照してください。

説明

次の例では、カスタム パフォーマンス カウンタを作成し、カウンタの値を増やします。最初に、パフォーマンス カウンタが既に存在しているかどうかを判別します。パフォーマンス カウンタが作成されていない場合、スクリプトは PerformanceCounterCategory オブジェクトの Create メソッドを呼び出してパフォーマンス カウンタを作成します。パフォーマンス カウンタが作成されたら、スクリプトはそのカウンタの値を増やします。最後に、この例ではベスト プラクティスに従って、パフォーマンス カウンタが不要になると、そのカウンタに対して Close メソッドを呼び出します。

メモ :
パフォーマンス カウンタ カテゴリとパフォーマンス カウンタを新しく作成するには、管理権限が必要です。また、新しいカテゴリとカウンタは、作成後もコンピュータに保存されます。

このスクリプト タスクの例を構成するには

• コードで Imports ステートメントを使用して、System.Diagnostics 名前空間をインポートします。

コード例

Public Sub Main()

    Dim myCounter As PerformanceCounter

    Try
        'Create the performance counter if it does not already exist.
        If Not _
        PerformanceCounterCategory.Exists("TaskExample") Then
            PerformanceCounterCategory.Create("TaskExample", _
                "Task Performance Counter Example", "Iterations", _
                "Number of times this task has been called.")
        End If

        'Initialize the performance counter.
        myCounter = New PerformanceCounter("TaskExample", _
            "Iterations", String.Empty, False)

        'Increment the performance counter.
        myCounter.Increment()

         myCounter.Close()
        Dts.TaskResult = Dts.Results.Success
    Catch ex As Exception
        Dts.Events.FireError(0, _
            "Task Performance Counter Example", _
            ex.Message & ControlChars.CrLf & ex.StackTrace, _
            String.Empty, 0)
        Dts.TaskResult = Dts.Results.Failure
    End Try

End Sub

変更履歴

リリース	履歴
2006 年 4 月 14 日	新しい内容 : パフォーマンス カウンタを新しく作成するには管理権限が必要であること、および作成したカウンタは削除するまで保存されることを追加しました。