Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Как на кнопку меню access повесить вызов запроса, выполняемого SQL сервером?  [new]
lapa
Member

Откуда:
Сообщений: 18
Народ! Помогите пожалуйста, необходимо решить задачу. Из меню Access
необходимо вызвать запрос, который обрабатывается SQL сервером.Подскажите пжлст как это можно сделать. Заранее спсб!!!
12 янв 04, 11:26    [487399]     Ответить | Цитировать Сообщить модератору
 Re: Как на кнопку меню access повесить вызов запроса, выполняемого SQL сервером?  [new]
Лох Позорный
Member

Откуда:
Сообщений: 9898
Очень просто
При нажатии на кнопку пользователь встает на четвереньки, начинает ползать вокруг стола и говорить: "Я Луноход-1. Я Луноход-1. Вызываю запрос на SQL Server'е"

Ключевые слова для поиска - ADO, Command, Execute
Хелп в помощь.
12 янв 04, 11:30    [487406]     Ответить | Цитировать Сообщить модератору
 Re: Как на кнопку меню access повесить вызов запроса, выполняемого SQL сервером?  [new]
АлексейК
Member

Откуда: http://www.msdatabase.ru , Moscow
Сообщений: 7683
по нажатию кнопки в меню может быть
1 вызвана загрузка формы

в этом случае в событии загрузка вставляешь код


2 может быть вызвана публичная функция общего модуля
в этом случае в эту функцию вставляешь код

а какой код - см пост Лоха
12 янв 04, 13:20    [487615]     Ответить | Цитировать Сообщить модератору
 Re: Как на кнопку меню access повесить вызов запроса, выполняемого SQL сервером?  [new]
vma_mnt
Member

Откуда: Новокузнецк
Сообщений: 602
Private Sub Кнопка_Click()
Dim Cn As New ADODB.Connection

Set Cn = CurrentProject.Connection

Cn.Execute "Текст запроса"

Set Cn = Nothing

End Sub
12 янв 04, 14:19    [487793]     Ответить | Цитировать Сообщить модератору
 Re: Как на кнопку меню access повесить вызов запроса, выполняемого SQL сервером?  [new]
АлексейК
Member

Откуда: http://www.msdatabase.ru , Moscow
Сообщений: 7683
кстати адо - соединение объявлять не обязательно
такого кода достаточно

CurrentProject.Connection.Execute "Текст запроса"
12 янв 04, 17:48    [488299]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить