Tipo di automazione non supportato in VBScript

[wegawhite]

Ciao.

Non capisco il motivo di quest'errore su una query in mysql (in access funziona):

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A01CA)
La variabile utilizza un tipo di automazione non supportato in VBScript

Il codice è il seguente, in rosso la riga dell'errore:

sql = "select count(id) as strvar from tbl_post where connected = 0" 
set rs = objconn.Execute(sql)
strvar = int(rs("strvar"))

[Roby_72]

sql = "select count(id) from tbl_post where connected = 0" 
set rs = objconn.Execute(sql)
strvar = rs(0)
set rs = nothing
if strvar &"[]" = "[]" then strvar = 0

Roby

[wegawhite]

grazie ma non va, riga rossa dà errore:

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:

[Roby_72]

Mi dici a che serve?
<%for t = 0 to fix((strVar-1)/10)%>

strVar contiene un numero intero da 0 a ....

Roby

[wegawhite]

E' per paginare i records...

[cworld]

la variabile strvar viene riconosciuta come numero o come un'insieme di caratteri numerici?

[wegawhite]

al momento ho risolto con un:

strVar = Cint(rs("strVar"))

e funziona, ma non so se è esatto....

[Dirk Pitt]

Ma con MySql pe rpaginare non c'è il comodo LIMIT?

[santino83]

Originariamente inviato da Dirk Pitt
Ma con MySql pe rpaginare non c'è il comodo LIMIT?

come fai a sapere che usa MySql? hai preso la palla di vetro ad optime?


edit: cavolo mi era sfuggita la riga iniziale eh si in mysql c'è lo stracomodo limit

[Dirk Pitt]