完整的asp语句 我那个只是举了一个例子而已如果是把A()和B()数组都是从数据库里取得呢,问一个小问题,如何定义2维数组
我写的代码他说我
错误类型:
ADODB.Field (0x800A0BCD)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/全能人才招聘系统asp.0602/a.asp, 第 63 行
Dim MyArry()
rs.open "select * from PersonTbl",Conn,1,1
if Not Rs.Eof Then
for i=0 to rs.recordcount
ReDim Preserve MyArry(rs.recordcount,5)
MyArry(i,0)=rs("realname") -----63行
MyArry(i,1)=rs("sex")
MyArry(i,2)=rs("Age")
MyArry(i,3)=rs("Qualification")
MyArry(i,4)=rs("JobPost")
response.Write(MyArry(i,0))
response.Write(MyArry(i,1))
response.Write(MyArry(i,2))
response.Write(MyArry(i,3))
response.Write(MyArry(i,4))
response.Write("<br>")
rs.movenext
next
End if
rs.close
[ 本帖最后由 ab382717036 于 2011-3-29 10:41 编辑 ]
我写的代码他说我
错误类型:
ADODB.Field (0x800A0BCD)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/全能人才招聘系统asp.0602/a.asp, 第 63 行
Dim MyArry()
rs.open "select * from PersonTbl",Conn,1,1
if Not Rs.Eof Then
for i=0 to rs.recordcount
ReDim Preserve MyArry(rs.recordcount,5)
MyArry(i,0)=rs("realname") -----63行
MyArry(i,1)=rs("sex")
MyArry(i,2)=rs("Age")
MyArry(i,3)=rs("Qualification")
MyArry(i,4)=rs("JobPost")
response.Write(MyArry(i,0))
response.Write(MyArry(i,1))
response.Write(MyArry(i,2))
response.Write(MyArry(i,3))
response.Write(MyArry(i,4))
response.Write("<br>")
rs.movenext
next
End if
rs.close
[ 本帖最后由 ab382717036 于 2011-3-29 10:41 编辑 ]