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