不解的脚本程序，大家帮忙呀

困惑的脚本程序，大家帮忙呀。

FILENO = FreeFile() ‘什么意思？
Open newfilename For Random As FILENO Len = Len(Hourlyrptrec)
  CURPOS = LOF(FILENO) / Len(Hourlyrptrec)
  Put FILENO, CURPOS + 1, Hourlyrptrec
Close FILENO
请问上面这段程序中，FILENO 是什么意思。（是一一个可以用的文件号吗？）
  Len = Len(Hourlyrptrec) 是什么意思呀。是newfilename这个文件的大小吗？
  如果系统中没有这个文件是不是自动创建这个文件呀。

谢谢帮忙。

[解决办法]
FILENO 是用来保存一个数字，就是文件号FreeFile取出的值

如果一个程序中打开了多个文件，文件号是不同的，用FREEFILE可以自动分配文件号，要是你指定#1，#2，容易重复

newfilename 是你指定的一个文件名
[解决办法]
刚才输入了半天，‘提交回复’后居然没有…… 
-_-!!!

VB code

FILENO = FreeFile()' 返回一个你的程序中‘目前可用’的文件号，赋值给变量:FILENOOpen newfilename For Random As FILENO Len = Len(Hourlyrptrec)' 以‘随机文件’的模式打开 newfilename ，记录长度为 Len(Hourlyrptrec)' newfilename 必须是一个合法的文件名（可以用绝对路径）' 如果 newfilename 不存在，用Random模式打开时它会被创建' Hourlyrptrec 是自定义的数据类型，它是每一条‘记录’的结构CURPOS = LOF(FILENO) / Len(Hourlyrptrec)' 计算文件中已有的‘记录’条数Put FILENO, CURPOS + 1, Hourlyrptrec' 向文件中‘增加一条记录’Close FILENO' 关闭刚才打开的文件。