今日论坛之星Microsoft VBScript 运行时错误 错误 '800a0009' 

下标越界: '[number: 0]' 

/fjlx/bbs/default.asp，行418 
代码部分418的代码如下:
 
404   <%
405exit sub
406end if
407 
408    sql="select top 2 userid,username,userpost,usersex,userface,userwidth,userheight,usertitle,joindate,lastlogin,userclass,usertoday from [dv_user] where username='"&tempname&"' order by userpost desc"
409set rs=Dvbbs.Execute(sql)
410If Not RS.Eof then
411    SQL=Rs.GetRows(-1)
412end if
413    rs.close:set rs=nothing
414    tempface=split(sql(4,i),"|")
415If Ubound(tempface)>0 Then
416    face=tempface(1)
417else
418    face=tempface(0)
419end if
420    mydate=Split(sql(8,i)," ")
421if sql(3,i)=1 then
422    mysex="Boy"
423else
424    mysex="Girl"
425end if
426    tempstr=Split(sql(11,i),"|")
427%>
[em10]