foregroundにchoose.file（）ダイアログを表示する方法

Question

Windows XPではrscript.exeで実行されるスクリプトでchoose.dir()関数を使用しています。問題は、ディレクトリ選択ダイアログがトップレベルウィンドウとしてポップアップしないことです。どのように対話をフォアグラウンドに持ち込むことができますか？

一方、私は視覚的な基本的なスクリプトを使用して私の問題を解決しました。もちろん、これはWindowsのみで動作します：

tf <- tempfile(fileext = '.vbs') 
cat('Set folder = CreateObject("Shell.Application") _ 
     .BrowseForFolder(0, "Please choose a folder" _ 
     , &H0001, 17) 
     Wscript.Echo folder.Self.Path 
', file = tf) 
tail(shell(paste('Cscript', tf), intern = T), 1) 

Answer 1

rhelpアーカイブを検索した後に、答えはあなたが非対話型セッションでchoose.dirとfile.chooseを使用することができないということです表示されます。 list.files、file.info、file.accessおよびfilesは情報を収集するために使用することができるので、グラフィックデバイスに書き込み、system（）コールを実行して表示することができ、readLinesは次のようにすることができます。ユーザー入力を取得するために使用されます。