2005-12-14から1日間の記事一覧
削除する procedure TForm1.Button13Click(Sender: TObject); var de:Variant;//DBEngine db:Variant;//Database rs:Variant;//Recordset const dbOpenTable:Integer = 1; begin de := CreateOleObject('DAO.DBEngine.36'); //Edit3 に mdbファイル名を入力 …
削除する procedure TForm1.Button13Click(Sender: TObject); var de:Variant;//DBEngine db:Variant;//Database rs:Variant;//Recordset const dbOpenTable:Integer = 1; begin de := CreateOleObject('DAO.DBEngine.36'); //Edit3 に mdbファイル名を入力 …