![]() |
|
Модераторы: MetalFan |
![]()
|
|
| Roman1 |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 50 Регистрация: 12.10.2007 Репутация: нет Всего: нет |
Всем доброго времени суток. Прошу помочь с разрешением следующей проблемы. Написана программа, через которую
производится работа с БД МS SQL Server - заполнение и выборка. Использовал самые простые компоненты и события: ADOConnection, DBGrid, ADOQuery и т.п. На компьютере, где производится сборка, программа работает отлично как с локальным так и с сетевым MS SQL Server. Среда программирования - Delphi 2007. При переносе этой программы на другие компьютеры нормальная работа заканчивается. Становится невозможным записать данные в БД, а выборка работает хорошо. При этом дело не в правах доступа, так как с одним и тем же сервером (с установками по умолчанию, без пароля и т.п.) с компьютера разработчика, по сети, все идет нормально, а с другого, где этот сервер локальный, нет. По ходу написания программы обнаружилось еще одно. Здесь на форуме скачал код для получения списка серверов в сети: procedure TLoginForm.btnServerListRefreshClick(Sender: TObject); var dmo: Variant; i: Integer; begin try Screen.Cursor:= crHourGlass; dmo:=CreateOleObject('SQLDMO.Application'); for i:=0 to dmo.ListAvailableSQLServers.Count do if (Length(trim(dmo.ListAvailableSQLServers.Item(i))) > 0) and (CompareText(AnsiUpperCase(dmo.ListAvailableSQLServers.Item(i)),'(LOCAL)')<>0) then cbbServerName.Items.Add(AnsiUpperCase(dmo.ListAvailableSQLServers.Item(i))); Screen.Cursor:= crDefault; except on e: Exception do begin Application.MessageBox(PChar('Нет доступа к SQL-серверу. Обратитесь к администратору.'),'Обновление списка серверов',48); ErrLOG('TLoginForm.btnServerListRefreshClick',e.Message,'','',Sender); Screen.Cursor:= crDefault; end; end; end; Так вот, на компьютере разработчика все работает нормально, а на другом ПК - нет. Установил на другой ПК среду разработки. Оказалось, сбой идет на строке dmo:=CreateOleObject('SQLDMO.Application'); Подскажите пожалуйста, что нужно включить, выключить, добавить и т.п. чтобы все заработало? Спасибо. |
|||
|
||||
| Данкинг |
|
|||
![]() Yersinia pestis ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 5 Всего: 130 |
Значит, этот "SQLDMO.Application" нужно установить на другой комп. Гугл по "SQLDMO.Application" подскажет, например, вот.
Ошибка-то какая? -------------------- There's nothing left but silent epitaphs. |
|||
|
||||
| Roman1 |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 50 Регистрация: 12.10.2007 Репутация: нет Всего: нет |
По поводу невозможности записи в БД прошу меня извинить. Вопрос оказался в другом. После установки среды
программирования на другой ПК на отладке выяснилось, что до записи в БД программа просто-напросто не доходит по не связанным с ADO причинам. А по второму вопросу спасибо за подсказку, сейчас буду заниматься поиском. Всем удачи, вопрос закрыт. |
|||
|
||||
![]()
|
| Правила форума "Delphi: ActiveX/СОМ/CORBA" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |