关于插入记录问题??????请教??
点插入按纽
procedure TForm1.Button1Click(Sender: TObject);
begin
adotable2.Open;
adotable2.InsertRecord([nil,dbedit3.text,datetimepicker3.date,edit2.Text]);
DBEdit3Change(Sender);
end;
procedure TForm1.DBEdit3Change(Sender: TObject);
begin
//////////////////////设备保养///////////////////////////
adoquery2.Close;
adoquery2.SQL.Clear;
adoquery2.ConnectionString:=('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=zysb.mdb;Persist Security Info=False');
adoquery2.sql.add(' select date as 日期,bynr as 保养内容');
adoquery2.sql.add(' from byjl');
adoquery2.sql.add(' where byjl.sbid='''+dbedit3.text+''' order by date');
adoquery2.open;
datasource3.DataSet:=adoquery2;
adoquery2.open;
end;
运行过后,结果不能马上显示,好象有延时,要多刷新几次才可以.
请各位专家帮忙给我看看哪里出错了.
问题点数:20、回复次数:3Top
1 楼cangwu_lee(橙子)回复于 2006-12-01 22:58:27 得分 0
这样写法不习惯。ding
不习惯:不是使用一个公共的连接对象、 而且Change 事件里这样的写法。Top
2 楼cloudy_dy()回复于 2006-12-02 10:52:58 得分 0
具体点可以吗?谢谢Top
3 楼cloudy_dy()回复于 2006-12-03 14:45:06 得分 0
应该怎么写,急切等待中Top





