各位高手好!小弟有一数据库更新问题向你们请教:
我在remotedatamodule里放了adoconnection,adoquery和datasetprovider为远程模块
在另一个客户端模块里放了socketconection,clientdataset,datasource和dbgrid,我在提交和修改数据后,数据库并没有更新,即内容没有加载到数据库里,这事怎么回事呢?在下初学,请各位大侠赐教,小弟不胜感激!
其中数据加载更新内容如下:
procedure TForm1.Button4Click(Sender: TObject);
begin
if opendialog1.Execute and fileexists(opendialog1.FileName) then
begin
clientdataset1.Edit;
TBlobField(clientdataset1.fieldbyname('pdf')).loadfromfile(opendialog1.FileName);
clientdataset1.ApplyUpdates(0);
end;
end;
我在remotedatamodule里放了adoconnection,adoquery和datasetprovider为远程模块
在另一个客户端模块里放了socketconection,clientdataset,datasource和dbgrid,我在提交和修改数据后,数据库并没有更新,即内容没有加载到数据库里,这事怎么回事呢?在下初学,请各位大侠赐教,小弟不胜感激!
其中数据加载更新内容如下:
procedure TForm1.Button4Click(Sender: TObject);
begin
if opendialog1.Execute and fileexists(opendialog1.FileName) then
begin
clientdataset1.Edit;
TBlobField(clientdataset1.fieldbyname('pdf')).loadfromfile(opendialog1.FileName);
clientdataset1.ApplyUpdates(0);
end;
end;
adoconnection.BeginTrans;
clientdataset1.Edit;
TBlobField(clientdataset1.fieldbyname('pdf')).loadfromfile(opendialog1.FileName);
clientdataset1.ApplyUpdates(0);
adoconnection.CommitTrans;
except
adoconnection.RollbackTrans;
end;