ACCESSのテーブルをHTMLファイルで出力したい

Question

ACCESSのテーブルをHTMLファイルで出力したいと考えています。 VBAでプログラムを作成すればいいのでしょうか。 ACCESSははじめたばかりでよくわかりません。丸投げのようで恐縮ですが、宜しくお願い致します。 *************************************** テーブル１ *************************************** ID　名前　住所１　伊藤　愛知２　加藤　大阪３　稲垣　東京 … *************************************** 2.html ***************************************

ID	名前	住所
… ここにテーブル１のデータを出力したい …

*************************************** 2.htmlのファイルを出力するようなことをしたいと考えています。宜しくお願いします。

anotherone · Accepted Answer

Private Sub コマンド_Click() myHTM = "" _ & vbCrLf & "" _ & vbCrLf & "トップページ" mySQL = "SELECT t1名前.番号, t1名前.名前, t2年令.年令 " _ & "FROM t1名前 INNER JOIN t2年令 ON t1名前.番号 = t2年令.番号;" Set myRS = CurrentDb.OpenRecordset(mySQL) Do '番号か　項目名で　指定します MsgBox myRS(0).Name & " : " & myRS(0).Value 'どちらの方法でも　同じように　データが取り出せます MsgBox myRS("名前").Name & " : " & myRS("名前").Value 'Nameは項目名　Valueは項目の内容です myHTM = myHTM & vbCrLf & "" myRS.MoveNext If myRS.EOF Then Exit Do Loop myHTM = myHTM & vbCrLf & "

" & myRS(0).Value _ & "

" & myRS(1).Value _ & "

" & myRS(2).Value & "

" MsgBox myHTM Set myRS = Nothing End Sub 2つのテーブル　t1名前 t2年令　の項目3つをHTMLにします連続して処理する時は　Doループや　Forループを使います条件になるまで実行して　無くなったら脱出　として処理します writeは　HTMLを作成してから　最後に1回だけでもいいと思います Set myRS = CurrentDb.OpenRecordset(mySQL) クエリの結果を　レコードセット　という入れ物に入れます myRS.MoveNext　で順番に取り出すことができます　(次のレコードに進む) Do　から　Loop　の間を　繰り返して実行しています If myRS.EOF Then Exit Do　終わりにEndOfFileなったら脱出します　

STICKY2006 · Answer

http://www.moug.net/tech/acvba/0090017.htm

単純にHTMLに落とすだけなら上のような方法があるみたいです。（自分はVBAのプロじゃないのであんまし詳しくは回答できませんが。



質問者さんの言うような
HTMLファイルの中に、自在にテーブルのデータを表示したい

のでしたら、ASPだとかCGI、PHPあたりを勉強することになるでしょう。

ACCESSのテーブルをHTMLファイルで出力したい

Private Sub コマンド_Click()

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング