Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Выполнение запроса / 8 сообщений из 8, страница 1 из 1
16.01.2003, 11:33
    #32091658
multiwest
multiwest
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
Каким образом из VB можно выполнять запросы хранящиеся в БД Access.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 11:39
    #32091667
SCS
SCS
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
DAO (JET),
RDO (ODBC),
ADO (OLEDB JET, OLEDB ODBC)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 11:43
    #32091673
multiwest
multiwest
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
DAO Jet
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 11:58
    #32091694
SCS
SCS
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
Код: plaintext
1.
myDB.QueryDefs( "qdName" ).OpenRecordSet()' новый Recordset
myDB.QueryDefs("qdName").Execute() ' - action query
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 12:39
    #32091742
multiwest
multiwest
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
Если можно более подробнее.
Заранее благодарен.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 13:47
    #32091826
SCS
SCS
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
в access или в VB ты можешь сформировать запрос и сохранить его в БД под к.л. именем. запрос типа SELECT - возвращает Recordset, типа INSET, UPDATE, DELETE - action запрос.

все сохраненные в БД запросы доступны через коллекцию QueryDefs для выполнения/изменения/удаления/добавления
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 13:53
    #32091831
multiwest
multiwest
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
SCS Благодарю за помощь.
я немного изменил код

Dim myDB As Database, newWs As Workspace
Dim sql1 As String
Set newWs = DBEngine.Workspaces(0)
Set myDB = newWs.OpenDatabase("xxx.mdb")
sql1 =" запрос"
myDB.Execute (sql1)

Работает отлично.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.01.2003, 14:18
    #32091852
SCS
SCS
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение запроса
всегда есть выбор:
если логика жесткая, то ее надо зашивать в код

пользоваться сохраненными запросами - это возможность "управления логикой" через БД
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Выполнение запроса / 8 сообщений из 8, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 136ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2171481]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 40ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 39ms
get tp. blocked users:
 2ms
others: 12ms
total:  136ms
x
x
Закрыть


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