批量平添数据时，提示：下标越界: 'i'

批量添加数据时，提示：下标越界: 'i'，急急急。
asp+sql2000
存在问题：批量加入数据的程序，如果从上一页传过来的数据为多行时，填加不会出错，如果只有一行时就出下面的错误：

错误类型：
Microsoft VBScript 运行时错误 (0x800A0009)
下标越界: 'i'
/add_jijia_mx_ok.asp, 第 72 行