VBでAccessのクエリを作成するには?


まみ  2004-06-19 03:21:46  No: 84115  IP: [192.*.*.*]

タイトルのとおりなんですが、VBからAccessのクエリ(ビュー)を作成するにはどうしたら良いのでしょうか?
AccessのADPを使って開発しています。

もしわかる方がいらっしゃいましたら
サンプルとか、わかりやすい説明を教えてください。
初心者なもので…
お願いします。m(__)m

編集 削除
moge  2004-06-20 07:35:08  No: 84116  IP: [192.*.*.*]

わかりやすいかどうかは自信がありませんが(^^;、

AccessADPの接続先DBに対して、
SQLでCREATE VIEW文を発行します。

Dim cnn As New ADODB.Connection
Dim strSQL As String
'接続確立
cnn.Open "Provider=SQLOLEDB;" & _
             "Data Source=サーバ名;" & _
             "Initial Catalog=DB名;", "ユーザ名", "パスワード"

'CREATE VIEW文発行
strSQL = "CREATE VIEW AS SELECT なんちゃら FROM かんちゃ…"
cnn.Execute strSQL

編集 削除
まみ  2004-06-20 21:35:28  No: 84117  IP: [192.*.*.*]

moge様ありがとうございました。
無事にビューが作成できました。

もう一つ質問しても良いですか?
本当なら、別に書き込みをしなきゃいけないのですが…

作成したクエリをCSV形式で出力したいのですが…
どうしたら良いのですか?
Dim AppAccess As New Access.Application
AppAccess.OpenCurrentDatabase "C:\DB.adp"
AppAccess.DoCmd.TransferText acExportDelim, , "tbl_Sample", "C:\DB1TEXT1.CSV", False      
AppAccess.CloseCurrentDatabase
Set AppAccess = Nothing

こんな感じでテーブルは出力できたのですが、クエリ(ビュー)
は出力できなのですか?

編集 削除
サム  URL  2004-06-21 02:04:06  No: 84118  IP: [192.*.*.*]

http://www1.ocn.ne.jp/~hirosemt/SPm02.html

編集 削除
サム  2004-06-21 02:07:13  No: 84119  IP: [192.*.*.*]

ACCESS+。Net
サンプルです。

RDBは  SQLよりも  レコードの扱いが
肝心  List−Iterator  を
勉強しましょう。

http://www1.ocn.ne.jp/~hirosemt/SPm02.html

編集 削除