Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.09.05;
Скачать: [xml.tar.bz2];

Вниз

Параметры процедуры AddNew для ADORecordset   Найти похожие ветки 

 
Dr. Andrey   (2004-08-10 13:33) [0]

Есть два набора данных (ADORecordset) нужно пройти по первому,
проверить значения некоторых полей и если есть отклонения от условий - добавить запись во второй.  


var rst1, rst2: _Recordset;
...

while not rst1.Eof do begin
 if rst1.Fields[0].Value < "условие"then   rst2.AddNew "CodSotr",rst1.Fields[0].Value);
 rst1.MoveNext;
end;


В случае с одним полем все нормально, если же нужно присвоить значения нескольким полям rst2 - проблема (в смысле для меня).

В справке по ADO:

FieldList Optional. A single name, or an array of names or ordinal positions of the fields in the new record.
Values Optional. A single value, or an array of values for the fields in the new record.
If Fieldlist is an array, Values must also be an array with the same number of members; otherwise, an error occurs.
The order of field names must match the order of field values in each array.

Всё это понятно, но как передать эти массивы имен и значений?
Помогите пожайлуста с синтаксисом.

Вариант для VB: rst2.AddNew;                не подходит.
               rst2.Fields[0].value:= "X";
               rst2.Fields[1].value:= "Y";
               rst2.Fields[2].value:= "Z";
               rst2.Update;



 
Соловьев ©   (2004-08-10 13:37) [1]

А что методы Insert, Edit, Post отменили?
может тебе надо VarArrayOf?


 
Dr. Andrey   (2004-08-10 13:52) [2]

<Соловьев>
А, что у объекта типа _Recordset есть метод Insert?


 
Dr. Andrey   (2004-08-10 14:10) [3]

Знатоки ADO и DELPHI?!!!


 
Соловьев ©   (2004-08-10 14:24) [4]

не кричи - обед. Мастаки кушают:)


 
ZrenBy ©   (2004-08-10 14:24) [5]

RS.AddNew("D_UID",sUID);
RS.Fields["D_RV"].Value  := vRV;
RS.Fields["D_YID"].Value := sYID;
RS.Fields["D_DAT"].Value := nDAT;



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

Форум: "Базы";
Текущий архив: 2004.09.05;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.035 c
6-1088668648
Prosto Imya
2004-07-01 11:57
2004.09.05
Как отправить файл без сервера


6-1088704608
Vladimir_v
2004-07-01 21:56
2004.09.05
Socket Error # 10054


1-1092739496
CAMCOH
2004-08-17 14:44
2004.09.05
Canvas. Помогите разобратся.


6-1088787414
Я
2004-07-02 20:56
2004.09.05
Многопоточность закачки файлов по soap...синхронизация


1-1093152385
Fktrc
2004-08-22 09:26
2004.09.05
Пауза в TThread





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский