如何读取BBx4中的txt文件

时间:2016-04-25 18:58:59

标签: business-basic

我在BBx中有一个> 30岁的程序,需要阅读它自己的数据库以外的东西。实际上它必须是非常简单的东西,如

txt $ = read(message.txt) print txt $

但是,没有任何文件可用。所以我的问题是:如何在BBx4中读取普通的txt文件

1 个答案:

答案 0 :(得分:0)

简单地打开文件并使用READ RECORD

读取它
open (1,err=linenr) "message.txt"    
read record (1,siz=1,end=linenr) txt$

在通道1上打开,当出现错误时, = * siz = 1读取1个字符siz = 100个读取100个等。结束检测到文件结束时的去向。