cok acil yardım

merhaba arkadaşlar eniyi ve en yeni100 sayfalarını yabıyorum sitemin ancak söyle bir hata ile karşılaştım sizce ne olabilir hata

Microsoft VBScript runtime error '800a01a8'
Object required: ''

/eniyi100.asp, line 86

kot:

<td width="133" bgcolor="#66CCFF" height="22">
<p style="margin-left: 5"><span style="font-weight: 700">
<font face="Verdana" style="font-size: 9pt" color="#000080">En
iyiler</font></span></td>
</tr>
<tr>
<td width="133" bgcolor="#FFFFFF" height="2">
<table border="0" width="180" id="AutoNumber10" cellpadding="0">
<% i = 1 %><% Do While i <= 5 and not ii.EOF %><font color="#000080">
</font>
<tr>
<td width="149">
<p style="margin-left: 3">
<font face="Verdana" style="font-size: 9pt">
<a class="red" title="<%=Left(ii("file_note"),200)%>" href="file.asp?file_id=<%=ii("file_id")%>&kategori=<%=ii("cat_id")%>">
<font color="#000080"><%=ii("file_name")%></font></a></font></td>
<td width="31">
<p align="center"><font color="#000080"><b>
<font face="Verdana" style="font-size: 8pt"><%=ii("hit")%></font></b></td>
</tr>
<% ii.Movenext
i = i + 1
Loop
%><font color="#000080"> </font> </font>
</table>
</td>
</tr>
</table>
<p style="margin-top: 5 margin-bottom: 5"></p>
<table border="0" cellspacing="1" width="180" id="AutoNumber4" bgcolor="#F1F1F1" height="42">