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