PackageInfoEnumerator.Current 屬性
Returns the current PackageInfo element from the collection.
命名空間: Microsoft.SqlServer.Dts.Runtime
組件: Microsoft.SqlServer.ManagedDTS (在 Microsoft.SqlServer.ManagedDTS.dll 中)
語法
'宣告
Public ReadOnly Property Current As PackageInfo
Get
'用途
Dim instance As PackageInfoEnumerator
Dim value As PackageInfo
value = instance.Current
public PackageInfo Current { get; }
public:
property PackageInfo^ Current {
PackageInfo^ get ();
}
member Current : PackageInfo
function get Current () : PackageInfo
屬性值
型別:Microsoft.SqlServer.Dts.Runtime.PackageInfo
A PackageInfo object.
備註
After an enumerator is created, or after a call to the Reset method, the MoveNext method must be called to advance the enumerator to the first element of the collection before the enumerator can read the value of the Current property; otherwise, Current is undefined and throws an exception.
Current also throws an exception if the last call to MoveNext returned false, which indicates the end of the collection.
Current does not move the position of the enumerator, and consecutive calls to Current return the same object until either MoveNext or Reset is called.
An enumerator remains valid as long as the collection remains unchanged. If changes are made to the collection, such as adding, modifying, or deleting elements, the enumerator is invalidated and becomes irrecoverable; thus, the next call to MoveNext or Reset throws an InvalidOperationException. However, if the collection is modified between calls to MoveNext and Current, Current returns the element that it is set to, even if the enumerator has been invalidated.
範例
The following code example loads two packages from the Samples folder, and saves them to the DTS Service. It then creates an enumerator and uses the MoveNext and Current methods to iterate through the packages and printing their names.
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
Sample Output:
Number of Packages 2
myp1Package
myp2Package