Kan du inte skriva hur du vill ha resultat lite grafiskt ;)
Hur skulle man kunna ändra denna kod för att visa en länk till första resp. sista sidan samt för att endast visa 10 sidor i taget med 10 resultat på varje? Variabeln intRecordsPerPage bestämmer antalet resultat på varje sida. Och till det sista, naturligtvis ytterligare en länk så att man kan bläddra fram nästa 10 sidor/förra 10 sidor typ liksom bah.
If intTotalFilesFound > intRecordsPerPage Then
Response.Write("<span class=""text1"">Pages: </span>")
If intNumFilesShown > intRecordsPerPage Then
Response.Write("<span class=""text1""><a href=""search.asp?search=" & Replace(strSearchWords, " ", "+") & "&mode=" & Request.QueryString("mode") & "&results=" & intFileNum - intRecordsPerPage & """>Prev</a> | </span>")
End If
If intTotalFilesFound > intRecordsPerPage Then
For intPageLinkLoopCounter = 1 to CInt((intTotalFilesFound / intRecordsPerPage) + 0.5)
If intFileNum = (intPageLinkLoopCounter * intRecordsPerPage) - intRecordsPerPage Then
Response.Write("<span class=""text1"">" & intPageLinkLoopCounter & " | </span>")
Else
Response.Write("<span class=""text1""><a href=""search.asp?search=" & Replace(strSearchWords, " ", "+") & "&mode=" & Request.QueryString("mode") & "&results=" & (intPageLinkLoopCounter * intRecordsPerPage) - intRecordsPerPage & """>" & intPageLinkLoopCounter & "</a> | </span>")
End If
Next
End If
If intTotalFilesFound > intNumFilesShown Then
Response.Write("<span class=""text1""><a href=""search.asp?search=" & Replace(strSearchWords, " ", "+") & "&mode=" & Request.QueryString("mode") & "&results=" & intNumFilesShown & """>Next</a><br><br></span>")
Else
Response.Write("<span class=""text1""><br><br></span>")
End If
End If

