28,407
社区成员
发帖
与我相关
我的任务
分享急
<% dim first(30)
i=0
first(i)=rs("xiaolei")
rs.movenext
do while not rs.eof
a=rs("xiaolei")
if a=first(i) then
rs.movenext
else
i=i+1
first(i)=rs("xiaolei")
rs.movenext
end if
loop
%>
以上是我编的，但是说有错误，我不知道是那里？？？谢谢
错误类型是
错误类型：
ADODB.Field (0x800A0BCD)
/view_pmwy.asp, 第 51 行
i=0
first(i)=rs("xiaolei")
rs.movenext
do while not rs.eof
a=rs("xiaolei")
if a=first(i) then
rs.movenext
else
i=i+1
first(i)=rs("xiaolei")
rs.movenext
end if
loop
%>
以上是我编的，但是说有错误，我不知道是那里？？？谢谢
错误类型是
错误类型：
ADODB.Field (0x800A0BCD)
/view_pmwy.asp, 第 51 行
...全文
请发表友善的回复…
发表回复
