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
- index
Type : System.Object
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
- Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, consultez Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.