2017-10-18 4 views
0

テーブルをAccessデータベースから.txt-filesにエクスポートします。ここでR(RDCOMClient)を使用してAccessdbからテーブルをエクスポート

は私のコードです:

library(RDCOMClient) 
#Path of txt File 
destPath = 'C:\\Path\\to\\Hello.txt' 
#Path of AccessDB 
strDbName = "C:\\MyPath\\AccessDB.accdb" 
#launche Access App 
oApp = COMCreate("Access.Application") 
#open the AccessDB 
oApp$OpenCurrentDatabase(strDbName) 
#Export the table to txt using transferText Method 
acExportDelim <- 0 
exportObj = oApp[["DoCmd"]] 
exportObj$TransferText(acExportDelim,"NameOfTable", destPath, TRUE) 
oApp$Quit() 
exportObj <- NULL 
oApp <- NULL 

、それは仕事をdoesntのなぜ私が見つけるカント...

これは私がすべての時間を取得するエラーメッセージです:

<checkErrorInfo> 80020009 
Error: exception occurred. 

どれでも助けに感謝!あなたのDoCmd.TransferTextの (私は必要なエンティティの32ビットR doesntの仕事を使用して「RODBCアプローチ」)事前に

おかげで...

+0

* 32bit Rを使った "RODBCアプローチ"は、私が必要とするエンティティに対しては何もしません* ...あなたのビットバージョンのR( 'Sys.info()$ machine')は何ですか?あなたのMS Officeのビット版は何ですか(オープンアクセスまたは任意のOfficeアプリケーション、後ろの段階では、「アカウント」ボタンをクリックし、トップラインを読む)? – Parfait

+0

-Rscript.exe(32bit)with(system()) - SQLクエリーでスクリプトを実行し、.RDataとしてテーブルを保存します。 - .RDataファイルを自分のグローバルにロードします。 Env。 問題は、すべてのテーブルのうちの1つだけでは、動作しません。 このテーブルの属性の1つのAccessのデフォルト設定は、標準値を設定することです...私のスクリプトでテーブルを取得すると、standart値が最後の "空"の行になるので、テーブルその整合性を失います...フロントエンドエラーoccurrsとRscript.exeが中断します... – Severin

答えて

1

引数が正しくありません。テーブル名を指定した2番目の引数は、エクスポート仕様の名前にする必要があります。あなたが間違っているので、他のすべての議論も間違っています。

まず、Access(guide)に名前付きエクスポート仕様を作成します。その後、あなたのコマンドでそれを使ってテーブルをエクスポートします。あなたは後半バインディングを使用しているので、あなたはその値のために数字を使用する必要がありますので、また

、あなたは、acExportDelim列挙型を使用することはできません(2)

最終exportコマンド:

oApp[["DoCmd"]]$TransferText(2,"ExportSpecificationName", "TableName", destPath, TRUE) 

可能であれば、おそらくODBC接続を修正するほうがよいでしょう。

+1

OPはまたエクスポート仕様を空白のままにすることができます: '' '' – Parfait

+0

@Parfaitこれはロケール設定に応じて真である場合とそうでない場合があります[この質問](https://stackoverflow.com/questions/26991172/transfertext-export-to-csv-not-working-but-transferspreadsheet-to-xlsx-working)安全のため、私は1つを使用することをお勧めします。 –

+0

あなたの答えはErikに感謝します。その作業:) @ @パールは、空白の仕様のヒントをありがとう...その仕事も!今は私にとって完璧なソリューションです。 あなたは今日のMVPです:D – Severin

関連する問題