asp de küçük bir yardım lazım :S

asp de bir site yaptım

resimleri ve açıklamaları 4 tane yan yana yazdırdıktan sonra alta geçmesini istedim

3 tane alta geçtikten sonr yani 12 veri yazdırdık tan sonra (3 tane 4erli tablo dan bahsediyoruz) sayfa sınırı bu olsun dedim ve diğerlerini diğer sayfaya atsın dedim

buraya kadar herşey normal ama sayfa işinde işler değişiyor sayfa 2 ye geçtiğimde (index.asp?shf=2) diğer 12 veriyi yazdırması gerekirken ilk sayfadaki 4 erli 3 sırayı alıyor altına 1 sıra 4 lü ekliyor ben ise diğer sayfada bütün 12 veriyi listelemesini istiyorum kafam karıştı halledemedim bir türlü :S nasıl yaparız bunu bir fikri olan varmı ??

tam üzerinde düşünmedim ama söyle bi dene
diğer 12 veriyi yazdıracağın zaman kaydı o sıraya gönder.
mesala index.asp?shf=2 den gelen sayfa 2 ise
kayitsirasi=(shf-1)*12 'bu 12. sırayı verir.
Rs.Move(kayitsirasi)
if Not Rs.Eof then ' Eğer bu kayıt varsa döngüyle diğer 12 veriyi yazdır
for i=1 to 12 'dizi uzunluğu 12 veriyi geçmesin
if Rs.Eof then Exit For End If

walla beceremedim aga :S

Kendi bi sitem için buna benzer bi tabloloma bende yapmıştım ama benim ki biraz farkılıydı senkininde öyle olduğunu düşündüm.Cevabı pek düşünmeden yazdım kendi sitem için yazdığım kodları biraz değişrirdim. Aşağıdaki linke bi bak istediğin böyle bişeyse kodları siteye yükleyim. değilse kodları buraya yaz bakalım
http://www.comtrweb.net/resim.asp

istediğim böyle bir şey işte

bu arada pm attım

<% /////// Db Baglanti Baslangici \\\\\\\\ %>

<%
Set bag = Server.CreateObject("ADODB.Connection")
bag.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM tablo order by id desc"
rs.Open sql, bag, 1, 3 'db açtık devam edelim...
Server.ScriptTimeOut = 50
PageTimeOut = 50
%>

<% /////// Db Baglanti Sonu \\\\\\\\ %>

<% /////// Resim Sayısını Belirleme ve Resim Gösterme Bitisi \\\\\\\\ %>

<table border="0"><tr><td align="center">
<table><tr>
<%
s = Request.QueryString("s" )
If s = "" Then s = "1"
rs.PageSize = 16
rs.AbsolutePage = s
ss = rs.PageCount
For i = 1 To 16
If rs.Eof Then Exit For %>
<td width="125">
<img src="<%=Rs("img" ) %>" width="100" height="100"></td>
<%If i mod 4 =0 Then response.write("</tr><tr>" ) %>
<% rs.Movenext
Next %>
</tr>
</table>

<% /////// Resim Sayısını Belirleme ve Resim Gösterme Bitisi \\\\\\\\ %>

<% /////// Sayfalama Baslangici \\\\\\\\ %>

<br><center><font size="1" face="verdana">
<%
Response.Write "<b>Page:</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=""default.asp?s=" & g & """>" & g & "</a></b> "
End If
Next
%>

<% /////// Sayfalama Bitisi \\\\\\\\ %>

</td></tr></table>
</td></tr></table>

------o------

Sanırım istediğin üst kısımda yazdığım gibi birşey işini görür. Editlemek gereken kısımları koyu yazdım. Db yolunu kendince ayarlayıp img değişkeninide kendince editlersin. Bir sayfada 4 sütun olmak üzere 16 kayıt gösterir. sayfa alt kısmında default.asp yazan kısmını sayfa ismi olarak değiştirmelisin.
- - - -
- - - -
- - - -
- - - -
1 2 3 4
Şeklinde gösterir. Alttaki 1 2 3 4 sayfa sayısıdır. Tıklayınca ikinci sayfadaki resimler gelir.
Kolay gelsin.

herkese yardımlarından dolayı teşekkür ederim

aslında kendime göre bir çözüm bulmuştum ama biraz ilginç bir çözüm oldu hata verme ihtimali yüksek

sweet senin kodları inceledim ve senin ki daha mantıklı geld ama deneyemedim yurda gidince deneyceğim localden bakarım başarılı olur büyük ihtimal saolasın.

denedikten sonr yine rahatsız ederim sizi

sweet saolasın hocam tam istediğim şeyi yapabildim kodlarla oynayarak tekrar teşekkürler..

Afiyet olsun. Beğenmene sevindim.