Freigeben über


Transports.Item-Methode

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

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.

HinweisHinweis

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

Siehe auch

Referenz

Transports Schnittstelle

EnvDTE80-Namespace