2005-12-21から1日間の記事一覧

Delphi Personal で DAO

トランザクションを確定する procedure TForm1.Button20Click(Sender: TObject); var de:Variant;//DBEngine db:Variant;//Database rs:Variant;//Recordset const dbOpenTable:Integer = 1; begin de := CreateOleObject('DAO.DBEngine.36'); //トランザク…