grazie ma non va, riga rossa dà errore:

codice:
sql = "select count(id) as strVar from tbl_post where connected = 0" 
set rs = objconn.Execute(sql)
strVar = rs(0)
set rs = nothing
if strVar &"[]" = "[]" then strVar = 0
%>
      <tr>
        <td width="36" bgcolor="#EFEFDE" class = "text">
          </td>
        <td width="339" bgcolor="#EFEFDE" colspan = "5" class = "text">
          <p align="right"><font color="#000000">Pagina</font><font color="#1868B0"> 
<%for t = 0 to fix((strVar-1)/10)%> 
<%if t=(s/10) then%><%end if%><%=t+1%><%if t=(s/10) then%><%end if%>
<%next%>

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A000D)
Tipo non corrispondente
:master: