FileCopy (Copy File)

In the following program example, FileList is used to store a list of CPU files to an array. FileCopy is then used to copy these files to the USR (user) drive.

The files stored into the FileList destination variable are stored as CPU:filename.ext. Thus, in the FileCopy instruction, an expression is used to create a filename comprised of "USR:" plus the string that begins five characters in to the FileList destination string (the drive designation uses the first 4 characters of the destination string. The filename begins at the fifth character). Thus, a filename such as CPU:mydata.txt is copied as USR:mydata.txt.

'Declare Variables
Public FileListDest(10) As String * 30, Listtest
Public Flag As Boolean, CopyTest(10) As Boolean
Dim i

BeginProg
  SetStatus ("USRDriveSize",35840)
  Scan (1,Sec,3,0)
    If Flag Then
      Listtest=FileList ("CPU",FileListDest(1))
      For i = 1 to 10
        Copytest(i)=FileCopy(FileListDest(i),"USR:" + FileListDest(i,1,5))
      Next i
      Flag = False
    EndIf
  NextScan
EndProg

NOTE:
Note: Strings can be dimensioned only up to 2 dimensions instead of the 3 allowed for other data types. This is because the least significant dimension is actually used as the size of the string. To begin reading or modifying a string at a particular location into the string, enter the location as a third dimension; e.g., String(x,y,n) where n is the desired character. In the example program, 5 indicates starting at the fifth character in theFileListDeststring.