CSVから開かれたテーブルにフィールド追加するには？ (ID:87200)

名前

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

本文 質問させていただきます。 CSVを以下のようにDBでオープンして、フィールドを追加 しようとしているのですが、 「実行時エラー：3282 この操作は、データを含んでいるテーブルには 実行できません」 というエラーが出てしまいます。 どこが間違っているのかご指摘いただけたらと思います。 よろしくお願いいたします。 Dim ws As Workspace Dim db As Database Dim rs As Recordset Dim tbldef As TableDef Dim fld As Field Set ws = DBEngine.Workspaces(0) Set db = ws.OpenDatabase("C:\ExportCSV\ADOTEST", False, False, _ "Text;DATABASE=C:\ExportCSV\ADOTEST;TABLE=NewAddress.csv") Set tbldef = db.TableDefs("NewAddress#csv") Set fld = New Field Set fld = tbldef.CreateField("test", dbText, 50) tbldef.Fields.Append fld ←ここでエラー