1、FileCopy () 函数
FileCopy ( 源文件, 目标文件{, replace } )
源文件：要复制的文件的名称的字符串
目标文件：要复制到的文件的名称的字符串
replace :指定是否替换目标文件的布尔值(true),为true时替换目标文件，为false时不替换（默认值为false）
返回值：
1 -成功
-1 打开源文件出错
-2 写入目标文件出错
注：如果没有为 源文件 或 目标文件 指定完全限定的路径，则该函数将相对于当前目录工作。如果没有指定replace参数，则FileCopy函数不会替换目标目录中与在targetfile参数中指定的名称相同的文件(这相当于将replace值设置为false)。
实例：
下面的示例将文件从当前目录复制到另一个目录，并将返回值保存在一个变量中。它不替换同名文件，如果一个文件已经存在于目标目录:
integer li_FileNum
li_FileNum = FileCopy ("jazz.gif" , &
"C:emusicjazz.gif", FALSE)
2、FileMove()
FileMove ( 源文件,目标文件)
源文件：要移动的文件的名称的字符串
目标文件：要移动文件的位置的名称的字符串
返回的值如下:
1 -成功
-1打开源文件出错
-2写入目标文件出错
注：如果目标目录中已经存在同名文件，则无法写入目标文件。如果要复制目标文件，可以使用FileCopy并将replace参数设置为true。
实例：本例将文件从当前目录移动到另一个目录，并将返回值保存在li_FileNum变量中:
integer li_FileNum
li_FileNum = FileMove ("june.csv", &
"H:/project/june2000.csv" )
3、创建文件夹
CreateDirectory ( 目录名称)
目录名称：要创建的目录的名称的字符串
如果函数成功，返回1;如果发生错误，返回-1。
实例：本例在当前路径中创建一个新的子目录，然后将新的子目录设置为当前目录:
string ls_path="my targets"
integer li_filenum
CreateDirectory ( ls_path )
li_filenum = ChangeDirectory( ls_path )
4、判断文件夹是否存在
DirectoryExists(目录名称)
在尝试使用其他文件系统方法移动文件或删除目录之前，可以使用此方法。
返回值：如果目录存在，则返回true。如果目录不存在，或者在directoryname参数中传递文件名，则返回false。
实例：
此示例在尝试将文件移动到目录之前确定该目录是否存在;否则，它将显示一个消息框，指示路径不存在:
string ls_path="monthly targets"
If DirectoryExists ( ls_path ) Then
FileMove ("2000may.csv", ls_path+"may.csv" )
MessageBox ("File Mgr", "File moved to "&
+ ls_path + ".")
Else
MessageBox ("File Mgr", "Directory " + ls_path+&
" does not exist" )
End If
5、FileDelete ( filename )删除文件
filename:文件名称
返回值： 如果成功，返回true;如果发生错误，返回false。如果文件名为空，则FileDelete返回空值。
案例：这些语句删除用户在打开的文件窗口中选择的文件:
integer ret, value string docname, named value = GetFileOpenName("Select File," & docname, named, "DOC", & "Doc Files (*.DOC),*.DOC") IF value = 1 THEN ret = MessageBox("Delete", & "Delete file?", Question!, OKCancel!) IF ret = 1 THEN FileDelete(docname)
6、FileExists ( filename ) 判断文件是否存在
返回值: 如果文件存在，返回true;如果不存在，返回false。如果文件名为空，FileExists返回空值。
实例：此示例确定用户在Save file窗口中选择的文件是否存在，如果存在，则询问用户是否可以覆盖该文件:
string ls_docname, ls_named integer li_ret boolean lb_exist GetFileSaveName("Select File," ls_docname, & ls_named, "pbl", & "Doc Files (*.DOC),*.DOC")lb_exist = FileExists(ls_docname) IF lb_exist THEN li_ret = MessageBox("Save", & "OK to write over" + ls_docname, & Question!, YesNo!)