如何利用recordset生成临时表？？？为什么会错？？？ ( 积分: 100 )

我想利用recordset临时生成某些字段,再与dbgrid相连
以下代码,属于实验,但没有效果,不知道为什么??
procedure TForm2.Button1Click(Sender: TObject);
var
rs:Variant;
begin
rs:=CreateOleObject('ADODB.RECORDSET');
rs.fields.append('fld',$00000081,5,$00000004);
rs.cursortype:=$00000001;
rs.locktype:=$00000003;
rs.open;
while not rs.eof do
begin
rs.fields('fld'):='abcde';
rs.update;
rs.movefirst;
edit1.text:=rs.fields['fld'];
rs.movenext;
//rs.close;
end;
rs.close;
end;

end.

望高手帮忙!!

我想利用recordset临时生成某些字段,再与dbgrid相连
以下代码,属于实验,但没有效果,不知道为什么??
procedure TForm2.Button1Click(Sender: TObject);
var
rs:Variant;
begin
rs:=CreateOleObject('ADODB.RECORDSET');
rs.fields.append('fld',$00000081,5,$00000004);
rs.cursortype:=$00000001;
rs.locktype:=$00000003;
rs.open;
while not rs.eof do
begin
rs.fields('fld'):='abcde';
rs.update;
rs.movefirst;
edit1.text:=rs.fields['fld'];
rs.movenext;
//rs.close;
end;
rs.close;
end;

end.

望高手帮忙!!

这样一定是不行的，你想做到什么效果，达到什么要求?
如果你只想在前端更改这些字段值，但不存到数据库，
你可以用ADODataSet，select * from table，ltBatch方式，
如果你只需要临时在本地用一下，也可以CreateDataSet方法创建，但同样不存到后端，
还有...
问题，是你想怎样?

我想先创建有学号　姓名等字段的表，在将表的内容和DBGrid相连显示出，主要为了实现交叉表的功能

To:WilliamGui
我想先利用RecordSet建个有若干字段的表，再将相关数值插入这个表中，表的内容只在查询时使用，利用得到的表，将表与DBGrid相连