powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Как построить список доступных SQL серверов
3 сообщений из 3, страница 1 из 1
Как построить список доступных SQL серверов
    #32624152
elephant_work
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Мне нужно получить список доступных SQL серверов.

Раньше в ВБ 6 это делалось так

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Sub Form_Load()
  Dim i As Integer
  Set oSQLServerDMOApp = New SQLDMO.Application
  
  Dim namX As NameList
  Set namX = oSQLServerDMOApp.ListAvailableSQLServers
  For i =  1  To namX.Count
    txtServer.AddItem namX.Item(i)
  Next
  txtServer.ListIndex =  0 
End Sub

В .NET попробовал перенести код и получил дулю с маком в виде такого сообщения:
oSQLServerDMOApp.ListAvailableSQLServers Run-time exception thrown : System.InvalidCastException - QueryInterface for interface SQLDMO.NameList failed.

в строке Set namX = oSQLServerDMOApp.ListAvailableSQLServers

Может кто знает что нужно делать? вообще для работы со старыми COM объектами надо еще что то дописывать или прописывать?
...
Рейтинг: 0 / 0
Как построить список доступных SQL серверов
    #32624376
Sa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почитайте на форуме C#
http://www.sql.ru/forum/actualtopics.aspx?search=sqldmo&submit=%CD%E0%E9%F2%E8&bid=34
Если чтото заинтересует постите сюда

Код: plaintext
 uid  =  S a
...
Рейтинг: 0 / 0
Как построить список доступных SQL серверов
    #32624535
Фотография Артист
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
/topic/94339#690940
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Как построить список доступных SQL серверов
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]