Imports System Imports System.IOPublic Class Test Public Shared Sub Main() ' Specify the directories you want to manipulate. Dim path As String = "c:\temp\MyTest.txt" Dim path2 As String = path + "temp" Try Dim fs As FileStream = File.Create(path) fs.Close() ' Ensure that the target does not exist. File.Delete(path2) ' Copy the file. File.Copy(path, path2) Console.WriteLine("{0} copied to {1}", path, path2) ' Try to copy the same file again, which should succeed. File.Copy(path, path2, True) Console.WriteLine("The second Copy operation succeeded, which was expected.") Catch Console.WriteLine("Double copying is not allowed, which was not expected.") End Try End Sub End Class
File.Copy(@"c:\a.jpg", @"d:\b.jpg", true);
Imports System.IOPublic Class Test
Public Shared Sub Main()
' Specify the directories you want to manipulate.
Dim path As String = "c:\temp\MyTest.txt"
Dim path2 As String = path + "temp" Try
Dim fs As FileStream = File.Create(path)
fs.Close() ' Ensure that the target does not exist.
File.Delete(path2) ' Copy the file.
File.Copy(path, path2)
Console.WriteLine("{0} copied to {1}", path, path2) ' Try to copy the same file again, which should succeed.
File.Copy(path, path2, True)
Console.WriteLine("The second Copy operation succeeded, which was expected.") Catch
Console.WriteLine("Double copying is not allowed, which was not expected.")
End Try
End Sub
End Class