这行代码应怎么写才对

[zhonghuarenming]

dim product_sorts1(rs7.recordcount,2)
for i=0 to rs7.recordcount-1
product_sorts1(i,0)=rs7("categoryid")
product_sorts1(i,1)=rs7("category")
rs7.movenext
next
response.write product_sorts1(0,0)
response.write product_sorts1(0,1)
response.end

[yymzzl]

有什么错误么？
贴出来看下

[若白师妹]

dim product_sorts1(rs7.recordcount,2)
i=0
do while not rs7.eof
product_sorts1(i,0)=rs7("categoryid")
product_sorts1(i,1)=rs7("category")
i=i+1
rs.movenext
loop
response.write product_sorts1(0,0)
response.write product_sorts1(0,1)