Вниз
Скачать: CL | DM;

sp_help доступ к данным второго recordset   Найти похожие ветки 

← →
Анна   (2010-04-14 11:48) [0]

Нужно получить данные о размерности полей таблицы.
делаю так:

procedure TForm1.Button1Click(Sender: TObject);
var
TempDataSet: TDataSet;
begin
ADODataSet1.CommandText:="exec sp_help ves";
ADODataSet1.Open;
ADODataSet1.First;
TempDataSet:=ADODataSet1;
showmessage(TempDataSet.fields[0].asstring);
TempDataSet.Free;
TempDataSet := ADODataSet1.NextRecordSet;
showmessage(TempDataSet.fields[1].asstring);
end;

На выделенной строчке вываливается ошибка: Not enough actual parameters.
Подскажите пожалуйста какой параметр нужно написать?


← →
Игорь Шевченко ©   (2010-04-14 11:51) [1]


> Подскажите пожалуйста какой параметр нужно написать?


actual


← →
Anatoly Podgoretsky ©   (2010-04-14 12:13) [2]

> Анна  (14.04.2010 11:48:00)  [0]

В справке function NextRecordset(var RecordsAffected: Integer): _Recordset;


← →
Вариант   (2010-04-14 12:30) [3]


>  sp_help доступ к данным второго recordset



> TempDataSet:=ADODataSet1;
> .....
> TempDataSet.Free;

После этой строки мы попращались с ADODataSet1, остальные обращения к нему видятся бессмысленными.

Зачем делается TempDataSet:=ADODataSet1?
Потом зачем Free?
Правильней задать вопрос так - а что вы хотели сделать и что получить?
Выполнить запрос и получить результат в виде нескольких рекордсетов? Для этого надо было объявить не TempDataSet: TDataSet, а TempRecordSet: _RecordSet;  Посмотрите пример в help по дельфи.


← →
Анна   (2010-04-14 12:32) [4]


> Anatoly Podgoretsky ©   (14.04.10 12:13) [2]

Справку я смотрела и делала так:
ADODataSet1.NextRecordSet(2);
Ругалась при компиляции....
Сейчас поставила
var
nn:integer;
nn:=2;
И обращаюсь к функции: ADODataSet1.NextRecordSet(nn);
Компиляция проходит, Но к следующему набору данных не переходит...
Что-то я не так пишу.


← →
Анна   (2010-04-14 12:34) [5]


> Вариант   (14.04.10 12:30) [3]

Все спасибо большое! Вопрос снят.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.047 c
15-1267270379
Kerk
2010-02-27 14:32
2010.08.27
Про работу


15-1268292135
boriskb
2010-03-11 10:22
2010.08.27
ACADEMIA


2-1268839389
Knob
2010-03-17 18:23
2010.08.27
Командная строка


4-1229333584
Nucer
2008-12-15 12:33
2010.08.27
GetTCPTable


15-1274472622
RWolf
2010-05-22 00:10
2010.08.27
Induc v2.0




   Наверх