Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как работать с АДО напрямую не через компоненты

Term © (2006-10-05 10:40:00)
сделал так

var ds:_Recordset; AdoConection, cmd:OleVariant; ...... AdoConection:=CreateOleObject('ADODB.Connection'); AdoConection.ConnectionTimeOut:=3; AdoConection.ConnectionString:=ConnectStr; ...... AdoConection.Open; //создание объекта Command cmd:=CreateOleObject('ADODB.Command'); Cmd.ActiveConnection:=AdoConection; Cmd.CommandTimeOut:=200; cmd.CommandText:=zapros; cmd.Execute();
вот так вроде отрабатывает;

но как получить рекордсет

ds:=cmd.Execute();не компилица...

Zz_ (2006-10-05 16:18:00) [1]
http://www.sql.ru/forum/actualthread.aspx?tid=131539#1046521

ЮЮ (2006-10-05 12:09:00) [2]
Ну если использовать религия не позволяет, то посмотреть код и описание в help
TADOConnection.Execute что не дает?

Term (2006-10-05 11:59:00) [3]
если кто делал таким образом дайти примерчик вызова метода, Execute

Term (2006-10-05 11:46:00) [4]
в параметрах объекту Command что передавать?

Term (2006-10-05 11:23:00) [5]
ок спасибо попробую

sniknik (2006-10-05 11:12:00) [6]
и кстати, вместо
var
....AdoConection ....:OleVariant;
....
AdoConection:=CreateOleObject('ADODB.Connection');
подключи модуль ADOInt и пиши

var
....
AdoConection: _Connection;
....
AdoConection:= CoConnection.Create;
или (что мне более понятно ;о))
AdoConection:= CreateComObject(CLASS_Connection) as _Connection;
и т.д. все остальное также.

нагляднее будет, все методы/... видны, в отличие от вариантных типов.

Term (2006-10-05 11:11:00) [7]
нашёл я это...

а в делфях это как будет выглядеть...

sniknik (2006-10-05 10:59:00) [8]
оттуда
command.Execute RecordsAffected, Parameters, Options

Term (2006-10-05 10:58:00) [9]
сделал так
var ds:_Recordset;
потомучто прочитал как работает дельфовый компонент TADOCommand, там он именно такой рекордсет возвращает

> >var ds: TDataSet;

так тоже матюкаеца... несовметимость типов TDataSet и Variant

sniknik (2006-10-05 10:56:00) [10]
в поставке msofice есть файл ADO210.CHM, это хелп с примерами по обьектам...
если офис стоит то файл скорее всего обнаружится прямо у тебя на компе.

MsGuns (2006-10-05 10:45:00) [11]
..вдогонку:

перед

>ds:=cmd.Execute();
надо еще

ds := TDataSet.Create(nil);
а после

ds.Free;

MsGuns (2006-10-05 10:44:00) [12]
>var ds: TDataSet;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »