Ciao.

Non mi era mai successo, ma è uno script di paginazione che utilizzo su diverse pagine ASP senza problemi.

Solo su questa ASP indica pagine che non contengono nessun record; cioè si visualizzano i 5 records estratti dalla query su un'unica pagina e poi si vedono le pagine 2,3,4 e 5 nelle quali si clicca ma non si visualizza niente, dove sbaglio?:

codice:
Function excess(argValue)
	if not (int(argValue) = argValue) then argValue = int(argValue)+1		
	excess = argValue
end Function


pageSize = 5

if(len(Request.QueryString("pagina"))=0)then
  currentPage = 1
else
  currentPage = CInt(Request.QueryString("pagina"))
end if


   SQLstring = " SELECT "
   SQLstring = SQLstring & " COUNT(*) AS CNT, "
   SQLstring = SQLstring & " SUM(OreImpiegoRisorsa) AS strOreImpiegoRisorsa, "
   SQLstring = SQLstring & " SUM(MinutiImpiegoRisorsa) AS strMinutiImpiegoRisorsa "
   SQLstring = SQLstring & " FROM tabella "
   SQLstring = SQLstring & " WHERE 1 = 1 "
   SQLstring = SQLstring & " AND IMPIEGORISORSA <> '-' "
   SQLstring = SQLstring & " LIMIT " & (currentPage - 1) * pageSize & ", " & pageSize

   set rec = cn.execute(SQLstring)
   recordCount = rec("CNT")
   pageCount = excess(clng(recordCount) / (clng(pageSize)))
   rec.Close()

   for i=1 to pageCount
      Response.Write("" & i & " ")
   next