|
Действия ...
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
20.08.2002, 10:29
|
|||
|---|---|---|---|
Delphi и SQL DMO |
|||
|
#18+
Я столкнулся с проблемой импорта библиотеки sqldmo.dll в Delphi 5. После Progect->Import Type Library->Microsoft SQLDMO object Library-> Install, выдается ошибка что классы TDatabase, TTable, TRemateServer is alredy instaled, после изменения имени этих класов Delphi зависает. Я хотел использовать DMO для манипулирование DTS пакетами, а конкретно мне необходимо задавать путь местонахождения выходных файлов. Если я использую вызов dtsrun через xp_commandshell то выходные файлы создаются на сервере, а на сетевой диск не ложаться. Так же хотелось бы управлять доступом через DMO к записям в RecordSet-ах и другим элементам интерфейса. Если соображения? Спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
20.08.2002, 11:57
|
|||
|---|---|---|---|
|
|||
Delphi и SQL DMO |
|||
|
#18+
По моему нужно выполнить такую последовательность действий : Progect->Import Type Library->Microsoft SQLDMO object Library->Create Unit, предварительно поменяв имена классов. Результат ХХХ_TLB.PAS который предоставляет DMO интерфейс. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
20.08.2002, 13:22
|
|||
|---|---|---|---|
Delphi и SQL DMO |
|||
|
#18+
Не проще ли использовать DMO так: dmo:OleVariant; begin dmo:=CreateOleObject('SQLDMO.Application') dmo.Servers['SomeSerbver'].Databases['MyDatabase'].CompatibilityLevel:=80; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.08.2002, 08:23
|
|||
|---|---|---|---|
Delphi и SQL DMO |
|||
|
#18+
При использовании: dmo:=CreateOleObject('SQLDMO.Application'); dmo.SQLServers['MyServer'].Databases['MyDatabse'].CompatibilityLevel:=80; выдается ошибка "Член группы не найден" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.08.2002, 10:04
|
|||
|---|---|---|---|
Delphi и SQL DMO |
|||
|
#18+
Либо такой сервер не найден (или до него не достучаться по имени) или база данных с таким именем не существует. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
21.08.2002, 10:49
|
|||
|---|---|---|---|
Delphi и SQL DMO |
|||
|
#18+
К тому же этот пример чиста чтобы показать идею-концепцию и писан на коленке. Берешь идею и делаешь что тебе надо. А в тупую это код запускать смысла нет, ибо: 1) Если ты обратил внимание, там нету никакой авторизации - а следовательно, никакое административное действие принципиально невозможно, а уже тем более поменять свойства базы. 2) Вот так вот просто взять и поменять уровень совместимости на базе - для этого смелость нужна. А если бы я написал "...DataBases['DB'].Delete", ты бы тоже сходу запустил, не разобравшись? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=58&tablet=1&tid=2119898]: |
0ms |
get settings: |
8ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
165ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
50ms |
get tp. blocked users: |
2ms |
| others: | 226ms |
| total: | 488ms |
| 0 / 0 |
