1

いくつかのファイルをコピー先にコピーし、その間にファイル名をテキスト ファイルに記録したいと考えています。

ファイルが宛先フォルダーに既に存在する場合に、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()
    

前もって感謝します。

4

0 に答える 0