Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2128 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【3812】テーブル作成時のプロパティ設定について 桜坂 04/11/4(木) 8:25 質問[未読]
【3813】Re:テーブル作成時のプロパティ設定について クロ 04/11/4(木) 10:27 回答[未読]
【3814】Re:テーブル作成時のプロパティ設定について 桜坂 04/11/4(木) 14:15 お礼[未読]
【3812】テーブル作成時のプロパティ設定について
質問  桜坂  - 04/11/4(木) 8:25 -
引用なし
パスワード
   皆さん、お世話になります。

質問ですが、Create table〜を利用して、テーブルを作成しています。
テーブルのプロパティにunicode圧縮があるのですが、テーブル作成時
に「Yes」に設定することは可能でしょうか？

よろしくお願いします。
【3813】Re:テーブル作成時のプロパティ設定につい...
回答  クロ  - 04/11/4(木) 10:27 -
引用なし
パスワード
   WITH COMPRESSION NOT NULL キーワードで指定できますが
ANSI-92モードでしか使用できません。

Accessのオプションの「テーブル/クエリ」でモードの変更はできますが
他への影響があるかも？
新規mdbで「このデータベースのみ」チェックで試してみてください。

別の方法を考えるかしないと無理かもしれません。

ADOX例
「参照設定」で[Microsoft ADO Ext. 2.* for DD and Security] を参照する必要があります。

Dim cl As New ADOX.Catalog
Dim tb As New ADOX.Table
cl.ActiveConnection = CurrentProject.Connection
tb.Name = "テーブル名"
tb.Columns.Append "フィールド1", adWChar, 50
cl.Tables.Append tb
MsgBox tb.Name & "を作成しました"
【3814】Re:テーブル作成時のプロパティ設定につい...
お礼  桜坂  - 04/11/4(木) 14:15 -
引用なし
パスワード
   クロ様

　返信いただき、ありがとうございました！
　こんな方法があったんですね。
　大変参考になりました。
　参照設定を追加する方法で対応したいと思います。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2128 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1081089
(SS)C-BOARD v3.8 is Free