pb中如何写文件

例：F盘用 文件夹 test，文件 test.txt

if DirectoryExists('f:\test') then messagebox(''高闭贺,'这是文件夹')

if DirectoryExists('f:\test\test.text') = false then messagebox('','这不是文件夹')

而 FileExists 可以判断指定文件或文件夹是否存在，

FileExists('f:\test')

FileExists('f:\test\test.txt')

结果都为 true

所以，你要区分文件和文件夹用DirectoryExists

可以用读\写ini文件一样的方式戚派,用profilestring()和fileopen()函数来实现.

PB中有这些函数　

FileExists ( filename ) 判断文件是否存在

FileRead ( file#, variable ) 读态物取文件

int filemum

string filedata

filenum = fileopen( 'c:\pb.txt ',linemode!,write!)//没有文件的话自动创建

fileread(filenum,filedata)

在数据 *** 作画板中可腊局以从一个外部文件中导入数据库某个表中。具体步骤如下：

1.在数据库画板工作区中选择要导入数据的表，然后打开数据 *** 作画板，从菜单中选择Rows—Import,d出Select import file对话框。

2.选择要导入的数据文件

可导入的文件类型有两种：文本文件（*.txt）和dBase文件(*.dbf)。对于文本文件，要求它的每一行对应表中的一条记录，而且每个数据项之毁冲间由一个制表符分割。另外，纤局歼不管哪种类型的文件，导入的数据一定要与表中对应列的数据类型相匹配。

3.保存

将文件以二进制方式存进数据库耐唤。

selectblob data into :lb_filedata

from 表

where filename= '文件贺败名禅亩颤'

using sqlca

if isnull(lb_filedata) then

else

mle_1.text = string(lb_filedata)

end if

---