アクセスのデータをテキストファイルで出力したいのですが？

Question

社内データベースをアクセスで作成しています。作成しているデータベースは商標関連のものです。現在、特許庁では商標出願をパソコンで行うことができるようになっています。そのために、出願データを下記のようなシンプルなhtmlファイルで作成する必要があります。商標登録願

【書類名】　　　　　　商標登録願
【整理番号】　　　　　１１１１１
【提出日】　　　　　　平成１３年４月３０日
【あて先】　　　　　　特許庁長官　殿
【商標登録を受けようとする商標】
商標
【標準文字】
【指定商品又は指定役務並びに商品及び役務の区分】
　　【第９類】
　　【指定商品（指定役務）】電子応用機械器具
【商標登録出願人】
　　【住所又は名称】　日本
　　【氏名又は名称】　商標太郎

【】で囲まれているデータは、アクセスで作っているデータベースのデータの中に殆ど入っているので、アクセスでデータを入力した後に、上記した簡単なタグを付けて、上記のレイアウトでテキストファイル出力をして、さらに、それをhtmlファイルとして保存したいのですが、この作業を簡単に行うことができないでしょうか？　教えてください。

seian · Accepted Answer

一番簡単なのは今書こうとしているファイルのデータをすべて含んでいるようなフォームの上にコマンドボタンを作成し、以下のようなコードを書けば Open の次に指定するファイルが作成されます。 Private Sub ボタン1_Click() Open "c: est mp.htm" For Output As #1 Print #1, "" Print #1, " 商標登録願" Print #1, " " Print #1, "

"
    Print #1, "         テスト：" & Me!test
    Print #1, "         今日：" & Format$(Date, "yyyy/mm/dd (aaa)")
    Print #1, "

" Print #1, " " Print #1, "" Close #1 End Sub 例えば上記のようなコードを書いた場合、（「test」フィールドには "テスト!!" が入力されているとして) 以下のような内容の tmp.htm というファイルが C: est フォルダ内にできるはずです。こういうことでよろしいのでしょうか?? 商標登録願

         テスト：テスト!!
         今日：2001/04/24 (火)

Yumikoit · Answer

直接の回答かどうかわからないのですが 特許の方ですとWORD などの文書から一括html変換できるソフトもいくつか出ていますね。
ああいうものを流用することはできないでしょうか。

コンバートスター(システムポート)
http://www.systemport.co.jp/product/togo12.htm

MM版特許事務ツール
http://www.vector.co.jp/soft/win95/business/se096025.html

MS WORD97/98/2000用特許事務ツールマクロ
http://www.vector.co.jp/soft/win95/business/se054285.html

参考URL：http://www.vector.co.jp/vpack/filearea/win/business/patent/index.html

seian · Answer

> １．出力ファイルの名称を、例えば、そのレコードの「ケース番号」
> にすることは可能でしょうか？ 

"c:	est	mp.htm" の所を "c:	est" & Me!ケース番号 & ".htm" のようにすればいいのでは?
 
> ２．データの中に数が増減するデータがあるのですが、このようなものには、
> どのように対応すればいいのでしょうか？ 
>　具体的にいうと、 
>　【第９類】 
>　【指定商品】　電子応用機械器具 
>　というデータや、 
>【第９類】 
>　【指定商品】　電子応用機械器具 
>　【第１０類】 
>　【指定商品】　測定機械器具 
>　というような感じで、分類と指定商品の数がデータによって、
>１個～３０個近くまで変わってしまうのですが、このようなデータにも対応できるのでしょうか？ 

例えば、「第9類」というフィールドがあって、そのデータがない場合に、
そのフィールドが null となっている場合には、

    If (Not IsNull(Me!第9類)) Then
        Print #1, "【第９類】" & Me!第9類
    End If

というようにすればOKの筈です。
(漢字と数字の入り混じったフィールド名は避けた方が無難ですが・・・。)

seian · Answer

> ap_dateというフィールドに出願日を入力した状態で、
> 上記の処理を行ったのですが、出力されるデータが
>「01/04/24」というようになってしまいます。
> これを「平成１３年４月２４日」というように出力させるには
> どのようにしたらよいのでしょうか？ 

いずれ日付のフォーマットで困るだろうと思って
最初の例でサンプルを載せたつもりだったのですが・・・。

Format$(Me!ap_date, "ggge年m月d日")

と言うようにすればOKです。
詳しくはヘルプでFormat関数をみてください。
「関連項目」の中の「日付/時刻表示書式指定文字」をみれば
日付に関するフォーマットの書き方が書いてあります。

アクセスのデータをテキストファイルで出力したいのですが？

直接の回答かどうかわからないのですが 特許の方ですとWORD などの文書から一括html変換できるソフトもいくつか出ていますね。

一番簡単なのは今書こうとしているファイルのデータをすべて含んでいるような

> １．出力ファイルの名称を、例えば、そのレコードの「ケース番号」

> ap_dateというフィールドに出願日を入力した状態で、

似たような質問が見つかりました

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

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

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

直接の回答かどうかわからないのですが特許の方ですとWORD などの文書から一括html変換できるソフトもいくつか出ていますね。