いくつかのファイルをコピー先にコピーし、その間にファイル名をテキスト ファイルに記録したいと考えています。
ファイルが宛先フォルダーに既に存在する場合に、Windows 7 の [コピー/置換] ダイアログを使用したいと思います (ユーザーを「既知の」環境に保つため)。
しかし、私の問題は、ユーザーの選択に応じて 4 つの異なるイベントをキャッチできないことです。
- 交換
- コピー禁止
- 別の名前でコピー
キャンセル (これについては、例外をスローしてキャッチできます)
Dim oFile As New StreamWriter(strTextFile) For Each p In Me.Files ' List of custom class with file information like Path, Extension, etc... Dim strFileName = Path.Combine(strDestinationFolder, p.FileName) If File.Exists(strFileName) Then Try My.Computer.FileSystem.CopyFile(p.Path, strFileName, UIOption.AllDialogs, UICancelOption.ThrowException) Catch ex As Exception ' I would like to catch user's choices here to react accordingly in the text file End Try Else oFile.WriteLine(p.Path & ";" & p.FileName) End If Next oFile.Close()
前もって感謝します。