如果刷新记录啊(45分)

  • 主题发起人 主题发起人 topdelphi
  • 开始时间 开始时间
T

topdelphi

Unregistered / Unconfirmed
GUEST, unregistred user!
我在开发一个网络板的数据库程序,数据库为SQL,如何做到客户同时在多机里打开程序,
在新增或者删除数据的时候,其它机都可以看到,就像刷新一样,我试过在程序创建的时候,
用ADO的动态游标记录集,但还是没有用,如果改成
CLOSE,和OPEN的话,在网络里是好慢的,而且我还要根据每隔一段时间,例如10秒,
如果这样写感觉不好,而且客户要求直接在DBRGID里修改一些数据,
如果正碰巧刷新,用CLOSE,OPEN的话,那些还没有确认的记录,就取消了,而且有时会出错.
我原来想使用动态游标来解决的,但是效果也是一样,
同时打开多个程序,还是看不到记录变化了,请教有什么方法可以解决这个问题啊


procedure TForm1.FormCreate(Sender: TObject);
begin
adoquery1.Close;
adoquery1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:/MONEY.MDB;Persist Security Info=False';
adoquery1.CursorType:=ctDynamic;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from moneysum');
adoquery1.Open;
end;
 
adoquery1.ApplyUpdates(-1);
 
请教你这条如何写在那里,如果要隔着一段时间来刷新数据库,
请问你这条语句应该加在我的语句那里
 
放在 timer 中。
 
你作过聊天室的程序吗?
这个很象一个聊天室啊,随便找一个asp的东西就可以了嘛
 
我在TIME里写,但是语句如下,没有这个APPLYUPDATE的属性,再请孝如何实现这个功能啊,
还有楼上的,我想知道更好简单的方法来实现这个功能,因为我没有时候了,
可以比个例子我吗,我的分全比你了.
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if timer1.Interval =1000 then
begin
adoquery1.ApplyUpdates(-1);
end;
end;
 
后退
顶部