Errore misterioso nel codice

[franz79]

Salve a tutti: ho creato una pagina Asp che si connette ad un db MSSQL e poi estrae i dati per paginarli, ma mi dà errore, e sinceramente non capisco dove!.

Vi posto il codice sperando che qualcuno possa aiutarmi:

<%
Dim conn                  
Dim strnome
Dim iPageSize            
Dim iPageCount        
Dim iPageCurrent      
Dim strOrderBy         
Dim strSQL                 
Dim RS                        
Dim iRecordsShown 
Dim MioArray
iPageSize = 7
MioArray=Request("ricerca")
If Request.QueryString("page") = "" Then 
                iPageCurrent = 1 
Else 
                iPageCurrent = CInt(Request.QueryString("page")) 
End If 
If Request.QueryString("order") = "" Then 
                strOrderBy = "id" 
Else 
                strOrderBy = Request.QueryString("order") 
End If
Conn = "Trusted_Connection=no;Provider=SQLOLEDB;Data Source=82.104.xx.xxx;Initial Catalog=nomedb;User ID=utente;password=password"
Set rs = Server.CreateObject("ADODB.recordset")
rs.Open sql, Conn
sql = "SELECT * FROM IC_FABB"
RS.Open sql, conn, adOpenKeyset 
RS.PageSize = iPageSize 
RS.CacheSize = iPageSize 
iPageCount = RS.PageCount 
If iPageCurrent > iPageCount Then iPageCurrent = iPageCount 
If iPageCurrent < 1 Then iPageCurrent = 1 
If iPageCount = 0 Then
Response.Write("Nessun record visualizzato")
Else 
                RS.AbsolutePage = iPageCurrent 
iRecordsShown = 0 
Do While iRecordsShown < iPageSize And Not RS.EOF 
%>
<% response.write (rs("C_COMUNE") %>
<%
iRecordsShown = iRecordsShown + 1
RS.MoveNext
Loop 
End If 
RS.Close 
Set RS = Nothing 
Conn.Close %>
<% 
If iPageCurrent <> 1 Then 
%> 
<font face="Arial" size="2">Indietro</font>
<% 
End If 
%>
<% 
If iPageCurrent < iPageCount Then 
%> 
      <font size="2" face="Arial"> 
Avanti 
      </font>
 <% 
End If 
%>

[X_Gold*]

che errore ti da ? (cosi evito di leggere tutto il code )

[rixx]

Originariamente inviato da X_Gold*
che errore ti da ? (cosi evito di leggere tutto il code )

ma non hai capito che è misterioso?

[X_Gold*]

Originariamente inviato da rixx
ma non hai capito che è misterioso?

[franz79]

Ok, mi dà purtroppo un generico errore
Http 500
Impossibile visualizzare la pagina

[rixx]

strumenti---opzioni internet---avanzate---spunta> visualizzare errori http brevi

[franz79]

Sì sì è spuntato ma è uguale...

Mi sono accorto che manca una parentesi a

response.write ("rs(C_COMUNE"))

ma l'ho chiusa e non va uguale

[franz79]

Ho snellito il codice e lui mi dà questo errore:

ADODB.Recordset error '800a0cb3'

Il set di record corrente non supporta i segnalibri. Potrebbe trattarsi di una limitazione del provider o del tipo di cursore selezionato.

Cosa significa? Che non posso paginare?

[X_Gold*]

Originariamente inviato da franz79
Sì sì è spuntato ma è uguale...

Mi sono accorto che manca una parentesi a

response.write ("rs(C_COMUNE"))

ma l'ho chiusa e non va uguale

response.write (rs("C_COMUNE"))

[franz79]

Sì, scusa, ho sbagliato a scrivere qui ma sul codice è giusto.

Il fatto è che il server mi manda quel messaggio di errore...

Non capisco perché