Transports.Item-Methode

Artikel
08/10/2011

Ruft einen indizierten Member einer Transports-Auflistung ab.

Namespace: EnvDTE80
Assembly: EnvDTE80 (in EnvDTE80.dll)

Syntax

'Declaration
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

Parameter

index
Typ: System.Object

Rückgabewert

Typ: EnvDTE80.Transport
Ein Transport-Objekt.

Hinweise

Die Item-Methode löst eine System.ArgumentException-Ausnahme aus, wenn die Auflistung das dem Indexwert entsprechende Transport-Objekt nicht finden kann.

Tipp

Wenn Sie ein Makro aufzeichnen und einen Debugprozess über das T-SQL-Debugmodul anfügen, gibt das Makro zwei einzelne Verweise auf denselben Modulnamen zurück. Beispielsweise dbgeng(0) = transprt.Engines.Item("T-SQL") und dbgeng(1) = transprt.Engines.Item("T-SQL"). Dies geschieht, da in Visual Studio eigentlich zwei T-SQL-Debugmodule vorliegen: ein SQL Server 2005-Debugmodul und ein weiteres T-SQL-Debugmodul für SQL Server 2000 und SQL Server 7. Beim Anfügen eines Debugprozesses über die Benutzeroberfläche wird automatisch ein Verweis auf beide Module erstellt, im Automatisierungscode muss jedoch mit der jeweiligen eindeutigen Bezeichner-GUID einzeln auf sie verwiesen werden. Die GUID für SQL Server 2005 lautet {1202F5B4-3522-4149-BAD8-58B2079D704F}, und die GUID des T-SQL-Debugmoduls für SQL Server 2000 und SQL Server 7 ist {5AF6F83C-B555-11D1-8418-00C04FA302A1}. Deshalb sollten die oben genannten Aufrufe jeweils in dbgeng(0) = trans.Engines.Item("{1202F5B4-3522-4149-BAD8-58B2079D704F}") und dbgeng(1) = trans.Engines.Item("{1202F5B4-3522-4149-BAD8-58B2079D704F}") geändert werden.

Beispiele

' 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

.NET Framework-Sicherheit

Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.

Siehe auch

Referenz

Transports Schnittstelle

EnvDTE80-Namespace

Freigeben über