Transports - интерфейс
Обновлен: Ноябрь 2007
Коллекция объектов Transport.
Пространство имен: EnvDTE80
Сборка: EnvDTE80 (в EnvDTE80.dll)
Синтаксис
'Декларация
<GuidAttribute("EA47C3D9-FD41-4402-BDC6-7F07D0C8E3FC")> _
Public Interface Transports _
Implements IEnumerable
'Применение
Dim instance As Transports
[GuidAttribute("EA47C3D9-FD41-4402-BDC6-7F07D0C8E3FC")]
public interface Transports : IEnumerable
[GuidAttribute(L"EA47C3D9-FD41-4402-BDC6-7F07D0C8E3FC")]
public interface class Transports : IEnumerable
public interface Transports extends IEnumerable
Заметки
.gif "Примечание") Примечание. |
|---|
При записи макроса и его подключении к процессу отладки с использованием отладчика T-SQL этот макрос возвращает две разные ссылки на одно имя отладчика. Например, dbgeng(0) = transprt.Engines.Item("T-SQL") и dbgeng(1) = transprt.Engines.Item("T-SQL"). Это происходит потому, что в Visual Studio существуют два базовых отладчика T-SQL: один для отладчика в SQL Server 2005, а другой для отладчика T-SQL для SQL Server 2000 и SQL Server 7. На них обоих автоматически создается ссылка при присоединении к процессу отладки через пользовательский интерфейс, но в коде автоматизации на них необходимо ссылаться через их уникальный идентификатор GUID. GUID для отладчика в SQL Server 2005 — {1202F5B4-3522-4149-BAD8-58B2079D704F}, а GUID для отладчика T-SQL в SQL Server 2000 и SQL Server 7 — {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 ShowTransports()
Dim dbg As EnvDTE80.Debugger2
dbg = DTE.Debugger
Dim strTransportList As String
Dim transport As EnvDTE80.Transport
For Each transport In dbg.Transports
strTransportList = strTransportList + transport.Name & ", _
" & transport.ID & VbCr
Next
MsgBox(strTransportList)
End Sub
End Module