Copies a file.
Public Sub FileCopy( _ ByVal Source As String, _ ByVal Destination As String _ )
Exception type | Error number | Condition |
---|---|---|
52 | Source or Destination is invalid or not specified. | |
55 | File is already open. | |
53 | File does not exist. |
If you try to use the FileCopy function on a currently open file, an error occurs.
This example uses the FileCopy function to copy one file to another. For purposes of this example, assume that SRCFILE
is a file containing some data.
Dim SourceFile, DestinationFile As String SourceFile = "SRCFILE" ' Define source file name. DestinationFile = "DESTFILE" ' Define target file name. FileCopy(SourceFile, DestinationFile) ' Copy source to target.
Kill Function |