ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос к серверу
22 сообщений из 22, страница 1 из 1
Запрос к серверу
    #32284939
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
Код: plaintext
1.
2.
3.
DIM i integer
i= 1 
CurrentDb.QueryDefs( 1 ).Connect =  "ODBC;DSN=SRV;DATABASE=DB1;LANGUAGE=English;Address=SRVDB,1433 ;AnsiNPW=No"
CurrentDb.QueryDefs( 1 ).SQL =  "exec Pr_1 "  & i


Запускаю на сервере ХП, но она почемуто не запускается. Ошибки ни какие не выдаются. Пробовал запускать через создание запроса к серверу с темеже параметрами ODBC и тойже ХП но с прописанным параметром процедуры, все работает. Где у меня ошибка, уважаемые гуру подскажите
...
Рейтинг: 0 / 0
06.10.2003, 13:17:04
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32284996
IgorM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IgorM
Участник
Попробуй так: CurrentDb.QueryDefs(1).SQL = "call { exec Pr_1 (" & i & ") }"
...
Рейтинг: 0 / 0
06.10.2003, 13:40:40
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285015
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
to IgorM
Нет, все равно не работает
...
Рейтинг: 0 / 0
06.10.2003, 13:48:16
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285052
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Senin Viktor
Участник
А что Profiler пишет в первом случае и во втором?
...
Рейтинг: 0 / 0
06.10.2003, 14:04:25
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285125
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
to Senin Viktor

Посмотрел Prifile, но там вообще не отражается мое соединение. Хотя когда запускаю процедуру используя "запрос к серверу" процедура запускается и в Prifile все отражается. Непонятно, ведь строка подключения к ODBC одна и таже.
...
Рейтинг: 0 / 0
06.10.2003, 14:41:10
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285131
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Полный код приведи да?
Или у тебя действительно CurrentDb.QueryDefs(1) используется?
...
Рейтинг: 0 / 0
06.10.2003, 14:44:15
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285142
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
2 Лох Позорный

да CurrentDb.QueryDefs(1) используется
...
Рейтинг: 0 / 0
06.10.2003, 14:51:57
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285158
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
А зачем оно используется?
Не судьба что-ли временный объект создать?
Код: plaintext
1.
2.
Set qry = CurrentDb.CreateQueryDef( ""," текст запроса ")
qry.Connect = " строка соединения"
qry.Execute dbFailOnError
...
Рейтинг: 0 / 0
06.10.2003, 14:58:31
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285159
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Dim q As QueryDef
Dim i integer

i= 1 
Set q = CurrentDb.CreateQueryDef( 100 )
q.Connect = =  "ODBC;DSN=SRV;DATABASE=DB1;LANGUAGE=English;Address=SRVDB,1433 ;AnsiNPW=No"
q.SQL =  "exec Pr_1 "  & i
q.Close


Так еще пробовал, но тоже ХР не запускается. Какая то ерунда с ODBC что ли
...
Рейтинг: 0 / 0
06.10.2003, 14:58:40
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285172
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
2 Лох Позорный

Код: plaintext
1.
2.
Set qry = CurrentDb.CreateQueryDef( "", " procedure Pr_1  " & i)
qry.Connect = " ODBC;DSN=SRV;DATABASE=DB1;LANGUAGE=English;Address=SRVDB, 1433 ;AnsiNPW=No"
qry.Execute dbFailOnError


Вобщем пишет "Ошибка синтаксиса в предложении PARAMETR"
Может потому что у меня Access97
...
Рейтинг: 0 / 0
06.10.2003, 15:07:22
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285188
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Senin Viktor
Участник
Как предложение: установить последний MDAC 2.8, Jet SP7
...
Рейтинг: 0 / 0
06.10.2003, 15:14:18
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285191
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
%%% мать
Берешь запрос к серверу (который работает) и его текст копируешь в код программы (в CreateQueryDef). Со строкой подключения делаешь то же самое.
...
Рейтинг: 0 / 0
06.10.2003, 15:16:04
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285197
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
2 Лох Позорный
Да говорю же что копирывал!
Причем раз 20 уже

2 Senin Viktor

Попробую сейчас поставить
...
Рейтинг: 0 / 0
06.10.2003, 15:20:53
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285209
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Senin Viktor
Участник
2ЛП

Как знатный телепат могу предположить, ustasw нарвался на многочисленные Fix & Problem с ODBC, которых в разных сервис-паках давят немеряно, от этого их становиться еще больше. Хотя "не верный синтаксиис в параметрах" меня наталкивает на со всем другие мысли по поводу, почему не работает
...
Рейтинг: 0 / 0
06.10.2003, 15:25:02
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285212
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
"exec Pr_1 " & i
"procedure Pr_1 " & i

Плохо копировал.
...
Рейтинг: 0 / 0
06.10.2003, 15:26:57
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285221
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
2 Лох Позорный
Дело в том что когда пишу
Код: plaintext
 "exec Pr_1 "  & i


Выдается ошибка
Ошибочная инструкция SQL; предполагалось 'DELETE', 'INSERT', 'PROCEDURE', 'SELECT' или 'UPDATE'.
...
Рейтинг: 0 / 0
06.10.2003, 15:32:36
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285241
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Senin Viktor
Участник
Как вариант: плюнуть на ДАО с QueryDefs - и юзать ADO с Command
...
Рейтинг: 0 / 0
06.10.2003, 15:39:10
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285252
IgorM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IgorM
Участник
Прошу прощения, поторопился, надо так:

Dim qry As QueryDef
Set qry = CurrentDb.CreateQueryDef("")
qry.Connect = "ODBC;DSN=SRV;DATABASE=DB1;LANGUAGE=English;Address=SRVDB,1433;AnsiNPW=No"
qry.ReturnsRecords = False
qry.SQL = "{call Pr_1(" & i & ")}"
qry.Execute
...
Рейтинг: 0 / 0
06.10.2003, 15:42:52
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285259
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
может поможет
qry.Type = dbQSQLPassThrough
...
Рейтинг: 0 / 0
06.10.2003, 15:46:19
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285271
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
Уже при компиляции ругается на ).Type :

Код: plaintext
Невозможно присвоение свойству, доступному только для чтения
...
Рейтинг: 0 / 0
06.10.2003, 15:50:40
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32285298
ustasw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ustasw
Гость
2 IgorM

Заработало!!!

Спасибо всем!
IgorM особенно
...
Рейтинг: 0 / 0
06.10.2003, 16:02:54
| Ответить | Цитировать | Написать  
Запрос к серверу
    #32685311
RodionD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RodionD
Гость
ustasw2 IgorM

Заработало!!!

IgorM особенно
А поделиться с народом способом?
...
Рейтинг: 0 / 0
08.09.2004, 13:46:03
| Ответить | Цитировать | Написать  
22 сообщений из 22, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос к серверу
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1671915]:
 0ms
get settings:
 7ms
get forum list:
 18ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 65ms
get topic data:
 11ms
get first new msg:
 6ms
get forum data:
 3ms
get page messages:
 72ms
get tp. blocked users:
 1ms
others: 203ms
total:  392ms
созд. / загр.: 392ms
x
x
Закрыть


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