Microsoft Access Club Access超初心者対象Forum Access初級者対象Forum Access VBA Tips Forum DAO、ADO、SQL Forum

     

リストへもどる

投稿記事の一括表示

タイトルAccessを操作してcsvを出力
記事No42903
投稿日: 2018/03/28(Wed) 18:11
投稿者ai
OS:Windows 7 バージョン64
Access Version:2010 バージョン32

Access2010で作ったアクセスファイルがあります。外部からこのアクセスファイルにアクセスしてcsvを出力したいのですが、うまくいきません。このようなスクリプトコードを書きました。

set obj = CreateObject("Access.Application")
obj.OpenCurrentDatabase "D:\accesstest.accdb"
obj.DoCmd.TransferText acExportDelin,,"TABLE","D:\csvtest.csv"

実行すると、オブジェクトcsvtest.csvが見つかりませんでした。オブジェクトが存在していること、名前やパスが正しいことを確認してください。とエラーメッセージが出ます。

コード自体は間違っていないと思うのですが、なぜこのようなメッセージがでるかわかりません。よろしくおねがいします。そもそも、ファイル自体は自動で作られると思うのでこのようなメッセージがでる事がおかしいなと思っています・・・

タイトルRe: Accessを操作してcsvを出力
記事No42904
投稿日: 2018/03/29(Thu) 11:42
投稿者ナバ
こんにちは。

> Access2010で作ったアクセスファイルがあります。外部からこのアクセスファイルにアクセスしてcsvを出力したいのですが、うまくいきません。このようなスクリプトコードを書きました。
スクリプトは、vbsなどですか?

> obj.DoCmd.TransferText acExportDelin,,"TABLE","D:\csvtest.csv"

csvファイルが自動では作られないようですので、あらかじめ空のファイルを作ったうえで、

obj.DoCmd.TransferText 2,,"TABLE","D:\csvtest.csv",1

でどうでしょうか。

> コード自体は間違っていないと思うのですが、
外部からの実行ですので、Access内部の定数は実際の値で記述する必要がありますし、
既定値も場合によっては必要かもしれません。

- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード

ページの先頭へ 前ページへ戻る