Partager via


Engines.Item, méthode

Obtient un membre indexé d'une collection Engines.

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

Syntaxe

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

Paramètres

Valeur de retour

Type : EnvDTE80.Engine
Objet Engine.

Notes

La valeur de Index peut être :

  • BSTR représentant les premières lettres du nom complet du moteur.

  • BSTR représentant le GUID du moteur.

  • Valeur entière en base 1

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

[!REMARQUE]

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

Engines Interface

EnvDTE80, espace de noms