関工健児誇りあれ!?

下関のブログです(^^)v 明日見村 MotoG5Plus Windows10 Kindle iPhone Access Excel VBA ALCATEL IDOL4 Zenfone2 ZE551ML CHUWI Hi8 目標は?100kb/s でも読めるアホblog です

ACCESS から EXCEL へ出力! VBA その5 アクセス講座 --- SYSTEM-F ---

ACCESS から EXCEL へ出力!

VBA (その5) アクセス講座

---

    'EXCEL 保存元/先 PATH を取得
    PATH_COM = "F:\Redhp300G\APP\COM"
    PATH_RPT = "F:\Redhp300G\APP\RPT"

---

前回のを踏まえて修正してみましょ

     PATH_COM = FUNC_SQL_GET("SELECT PATH_COM FROM T1000_SYS;", "")

     PATH_RPT = FUNC_SQL_GET("SELECT PATH_RPT FROM T1000_SYS;", "")

こうすると、パスが端末ごとに可変で与えられますネ!

F:¥ で固定だと、そこから変更するのにプログラム修正が必要になります

これで、より、汎用的になって来ました

---

DBにシステム設定用のテーブル T1000_SYS を作ります

(前提条件)

必ず存在する、必ず1件、DB 側ではなく、APP 側のテーブル とする

名前: T1000_SYS

項目: PATH_COM 文字255、PATH_RPT 文字255

---

DB 、APP は触れていませんでしたが、.mdb2つとします

DB.mdbAPP.mdb

こうする事によって、APP を修正しても上書きするだけで済みます

APP、DB、2つを1つでまとめても良いのですが、そうすると、プログラム修正中は、DB を使用することが出来なくなります

また、、、

DB は後で、取り込んでも良い(コピー)と思うかもしれませんが、実際はムダな作業になりますネ

---

明日見むら

村長さんでした

(^^)vba

asumi-mura

by. Access VBA