タイトル : コモンダイアログ(CommonDialog) を使って複数のファイルを開く 投稿日 : 2008/01/08(Tue) 23:27 投稿者 : べた
コモン ダイアログ(CommonDialog) を使って複数のファイルを 開こうとしています。 コモンダイアログを表示し、ファイルを選択し、開くを押下した後、 選択したファイルのファイル数やパス名、ファイル名を取得したい のですが、処理をどのようにしたらよいのですか。 選択されたファイルは、FileNameプロパティで取得できました。 「C:\Documents and Settings\yamada\My Documents file1.xls file2.xls file sample.xls test_data.csv」 の様に表示されました。 ファイル毎にパス名+ファイル名かと思っていたのですが、上記の 通り、最初にパス名来て、その後、選択したファイル名が来ています。 ファイル名とファイル名の区切りは、スペースではなく、null 文字 で区切 られた文字列として取得されるとヘルプにあったのですが、見た感じが スペースなのですが、 期待する結果としては、 選択したファイルのファイル数 選択したファイルのパス名とファイル名 を取得したのです。 この場合、 ファイル数:4 パス名 :C:\Documents and Settings\yamada\My Documents ファイル名:file1.xls :file2.xls :file sample.xls (これだけ、ファイル名にスペースが含まれる〜 :test_data.csv CommonDialog1.Filter = "すべてのファイル(*.*)|*.*|テキストファイル(*.txt;*.csv)|*.txt;*.csv" CommonDialog1.InitDir = CreateObject("WScript.Shell").SpecialFolders("MyDocuments") CommonDialog1.Flags = cdlOFNAllowMultiselect Or cdlOFNExplorer CommonDialog1.ShowOpen |