Sırasıyla yazıyorum arkadaşım. Bilgileri aynen ekle çalışacak.

-- database bağlantısı ---

<%
s = Request.QueryString("s")
If s = "" Then s = "1"
rs.PageSize = 10
rs.AbsolutePage = s
ss = rs.PageCount
For i = 1 To rs.PageSize
If rs.EOF Then Exit For %>

--- databaseden verileri çekiyoruz ---

<%
Response.Write "<b>Sayfa:</b>"
For g = 1 To ss
If g = CInt(s) Then
Response.Write "<b>" & g & "</b> "
Else
Response.Write "<b><a style=""text-decoration: none"" href=""sayfa.asp?s=" & g & """>" & g & "</a></b> "
End If
Next
%>


Not: Her sayfada 10 tane kayıt göstererek sıralayacaktır.
İşine yaraması dileğiyle. Kolay gelsin.
Amacım paylaşım. Biliyorsam yardımcı olurum. Krediye gerek yok arkadaşım. Çalışmazsa hata mesajını yazarsan yardımcı olmaya çalışırım.