次の方法で共有


GetEnumerator メソッド

PackageInfos コレクションに対する繰り返し処理で使用する列挙子を返します。

名前空間:  Microsoft.SqlServer.Dts.Runtime
アセンブリ:  Microsoft.SqlServer.ManagedDTS (Microsoft.SqlServer.ManagedDTS.dll)

構文

'宣言
Public Function GetEnumerator As PackageInfoEnumerator
'使用
Dim instance As PackageInfos
Dim returnValue As PackageInfoEnumerator

returnValue = instance.GetEnumerator()
public PackageInfoEnumerator GetEnumerator()
public:
PackageInfoEnumerator^ GetEnumerator()
member GetEnumerator : unit -> PackageInfoEnumerator 
public function GetEnumerator() : PackageInfoEnumerator

使用例

次のコード例では、Samples フォルダから 2 つのパッケージを読み込み、Integration Services サービスに保存します。次に、列挙子を作成してパッケージを繰り返し処理し、各パッケージの名前を出力します。

using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.SqlServer.Dts.Runtime;

namespace PackageInfoTest
{
    class Program
    {
        static void Main(string[] args)
        {
            string pkg = @"C:\Program Files\Microsoft SQL Server\100\Samples\Integration Services\Package Samples\ExecuteProcess Sample\ExecuteProcess\UsingExecuteProcess.dtsx";
            string pkg2 = @"C:\Program Files\Microsoft SQL Server\100\Samples\Integration Services\Package Samples\CalculatedColumns Sample\CalculatedColumns\CalculatedColumns.dtsx";

            Application app = new Application();
            Package p1 = app.LoadPackage(pkg, null);
            Package p2 = app.LoadPackage(pkg2, null);
            p1.Description = "UsingExecuteProcess package";
            p2.Description = "Calculated Columns package";

            app.SaveToDtsServer(p1, null, @"File System\myp1Package", "YOURSERVER");
            app.SaveToDtsServer(p2, null, @"File System\myp2Package", "YOURSERVER");

            PackageInfos pInfos = app.GetDtsServerPackageInfos(@"File System", "YOURSERVER");
            Console.WriteLine("Number of Packages {0}", pInfos.Count.ToString());

            PackageInfoEnumerator iEnum = pInfos.GetEnumerator();

            while (iEnum.MoveNext())
                {
                    String pkgName = iEnum.Current.Name;
                    Console.WriteLine(pkgName); 
                }
         }
    }
}
Imports System
Imports System.Collections.Generic
Imports System.Text
Imports Microsoft.SqlServer.Dts.Runtime
 
Namespace PackageInfoTest
    Class Program
        Shared  Sub Main(ByVal args() As String)
            Dim pkg As String =  "C:\Program Files\Microsoft SQL Server\100\Samples\Integration Services\Package Samples\ExecuteProcess Sample\ExecuteProcess\UsingExecuteProcess.dtsx" 
            Dim pkg2 As String =  "C:\Program Files\Microsoft SQL Server\100\Samples\Integration Services\Package Samples\CalculatedColumns Sample\CalculatedColumns\CalculatedColumns.dtsx" 
 
            Dim app As Application =  New Application() 
            Dim p1 As Package =  app.LoadPackage(pkg,Nothing) 
            Dim p2 As Package =  app.LoadPackage(pkg2,Nothing) 
            p1.Description = "UsingExecuteProcess package"
            p2.Description = "Calculated Columns package"
 
            app.SaveToDtsServer(p1, Nothing, "File System\myp1Package", "YOURSERVER")
            app.SaveToDtsServer(p2, Nothing, "File System\myp2Package", "YOURSERVER")
 
            Dim pInfos As PackageInfos =  app.GetDtsServerPackageInfos("File System","YOURSERVER") 
            Console.WriteLine("Number of Packages {0}", pInfos.Count.ToString())
 
            Dim iEnum As PackageInfoEnumerator =  pInfos.GetEnumerator() 
 
            While iEnum.MoveNext()
                    Dim pkgName As String =  iEnum.Current.Name 
                    Console.WriteLine(pkgName)
            End While
        End Sub
    End Class
End Namespace

サンプルの出力 :

Number of Packages 2

myp1Package

myp2Package