COMO: Obter uma lista dos pacotes DTS

Artigo: 241249 - Ver produtos para os quais este artigo se aplica.

Ver isen��o de responsabilidades para tradu��o autom�tica

Clique aqui para exibir o artigo traduzido e o artigo original em ingl�s, lado a lado.

Expandir tudo | Reduzir tudo

Sum�rio

Pode armazenar o pacote de servi�os de transforma��o de dados (DTS) dos tr�s locais. Os seguintes exemplos de c�digo descrevem os tr�s m�todos para obter uma lista de pacotes para cada m�todo de armazenamento.

SQL Server

Pacotes armazenados no SQL Server s�o guardados na base de dados msdb . Executar a consulta para obter a lista seguinte:

exec msdb..sp_enum_dtspackages

Reposit�rio

Para pacotes que armazena no reposit�rio, tem de enumerar o reposit�rio atrav�s do objecto reposit�rio. Primeiro tem de registar esta adicionando uma refer�ncia ao objecto de Reposit�rio da Microsoft . Utilize o seguinte fragmento de c�digo para obter a lista de pacotes:

Option Explicit
Private Sub EnumPackages_Click()
    Dim oRep As New Repository
    Dim oITF As InterfaceDef
    Dim oCol As ObjectCol
    Dim oObj As RepositoryObject
    oRep.Open "Driver={SQL Server};Server=(local);Trusted_Connection=yes;Database=msdb"
    
    ' OBJID of IDtsTransformationPackage interface
    Set oITF = oRep.Object("{{EBB9995C-BA15-11d1-901B-0000F87A3B33},000032CA}")
    Set oCol = oITF.ObjectInstances
    For Each oObj In oCol
        Debug.Print oObj.Name
    Next
End Sub

InMicrosoft Visual Basic. NET, o c�digo requer algumas pequenas altera��es:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim oRep As New RepositoryTypeLib.Repository
    Dim oITF As RepositoryTypeLib.InterfaceDef
    Dim oCol As RepositoryTypeLib.ObjectCol
    Dim oObj As RepositoryTypeLib.RepositoryObject
    oRep.Open "Driver={SQL Server};Server=(local);Trusted_Connection=yes;Database=msdb"

     ' OBJID of IDtsTransformationPackage interface
    oITF = oRep.Object("{{EBB9995C-BA15-11d1-901B-0000F87A3B33},000032CA}")
    oCol = oITF.ObjectInstances
    For Each oObj In oCol
        Debug.WriteLine(oObj.Name)
    Next
End Sub

Ficheiro

Para pacotes que s�o armazenados num ficheiro, pode obter uma lista de separados, guardadas pacotes no ficheiro utilizando o seguinte fragmento de c�digo:

Option Explicit
Private Sub Command1_Click()
    Dim oPackage As New DTS.Package
    Dim oInfoCollection As DTS.SavedPackageInfos
    Dim oInfo As DTS.SavedPackageInfo

    Set oInfoCollection = oPackage.GetSavedPackageInfos("c:\temp\samples.dts")
    
    For Each oInfo In oInfoCollection
        Debug.Print oInfo.PackageName + " " + oInfo.VersionID
    Next
End Sub

No Visual Basic. NET, ter� de adicionar uma refer�ncia � Biblioteca de objectos Microsoft DTSPackage first.Use o seguinte c�digo:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim oPackage As New DTS.Package
    Dim oInfoCollection As DTS.SavedPackageInfos
    Dim oInfo As DTS.SavedPackageInfo

    oInfoCollection = oPackage.GetSavedPackageInfos("c:\temp\samples.dts")

    For Each oInfo In oInfoCollection
        Debug.WriteLine(oInfo.PackageName + " " + oInfo.VersionID)
    Next
End Sub

Propriedades

Artigo: 241249 - �ltima revis�o: s�bado, 27 de Dezembro de 2003 - Revis�o: 4.4

A informa��o contida neste artigo aplica-se a:

Microsoft SQL Server 7.0 Standard Edition
Microsoft SQL Server 2000 Standard Edition
Microsoft SQL Server 2000 64-bit Edition

kbmt kbhowtomaster kbsqlprog KB241249 KbMtpt

Tradu��o autom�tica

IMPORTANTE: Este artigo foi traduzido por um sistema de tradu��o autom�tica (tamb�m designado por Machine translation ou MT), n�o tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplica��es (MT) e artigos traduzidos por tradutores profissionais. O objectivo � simples: oferecer em Portugu�s a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradu��o autom�tica n�o � sempre perfeita. Esta pode conter erros de vocabul�rio, sintaxe ou gram�tica? erros semelhantes aos que um estrangeiro realiza ao falar em Portugu�s. A Microsoft n�o � respons�vel por incoer�ncias, erros ou estragos realizados na sequ�ncia da utiliza��o dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualiza��es frequentes ao software de tradu��o autom�tica (MT). Obrigado.

Clique aqui para ver a vers�o em Ingl�s deste artigo: 241249

(http://support.microsoft.com/kb/241249/en-us/ )