COPYFILES Method (System)

Description

Copies files to a specified location, optionally showing a progress information and allowing an Undo operation.

Syntax

SuccessFlag = Exec_Method( "FILESYSTEM",    

                              "COPYFILES",     

                              FilesFrom,       

                              FilesTo,         

                              CopyFilesOptions )

Parameters

Name	Required	Description
FilesFrom	Yes	@fm-delimited list of files to copy. Wildcard characters are allowed.
FileTo	Yes	Fully qualified path of the location to copy the files to, or an @fm-delimited list of destination files. In the latter case the number of file names must match exactly the number of file names specified in the "FilesFrom" parameter.
CopyFilesOptions	No	Contains an @Fm-delimited dynamic array of options that control the behavior of the copy operation: <1> Allow undo <2> Allow UI <3> Parent window ID <4> Progress dialog title <5> Allow confirmations

Returns

TRUE$ if the copy was performed successfully, or FALSE$ if an error occurred. If the case of the latter event the FILEOPRESULT property may be used to obtain more details regarding the failure.

Remarks

The CopyFilesOptions argument is composed of five fields which control the behavior of the copy operation – each field is described fully below:

Field	Name	Description
<1>	Allow undo	If TRUE$ then save Undo information. Defaults to FALSE$.
<2>	Allow UI	If TRUE$ then allow any appropriate dialogs to be displayed such as progress and error information. Defaults to FALSE$.
<3>	Parent window ID	Specifies the name of a WINDOW object to use as the parent for any dialogs displayed during the copy operation.
<4>	Progress dialog title	Text to display in the progress dialog during the copy operation.
<5>	Allow confirmations	If TRUE$ then allow the user to respond to any confirmation dialogs presented during the copy operation. Defaults to FALSE$.

The COPYFILES method is basically a wrapper around the SHFileOperation Windows API function, so it is worth examining at the documentation for this on the MSDN website to get a better idea of the capabilities of this method.

You should use fully qualified path names with this method. Using it with relative path names is not thread safe.

Equated constants for use with the COPYFILES method can be found in the PS_FILESYSTEM_EQUATES insert record.

Example

 
// Use the FILESYSTEM COPYFILES method to copy all files in a folder to

   // a specified destination folder using wildcard characters, showing any

   // progress information, but not allowing the user to override any

   // conflicts.

   

   $Insert PS_FileSystem_Equates

   $Insert Logical

   

   FilesFrom     = "c:\my_data\aug_2017\*.*"

   FilesTo       = "c:\backup\backup_data\aug_2017"

   

   CopyOptions = ""  

   CopyOptions<PS_CPF_ALLOWUNDO$>     = TRUE$  ; // Save Undo info

   CopyOptions<PS_CPF_ALLOWUI$>       = TRUE$  ; // Show dialogs

   CopyOptions<PS_CPF_PARENTWINDOW$>  = @Window

   CopyOptions<PS_CPF_PROGRESSTITLE$> = "Copying data to backup folder"

   CopyOptions<PS_CPF_ALLOWCONFIRM$>  = FALSE$

   

   If Exec_Method( "FILESYSTEM", "COPYFILES", FilesFrom, FilesTo, CopyOptions ) Then

      // Copied OK - data is now in: "c:\backup\backup_data\aug_2017"

   End Else

      ErrorInfo = Get_Property( "FILESYSTEM", "FILEOPRESULT" )

      

      ErrorCode = ErrorInfo<PS_FOR_ERRORCODE$>

      ErrorText = ErrorInfo<PS_FOR_ERRORTEXT$>

   End

   // Use the FILESYSTEM COPYFILES method to copy specfic files in a folder to

   // a specified destination folder showing any progress information, but not

   // allowing the user to override any conflicts.

   

   DirFrom       = "c:\my_data\aug_2017\"

   DirTo         = "c:\backup\backup_data\aug_2017\"

   

   FileNames     = "book1.xls"

   FileNames<-1> = "book2.xls"

   

   FilesFrom     = ""

   FilesTo       = ""

   

   XCount = FieldCount( FileNames, @fm )

   For X = 1 To XCount

      FilesFrom<x> = DirFrom : FileNames<x>

      FilesTo<x>   = DirTo   : FileNames<x>

   Next  

   

   CopyOptions = ""  

   CopyOptions<PS_CPF_ALLOWUNDO$>     = TRUE$  ; // Save Undo info

   CopyOptions<PS_CPF_ALLOWUI$>       = TRUE$  ; // Show dialogs

   CopyOptions<PS_CPF_PARENTWINDOW$>  = @Window

   CopyOptions<PS_CPF_PROGRESSTITLE$> = "Copying data to backup folder"

   CopyOptions<PS_CPF_ALLOWCONFIRM$>  = FALSE$

   

   If Exec_Method( "FILESYSTEM", "COPYFILES", FilesFrom, FilesTo, CopyOptions ) Then

      // Copied OK - data is now in: "c:\backup\backup_data\aug_2017"

   End Else

      ErrorInfo = Get_Property( "FILESYSTEM", "FILEOPRESULT" )

      

      ErrorCode = ErrorInfo<PS_FOR_ERRORCODE$>

      ErrorText = ErrorInfo<PS_FOR_ERRORTEXT$>

   End

−Table of Contents