无法从 bbc 基本工作中获取代码答案

【问题标题】：Can't get code from bbc basic working无法从 bbc 基本工作中获取代码
【发布时间】：2015-03-25 18:29:18
【问题描述】：

  440 DEFPROCsave
  450 phonenos=OPENUP("Phonenos")
  470 PRINT
  480 FOR j= 1 TO counter
  490       PRINT#phonenos,contact{(j)}.name$,contact{(j)}.phone$,contact{(j)}.email$
  500   FOR f = 1 TO 10
  510     PRINT#phonenos,contact{(j)}.response%(1,f)
  520   NEXT f
  530   
  540 NEXT j
  550 CLOSE#phonenos
  560 PRINT "Data saved."
  570 ENDPROC

从数据库中保存详细信息的代码我正在尝试将我输入的内容保存到文件中，但错误 INVALID CHANNEL AT LINE 490 APPEARS/

【问题讨论】：

哇；曾叱咤风云的。定义“不工作”。 #390 有问题，#490 有问题，可能还有其他问题。
谢谢 490 不工作
你确认phonenos打开并且是一个可读的db文件了吗？
不抱歉，你是怎么做到的？
任何机构都知道如何让它工作，它可以创建联系人并将其保存到文件中？

标签： basic bbc-micro

【解决方案1】：

如果您的错误出现在第 490 行，则可能会发生以下两种情况之一。

phonenos 的 FILEHANDLE 未打开。

您可能试图从错误的位置访问该文件，它可能不存在，或者它可能被写保护。
您的 contact 数组引用了无效的索引项。

counter 是否超出了数组的范围？这是基于零 (0) 还是一 (1) 的数组？

【讨论】：

我不知道contact{(j)} 是否是一个有效的索引器。在这里，您是专家，而不是我。
我们这里有 AlphaBASIC 手册，但我没有找到任何在线信息来源。幸运的是，我不必编辑很多旧代码（敲木头）。