Метод Copy класса File
Метод CopyTo класса FileInfo
Эти методы позволяют создавать новые файлы или перезаписывать существующие путём копирования исходного.
Sub Copy(ByVal sourse FileName As Srting, ByVal dest FileName As String, ByVal overwrite As Boolean)
Sub CopyTo(ByVal sourse As Srting, ByVal dest As String, ByVal overwrite As Boolean)
overwrite - можно ли перезаписывать файл назначения, если он уже существует.
Пример: создадим консольное приложение, которое позволит копировать файл с помощью метода Copy и разрешит перезапись.
Imports System.IO
Module Module1
Dim soursce FileName As String=”C:\Мои документы\MyFile.txt”
Dim destFileName As String=”D:\My File.txt”
Sub Main()
FileCopy(sourceFileName, destFileName)
End Sub
Sub FileCopy(ByValsourceFileName As String, ByVal dest FileName As String)
If File, Exists (soutceFileName) Then
File.Copy(sourceFileName, destFileName; True)
Else
Console.WriteLine (“файл не существует”, sourceFileName)
End If
End Sub
