Выполнение запроса

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
Brusco
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 22.10.2004 (Пт) 3:16
Откуда: Reutov, Russia

Выполнение запроса

Сообщение Brusco » 11.09.2005 (Вс) 3:22

Возможно ли запустить запрос или отчёт на выполнение созданный в Access 2000 из-под VB :?:

VVitafresh
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1641
Зарегистрирован: 12.05.2005 (Чт) 14:44
Откуда: Херсон, UA

Сообщение VVitafresh » 11.09.2005 (Вс) 22:26

Для созданного в Access запроса (хранимой процедуры) без параметров:
Код: Выделить всё

    Dim cnDB As New ADODB.Connection
    Dim adoCmd As New ADODB.Command
    Dim sConn As String
   
    sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db.mdb;User Id=admin;Password=;"
    cnDB.Open sConn
   
    Set adoCmd.ActiveConnection = cnDB
    adoCmd.CommandText = "Proc_Name"
    adoCmd.CommandType = adCmdStoredProc
   
    adoCmd.Execute

    Set adoCmd = Nothing
    Set cnDB = Nothing

Brusco
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 22.10.2004 (Пт) 3:16
Откуда: Reutov, Russia

Сообщение Brusco » 18.09.2005 (Вс) 7:33

Спасибо. Работает даже с параметрами!
:) И ещё вопрос - можно отчёт как-нибудь запустить, тоже созданный в Access?


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

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

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

    TopList  
cron