Partager via


Transports.Item, méthode

Obtient un membre indexé d'une collection Transports.

Espace de noms :  EnvDTE80
Assembly :  EnvDTE80 (dans EnvDTE80.dll)

Syntaxe

'Déclaration
Function Item ( _
    index As Object _
) As Transport
Transport Item(
    Object index
)
Transport^ Item(
    [InAttribute] Object^ index
)
abstract Item : 
        index:Object -> Transport 
function Item(
    index : Object
) : Transport

Paramètres

Valeur de retour

Type : EnvDTE80.Transport
Objet Transport.

Notes

La méthode Item lève une exception System.ArgumentException si la collection ne trouve pas l'objet Transport correspondant à la valeur d'index.

Notes

Lorsque vous enregistrez une macro et que vous la joignez à un processus de débogage à l'aide du moteur de débogage T-SQL, elle retourne deux références distinctes au même nom de moteur. Par exemple, dbgeng(0) = transprt.Engines.Item("T-SQL") et dbgeng(1) = transprt.Engines.Item("T-SQL"). Cela se produit car il existe deux moteurs de débogage T-SQL sous-jacents dans Visual Studio : un pour le moteur de débogage SQL Server 2005, l'autre pour le moteur de débogage T-SQL pour SQL Server 2000 et SQL Server 7. Ils sont tous les deux référencés automatiquement lors de l'attachement à un processus du moteur du débogage via l'interface utilisateur, mais dans le code d'automation, ils doivent être référencés en utilisant leur identificateur unique GUID. Le GUID de SQL Server 2005 est \{1202F5B4-3522-4149-BAD8-58B2079D704F\}, et le GUID du moteur de débogage T-SQL pour SQL Server 2000 et SQL Server 7 est \{5AF6F83C-B555-11D1-8418-00C04FA302A1\}. Par conséquent, les appels ci-dessus doivent être remplacés respectivement par dbgeng(0) = trans.Engines.Item("{1202F5B4-3522-4149-BAD8-58B2079D704F}") et dbgeng(1) = trans.Engines.Item("{1202F5B4-3522-4149-BAD8-58B2079D704F}").

Exemples

' Macro code.
Imports EnvDTE
Imports EnvDTE80
Imports System.Diagnostics
Imports Microsoft.VisualBasic.ControlChars

Public Module Module1

    Sub ShowDefaultEngines()
        Dim dbg As EnvDTE80.Debugger2
        dbg = DTE.Debugger
        dbg.HexDisplayMode = True
        Dim transport As EnvDTE80.Transport
        transport = dbg.Transports.Item("default")
        Dim engine As EnvDTE80.Engine
        Dim strEngineList As String
        For Each engine In transport.Engines
            strEngineList = strEngineList + engine.Name + ", " + _
            engine.ID + ", " + engine.AttachResult.ToString + NewLine
        Next
        MsgBox(strEngineList)
    End Sub
End Module

Sécurité .NET Framework

Voir aussi

Référence

Transports Interface

EnvDTE80, espace de noms