掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ADO(ADOX) を使用して SQL Server 上にテーブルを作成するには？ (ID:107934)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Dim cat As ADOX.Catalog Dim tbl As ADOX.Table Dim col As ADOX.Column Set cat = New ADOX.Catalog cat.ActiveConnection = "UID=***;PWD=***;Database=***;Server=***;Driver={SQL Server};DSN='';" 'cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=C:\db1.mdb;" Set tbl = New ADOX.Table tbl.Name = "TABLE1" Set col = New ADOX.Column With col .Name = "FIELD1" .Type = adBoolean .Attributes = adColNullable End With tbl.Columns.Append col cat.Tables.Append tbl Set col = Nothing Set tbl = Nothing Set cat = Nothing 上のように下のですが、エラーが発生します。 実行時エラー 3251 オブジェクトまたはプロバイダは要求された操作を実行できません。 ちなみに下の方法では作成することができます。 Dim cn As ADODB.Connection Set cn = New ADODB.Connection cn.Open "UID=***;PWD=***;Database=***;Server=***;Driver={SQL Server};DSN='';" cn.Execute "create table TABLE1 (FIELD1 bit null)" cn.Close: Set cn = Nothing なにが原因なのでしょうか？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.