[xedition]

Dayanamadım yazdım hemen ufak bir şey.

<%
Dim sayfasayisi : sayfasayisi = 'Burada toplam sayfa sayısını belirtilecek
Dim sayfa : sayfa = 'Burada şu an hangi sayfada isek o değer verilecek

IF sayfasayisi > 5 Then
	IF sayfa > 2 Then
		%>
		<a href="default.ASP?sayfa=<% = 1 %>">ilk sayfa</a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa - 2 %>"><% = sayfa - 2 %></a>
		&nbsp;
		<a href="default.aso?sayfa=<% = sayfa -  1 %>"><% = sayfa - 1 %></a>
		&nbsp;
		<% = sayfa %>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa + 1 %>"><% = sayfa + 1 %></a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa + 2 %>"><% = sayfa + 2 %></a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfasayisi %>">Son Sayfa</a>
		<%
	Elseif sayfa = 2 Then
	 	%>
		<a href="default.ASP?sayfa=<% = 1 %>">ilk sayfa</a>
		&nbsp;
		<% = sayfa %>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa + 1 %>"><% = sayfa + 1 %></a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa + 2 %>"><% = sayfa + 2 %></a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfasayisi %>">Son Sayfa</a>
		<%
	Elseif sayfa = 1 Then
		%>
		<% = sayfa %>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa + 1 %>"><% = sayfa + 1 %></a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfa + 2 %>"><% = sayfa + 2 %></a>
		&nbsp;
		<a href="default.ASP?sayfa=<% = sayfasayisi %>">Son Sayfa</a>
		<%
	End IF
	
Else	'5 sayfadan az sayfa var
	For x = 1 to sayfasayisi
		Response.Write("<a href=""default.ASP?sayfa="& x &">"& x &"</a>")
		Response.Write("&nbsp;")
	Next
	
End IF
%>

Kolay gelsin.