ACCESS から EXCEL へ出力! VBA その5 アクセス講座 --- SYSTEM-F ---
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 は触れていませんでしたが、.mdb が2つとします
こうする事によって、APP を修正しても上書きするだけで済みます
APP、DB、2つを1つでまとめても良いのですが、そうすると、プログラム修正中は、DB を使用することが出来なくなります
また、、、
DB は後で、取り込んでも良い(コピー)と思うかもしれませんが、実際はムダな作業になりますネ
---
明日見むら
村長さんでした
(^^)vba
asumi-mura