pb以留=流方式写入文件

FileOpen

FileOpen

功能以指定的读写方式打开指定的文件，同时返回该文件的句柄。

语法FileOpen(filename{,filemode{,fileaccess{,filelock{,writemode,{creator,filetype}}}}})

参数filename：string类型，指定要打开文件的名称，其中可以包含路径

filemode：FileMode枚举类型，可选项，指定文件打开方式。有效取值为

LineMode! - 缺省值，行模式；

StreamMode! - 流模式

fileaccess：FileAccess枚举类型，可选项，指定文件访问方式。

有效取值为：Read! - 缺省值，只读方式，这样打开的文件只能进行读操作

Write! - 只写方式，这样打开的文件只能进行写操作

filelock：FileLock枚举类型，可选项，指定文件加锁方式。

有效取值为：n LockReadWrite! - 缺省值，只有打开该文件的用户能够访问该文件，其它用 户对该文件的访问均被拒绝；

n LockRead! - 只有打开该文件的用户能够读该文件，但其它任何用户均可写该文件；

n LockWrite! - 只有打开该文件的用户能够写该文件，但其它任何用户均可读该文件；

n Shared! - 所有用户均可读写该文件

writemode：WriteMode枚举类型，可选项，当fileaccess参数指定为Write!时，该参数指定在指定文件已经存在时数据的添加方式。

有效取值为：Append! - 缺省值，将数据添加到原文件尾部；

Replace! - 覆盖原有数据

creator：可选项，用于Macintosh机，使用四个字符的字符串指定文件的创建者。指定该参数后，必须同时指定filetype参数

filetype：可选项，用于Macintosh机，使用四个字符的字符串指定文件类型返回值Integer。函数执行成功时返回打开文件的句柄，随后的文件操作函数利用该句柄完成对文件的操作。发生错误时函数返回-1。如果任何参数的值为NULL，那么FileOpen()函数返回NULL。

用法当文件以行模式打开时，每执行一次FileRead()函数读取一行数据；每执行一次FileWrite()函数，该函数自动在写出的字符串末尾增加一个回车（CR）换行（LF）符（这是应用程序在Windows 系统中运行时的情况，在UNIX下只加一个换行字符）。当文件以流模式打开时，执行一次FileRead()函数读取32,765个字节的数据，如果余下数据没有这么多，那么FileRead()函数就读取所有余下的数据；执行一次FileWrite()函数时，最多可写入32,765个字节的数据，并且不添加回车换行字符。当文件以写方式使用FileOpen()函数打开时，如果指定的文件不存在，那么FileOpen()函数创建该文件。

首先打开文件

li_FileNum = FileOpen(ls_wzbm, StreamMode!, Write!, Shared!, Replace!)

定义一字符创string ls_read

写入字符串

FileWrite(li_FileNum, ls_read)

关闭恩见FileClose(li_filenum)