ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADO изменить текст хранимого запроса
12 сообщений из 12, страница 1 из 1
ADO изменить текст хранимого запроса
    #33777847
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Алексей К.2
Участник
напомните пожалуйста как в ADO программно поменять текст уже созданного запроса?
...
Рейтинг: 0 / 0
07.06.2006, 14:32
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33777865
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Алексей К.2
Участник
База - Access.
...
Рейтинг: 0 / 0
07.06.2006, 14:37
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33777876
TIKO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TIKO
Гость
Dim s As New ADODB.Recordset
Dim strSQL as string

strSQL="Новый запрос"

If s.State = adStateOpen Then s.Close

s.Open strSQL, s.ActiveConnection, adOpenStatic
...
Рейтинг: 0 / 0
07.06.2006, 14:39
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33777917
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Алексей К.2
Участник
мне надо поменять текст запроса - который уже есть в ацесе, т.е. его содержимое select ...., а не его имя.
...
Рейтинг: 0 / 0
07.06.2006, 14:46
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33777953
TIKO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TIKO
Гость
Алексей К.2мне надо поменять текст запроса - который уже есть в ацесе, т.е. его содержимое select ...., а не его имя.

может я не так понял но причем тут имя
пусть будет так

Dim s As New ADODB.Recordset
Dim strSQL as string

strSQL="SELECT DISTINCT(NAME) AS NAME_, ADRESS FROM TABLE WHERE NAME LIKE 'BILL' "

If s.State = adStateOpen Then s.Close

s.Open strSQL, s.ActiveConnection, adOpenStatic
где именно храниться в ацессе запрос?
...
Рейтинг: 0 / 0
07.06.2006, 14:56
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778018
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Алексей К.2
Участник
:)
В ацесе есть такая закладка окна базы данных "Запрос". Там один раз написал текст запроса, сохранил его, и можешь его потом многократно использовать.
В твоем варианте просто программно передается текст запроса обьекту рекордсет. у меня тект запроса занимает в ворде 4 страницы :)
...
Рейтинг: 0 / 0
07.06.2006, 15:12
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778035
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bubucha
Участник
автору меня тект запроса занимает в ворде 4 страницы
Надо просто уменьшить размер шрифта в ворде :-) Не очень понятно, зачем сохранять запрос, если потом его все равно менять, не проще сразу собрать нужную sql строчку?
...
Рейтинг: 0 / 0
07.06.2006, 15:18
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778049
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Алексей К.2
Участник
да его собрать в коде геморойно - много кода будет, а мне в нем просто надо будет имя таблички менять периодически, вот я и хотел через replace менять, и выполнять rs=cmd.execute
...
Рейтинг: 0 / 0
07.06.2006, 15:23
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778086
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bubucha
Участник
Если в самом access, то можно так:
Код: plaintext
1.
2.
3.
4.
5.
6.
Dim qry As QueryDef
Dim strSQL As String
Set qry = CurrentDb.QueryDefs("Запрос")
strSQL = qry.SQL
strSQL = Replace(strSQL, "ТабличкаЧтоБыло", "ТабличкаЧтоСтало")
qry.SQL = strSQL
...
Рейтинг: 0 / 0
07.06.2006, 15:35
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778124
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
ADOX + поиск по форуму
...
Рейтинг: 0 / 0
07.06.2006, 15:44
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778127
Алексей К.2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Алексей К.2
Участник
авторЕсли в самом access, то можно так:....
Это понятно, у меня весь клиент на VB +ADO сидит, применять createobject("access.aplication") с подключением библ аца - не есть гуд.

Ну если нельзя, то придеться гемор разводить: создам поле мемо, в нем сохраню текст запроса, в коде получу эту запись с текстом запроса, replace, execute sql_txt.
...
Рейтинг: 0 / 0
07.06.2006, 15:45
| Ответить | Цитировать | Написать  
ADO изменить текст хранимого запроса
    #33778170
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bubucha
Участник
авторсоздам поле мемо
Зачем поле? А в переменной если?
...
Рейтинг: 0 / 0
07.06.2006, 15:58
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADO изменить текст хранимого запроса
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=33778127&tid=2165750]:
 0ms
get settings:
 11ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 216ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 69ms
get tp. blocked users:
 2ms
others: 246ms
total:  586ms
созд. / загр.: 586ms
x
x
Закрыть


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