快烦死了!用ADO连接ACCESS数据库,有时报“未指定的错误”
它不是一运行就报,而是过几十下或100下报,根本找不到头绪错在哪,我程序就是定时(每分钟)更新一条数据,数据格式类型完全一样,只是数字有变化(但也在长度允许范围内),已经好几周了解决不了,求大大们给看看:adocmd:=TADOCommand.Create(nil);
adocmd.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb;Persist Security Info=False';
...
//组装SQL存数据库
if c1.Code<>'' then begin
sql:='update realtime set code="' + c.Code +'",'+
'[text]="' + c.Text +'",' +
'price=' + currtostr(c.Price-c1.Price) + ','+
'vol=' + IntToStr(c.vol-c1.vol ) + ',' +
'amt=' + currtostr(c.amt-c1.amt ) + ',' +
'times=' + IntToStr(tms) +',' +
'upddt="'+ DateTimeToStr(now)+'" ' +
'where code="' + c.Code + '"';
adoCmd.Execute;
end;
end;
except on e : exception do
begin //这里在有时多少次数之后就抛出异常“未指定的错误”!!!!!!
MAINFRM.mmo.Lines.Add('[SYS-ERR] Thread() MSG:'+e.Message);
MAINFRM.mmo.Lines.Add('[SYS-ERR] Thread() DUMP:'+ sql);
inc(errs);
end;
end;
...
FreeAndNil(adocmd);