СРОЧНО!!! Вопрос по базам данных!

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
deepslam
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 286
Зарегистрирован: 19.08.2002 (Пн) 2:25
Откуда: Russia

СРОЧНО!!! Вопрос по базам данных!

Сообщение deepslam » 22.01.2004 (Чт) 14:11

Люди подскажите пожалуйста как подключиться к обыкновенной базе данных Access (не ODBC) так как это делает control data.
Иными словами как динамически создать объект Data из кода?Я идиот! Убейте меня, кто-нибудь!

Kostyan
Постоялец
Постоялец
 
Сообщения: 439
Зарегистрирован: 20.09.2002 (Пт) 4:14
Откуда: Россия, Уссурийск

Сообщение Kostyan » 22.01.2004 (Чт) 14:47

Public DB as Database, RS As Recordset

Set DB = OpenDatabase ("Путь\Имя базы.mdb")
Set RS = DB.OpenRecordset ("SQL-запрос")
.................
RS.CLose
DB.Close

Это через DAO x.xx Object Library
Можно через ADO

deepslam
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 286
Зарегистрирован: 19.08.2002 (Пн) 2:25
Откуда: Russia

Сообщение deepslam » 22.01.2004 (Чт) 16:12

Спасибо Kostyan!!!
А можешь еще написать как через ADO?
Там по моему проввайдера указываешь да путь к базе
потом
rs.open SQL,conn
Так?
Это тока для ODBC баз?

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 22.01.2004 (Чт) 16:48

Почти так:

Set cn = New Connection
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;Persist Security Info=False"
cn.Open

Set rs = New Recordset
rs.Open "Select * from t1", cn, adOpenKeyset, adLockReadOnly

По поводу того, где какие флаги ставить при открытии и что использовать в качестве CursorLocation для Connection (adUseServer или adUseClient), смотри МСДН


Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 1

    TopList