abmert

aşağıdaki kodlar gayet güzel çalışıyor. yanyana yatay olarak 5 kayıda kadar gösteriyor ve alta doğru devam ediyor.
ANCAK burada sayfalama olayına giremedim. yani database içerisinde ne kadar kayır varsa hepsini listeliyor. ben diyorum ki sayfada 10 tane resim gösterildikten sonra diğerlerini alt tarafında yazacak olana (Sayfa : 1 | 2 | 3 | 4 ) gibi linklere basınca diğer sayfaya gitmesi.
arkadaşlar link vermeyin. diğer arkadaşlar da faydalansın. biliyorsanız kod yardımında bulunun rica ediyorum. iş olsun diye bildiğiniz bir linki vermeyin. tşk.


<table id="MyDataList" style="BORDER-RIGHT: activeborder 0px; BORDER-TOP: activeborder 0px; FONT-SIZE: 10pt; BORDER-LEFT: activeborder 0px; BORDER-BOTTOM: activeborder 0px; FONT-FAMILY: Tahoma; BORDER-COLLAPSE: collapse"
borderColor="activeborder" cellSpacing="0" cellPadding="0" rules="all" border="0">
<%
Dim bag
bag=server.createobject("adodb.connection")
bag.open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("/realgallery/vtabm.mdb") & "")

dim rs
rs=server.createobject("adodb.recordset")
rs.open("Select * from imgs", bag, 1, 3)
%>
<tr>
<%

do while not rs.eof
Dim n
n = 0
do while n < 5 and NOT rs.eof

%>
<td height="5">
<table style="BORDER-COLLAPSE: collapse" borderColor="silver" cellSpacing="10" cellPadding="0"
border="0">
<tr height="170">
<td width="130" bgColor="whitesmoke" height="130">
<P align="center"><IMG height="72" src='<%=rs("img_url").value%>' width="110" border="0">
</P>
</td>
</tr>
<tr>
<td><FONT size="1"><b>
<%=rs("img_name").value%>
</b></FONT>
<br>
<%
dim rs2
rs2=server.createobject("adodb.recordset")
rs2.open("Select * from users where user_id=" & rs("user_id").value & "", bag, 1, 3)
%>
<FONT size="1">Gön:
<%=rs2("user_kullanici_adi").value%>
</FONT>
<%
rs2.close()
%>
<br>
<FONT size="1">Ebat:
<%=rs("ebat").value%>
</FONT>
<br>
<FONT size="1">Hit:
<%=rs("hit").value%>
</FONT>
</td>
</tr>
</table>
</td>
<%
rs.Movenext
n = n + 1
loop
%>
</tr>
<%

loop
rs.close
rs=nothing
bag.close
bag=nothing
%>
</table>

abmert

arkadaşlar yardım bekliyorum ....

abmert

r baktınız bi yazmadınız mı. bir fikir bilen vermediniz. alcanız olsun....

:::izmir:::

FSO ile çalışan çok daha pratik bi resim galerisi veririm sana istersen.Özele yazarsın cevb

abmert

kardeş. bunun için fso kullanımı nasıl olacak. bu verdiğim kod çalışıyor fakat. sayfalama olayına giremedim. belki de döngü de bir hata var diyeceğim ama.

do while not rs.eof

loop

şeklinde yaptım .

for ....next döngüsü içinde nasıl yapabilirim.