powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft SQL Server [игнор отключен] [закрыт для гостей] / VB объекты и TSQL
11 сообщений из 11, страница 1 из 1
VB объекты и TSQL
    #32007871
Slava
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Hi everyone.
Очень интересует информация о том как можно регистрировать VB объекты на SQL сервере.
Буду презнателен изложению Вашего опыта и ссылкам.
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007884
Олег Яговкин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может быть это подойдет:
EM - Console - Add/Remove Shnap-in.. - Вкладка StandAlone - Кнопка ADD и.т.д Если речь идет о регистрации ActiveX-компонента. При этом компонент будет зарегистрирован на сервере и отражен в EM.
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007891
Фотография Дед Маздай
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если речь идет об использовании VB-объектов в скрипте на T-SQL, то для этого существуют хранимые процедуры sp_OA*. Пусть, например, наш объект будет делать удаленный shutdown тачки. Создаем VB-проект по имени MyTest в виде ActiveX dll, состоящий из одного модуля класса Shutdn:

Private Declare Function InitiateSystemShutdown Lib "advapi32" _
Alias "InitiateSystemShutdownA" _
(ByVal lpMachineName As String, ByVal lpMessage As String, _
ByVal dwTimeoutInSecsToDisplayMsg As Long, _
ByVal bForceAppsClosed As Long, ByVal bRebootAfterShutdown As Long) As Long

Public Sub Shutdown(strCompName)
InitiateSystemShutdown "\" & strCompName, "Это песец!", 10, False, True
End Sub

Говорим Make dll, регистрируем ее на компе, где стоит SQL Server, после чего можно написать следующий скрипт:

declare @ObjToken int, @hres int
exec sp_OACreate 'MyTest.Shutdn', @ObjToken output
exec sp_OAMethod @ObjToken, 'Shutdown', @hres output, 'w2000wks_1'
exec sp_OADestroy @ObjToken
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007909
Фотография Chicago
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что-то я у себя в MMC 1.2 Add/Remove Snap-in не нашел (не исключаю, что сам дурак). Кроме того, судя по названию, вся эта беда предназаначена для регистрации именно Snap-in'ов для Microsoft Management Console, но не для любых ActiveX компонентов. (Пример такого snap-in - сам EM, и пишутся они не на Бейсике, а на VC++ в сочетании с ATL).

Компоненты же, написанные на VB являются self-registering. Это значит, что если речь идет об ActiveX DLL, то регистрация проводится утилитой regsvr32.exe (см. папку System32 на сервере):

regsvr32 <путь к DLL>

Если нужно зарегистрировать ActiveX EXE, то просто запустите его с ключом -RegServer:

my_active_server.exe -RegServer

Всего хорошего!
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007912
Slava
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2 Олег
У меня в Console только Exit
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007918
Олег Яговкин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
To Chicago:А я и сам долго искал. Когда изучал, начал проходить раздел - естественно надо отработать практически.
To Chicago & Slava: Верхнее меню - Console - должно быть две строки Options и Eixit. Нажимаем на Options, появл. окно в кот. две галочки, нижняя скорей всего не поставлена.Устанавливаете и Refresh или Restart EM. В меню Console должны появиться доп. опции.
Насчет компонента (опять же при изучении) в книге примеры были на VB. Создается ActiveX Control. Цитирую "созданный откомпилированный и зарегистрированный компонент подключим к к консоли администратора(далее см. начало ответа)". Что я и делал подключив какойто (не помню) стандартный компонент. Давно это было и практически пока не нужно.
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007919
Slava
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я точно говорю только Exit
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007920
Glory
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Slava
Ищите файл SQL Server Enterprize Manger.MSC, по умолчанию он находиться в C:\Programm Files\Microsoft SQL Server\80\Binn\Tools. Щелкаете на нем правой кнопки мыши и выбирате Author. Все
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007921
Glory
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Конечно же
SQL Server Enterprise Manager.MSC
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007925
Фотография Chicago
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Glory
Ага, нашел! У меня Internet Service Manager Snap-in оказался в author mode.

2Олег Яговкин
Ну воспользовался я этой волшебной кнопкой. Получился у меня прикольный Enterprise Manager с выбранным ActiveX Control во весь экран. А какое это имеет отношение к регистрации компонентов, я что-то не понял. В списке выбора были УЖЕ ЗАРЕГИСТРИРОВАННЫЕ в реестре Windows компоненты. В общем (см. мой предыдущий постинг) эта функция действительно предназначена для подключения новых snap-in к Microsoft Management Console, но не для регистрации любых других компонентов ActiveX.
...
Рейтинг: 0 / 0
VB объекты и TSQL
    #32007928
Олег Яговкин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
To Chicago:
Я тут отходил и не успел посоветовать Slava установить режим author mode, да и сервер у него наверное 2000 раз меню Console не показывает Options. С 2000 я еще не работал. Поэтому Glory наверное правильно подсказал.
А насчет зарегистрировать ActiveX, дак говорю же, надобности не было поэтому даже не знаю как. Но видимо фраза "создать, откомпилировать и зарегистрировать" означает зарегистрировать в реестре, и далее: - подкл. к консоли администратора. Т.к. VB расшифровывается наверняка как Visual Basik, а примерчик вспомнил как раз c применением данного языка, то и посоветовал Slava. А вообще то сыр-бор неизвестно о чем, Slava не назвал ни ActiveX DLL ни ActiveX EXE.
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft SQL Server [игнор отключен] [закрыт для гостей] / VB объекты и TSQL
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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