改变dataset里的值,应该怎样做?
ADODS_PSlab_bl.CommandText :=
'select *,rownum n from xxx '
ADODS_PSlab_bl.Open;
ADODS_PSlab_bl.Recordset.MoveFirst;
while (NOT ADODS_PSlab_bl.Recordset.EOF) do
begin
ShowMessage(ADODS_PSlab_bl.Fields[0].AsString);
if (strtoint(ADODS_PSlab_bl.Fields[6].AsString) mod 8 )= 0 then
begin
ADODS_PSlab_bl.Edit;
ADODS_PSlab_bl.Fields[0].Value := 'just test'; // 提示:缺少用于刷新或更新的基本表信息
ADODS_PSlab_bl.Post;
end;
ADODS_PSlab_bl.Next;
end;
[解决办法]
ADOQuery1.LockType := ltBatchOptimistic;
[解决办法]
弱弱的请楼上朋友看清,ADO 组件里除了TADODataSet、TADOCommand两组件带CommandText属性外,其余的(包括TADOQuery)是没CommandText属性的,所以,楼主用的控件,肯定不是TADOQuery组件。
“提示:缺少用于刷新或更新的基本表信息”
估计是缺少主键。