DaoにてTable作成 (ID:141528)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 魔界の仮面弁士さん いつもありがとうございます。 DAOを使っている理由は、MDBにInsert処理を高速にする為です。 魔界の仮面弁士さんのソースを参考にしています。 http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200611/06110042.txt アドバイスの中身は私のレベルでは理解が難しかったのですが、 何とかできるようになりました。 今後の参考までに、質問があります。 >変数宣言部で「New」して、tbl のインスタンスを生成しているのに、 >それを(破棄せずに)捨てて、別のインスタンスを代入しようとしています。 とは、どういうことでしょうか？ ◆以下解決のソース 'Dao3.6 Object Library参照 Dim path As String = "c:\temp\123.mdb" Dim DE As DAO.DBEngine = New DAO.DBEngineClass() Dim WS As DAO.Workspace = DE.CreateWorkspace("#Default Workspace#", "Admin", String.Empty) 'MDBファイル作成 Dim DB As DAO.Database = WS.CreateDatabase(path, DAO.LanguageConstants.dbLangJapanese, DAO.DatabaseTypeEnum.dbEncrypt) 'テーブル作成 Dim tbl As DAO.TableDef Dim fld As DAO.Field tbl = DB.CreateTableDef("Table") fld = tbl.CreateField("Field", 4) tbl.Fields.Append(fld) DB.TableDefs.Append(tbl) DB.Close()