Engines.Item-Methode
Ruft einen indizierten Member einer Engines-Auflistung ab.
Namespace: EnvDTE80
Assembly: EnvDTE80 (in EnvDTE80.dll)
Syntax
'Declaration
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
Parameter
- index
Typ: Object
Rückgabewert
Typ: EnvDTE80.Engine
Ein Engine-Objekt.
Hinweise
Der Wert für Index kann Folgendes sein:
Ein BSTR, das die ersten Buchstaben des vollständigen Namens des Moduls darstellt.
Ein BSTR, das die GUID des Moduls darstellt.
Ein auf 1 basierender Ganzzahlwert
Die Item-Methode löst eine ArgumentException-Ausnahme aus, wenn die Auflistung das dem Indexwert entsprechende Objekt nicht finden kann.
Hinweis
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.