Transport.Engines 屬性
取得 Engines 集合。
命名空間: EnvDTE80
組件: EnvDTE80 (在 EnvDTE80.dll 中)
語法
'宣告
ReadOnly Property Engines As Engines
Engines Engines { get; }
property Engines^ Engines {
Engines^ get ();
}
abstract Engines : Engines
function get Engines () : Engines
屬性值
型別:EnvDTE80.Engines
Engines 集合。
備註
注意事項 |
---|
當您錄製巨集,並使用 T-SQL 偵錯引擎附加至偵錯程序時,巨集會傳回相同引擎名稱的兩個不同參考。例如,dbgeng(0) = transprt.Engines.Item("T-SQL") 和 dbgeng(1) = transprt.Engines.Item("T-SQL")。發生原因是,實際上 Visual Studio 有兩個基礎 T-SQL 偵錯引擎:一個是 SQL Server 2005 偵錯引擎,另一個是 SQL Server 2000 和 SQL Server 7 T-SQL 偵錯引擎。透過 UI 附加至偵錯引擎程序時,會自動參考這兩個偵錯引擎,但在 Automation 程式碼中,必須使用唯一識別項 GUID 個別參考它們。SQL Server 2005 的 GUID 是 \{1202F5B4-3522-4149-BAD8-58B2079D704F\},而 SQL Server 2000 和 SQL Server 7 T-SQL 偵錯引擎的 GUID 是 \{5AF6F83C-B555-11D1-8418-00C04FA302A1\}。所以上述呼叫應該分別變更為 dbgeng(0) = trans.Engines.Item("{1202F5B4-3522-4149-BAD8-58B2079D704F}") 和 dbgeng(1) = trans.Engines.Item("{1202F5B4-3522-4149-BAD8-58B2079D704F}")。 |
範例
' 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 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊,請參閱從部分受信任程式碼使用程式庫。