Asp"De Kayıtları Yan Yana Sıralamak
-
<% if request("x")="1" then %>
<% sayfa = Request.QueryString("sayfa")
if sayfa="" then
sayfa=1
end if %><%kategori = Request.QueryString("kategori")
set haber = Server.CreateObject("Adodb.Recordset")
sorgu = "select * from kategori where kategori = " &kategori& ""
haber.open sorgu,bag,1,3%>
<%set haber = Server.CreateObject("Adodb.Recordset")
sorgu = "select * from haber where kategori = " &kategori& " order by id desc"
haber.open sorgu,bag,1,3
toplam_haber = haber.recordcount%>
<%if haber.eof then%>
<%
else
haber.pagesize = 18
haber.absolutepage = sayfa
git = haber.pagecount
for i=1 to haber.pagesize
if haber.eof then exit for %>
<a title="<%=haber("baslik")%>" href="javascript:void%20window.open('detay.asp?x=2&kategori=<%=haber("kategori")%>&id=<%=haber("id")%>','','width=705,height=560,scrollbars=yes,resizable=yes')">
<%=haber("ufakresim")%></a>
<% haber.MoveNext
Next %>
<p align="center">Sayfa : <%
for y=1 to git
response.write " <a href=""?x=1&kategori="&kategori&"&sayfa="&y&""">"&y&"</a>"
next
end if
%></p>
</div>
<%end if%>
Arkadaşlar yukarıdaki kodu kullanarak ufakresim alanını yan yana sıralıyorum.Ancak ufakresim alanını table içine alarak yan yana nasıl sıralayabilirim.Table içine alınca alt alta sıralıyor. -
yukarılara çıkartayım bari :|
-
Yukarı çıkarsan ne olacakki hoca herkes geyik peşinde...En azından çoğu.
-
for döngüsünün önüne yani döngü dışına <table> yap
for döngüsünün içine
<td>
<a title="<%=haber("baslik")%>" href="javascript:void%20window.open('detay.asp?x=2&kategori=<%=haber("kategori")%>&id=<%=haber("id")%>','','width=705,height=560,scrollbars=yes,resizable=yes')">
<%=haber("ufakresim")%></a>
</td>şeklidne yap yine nextin altına bi yere yani dongu dışına </table> olarak kapatıp dene..
eğer olursa sonradan table ve td özelliklerini kafana göre değiştirirsin.
-
Hoca senin belirttiğin şekilde oldu ancak 50 tane resim var 50 tane resim yan yana geldi.sayfa sağa doğru kayıyor 1000 tane resim koysam 1000 tane resim yan yana gelecek.ben bi sayfa bitince bir alt satıra geçsin istiyorum.
-
for i=1 to haber.pagesize
if haber.eof then exit forif i mod 4=0 then
Response.Write "</tr><tr>"
Else
Response.Write ""
end if
%><td>
<a title="<%=haber("baslik")%>" href="javascript:void%20window.open('detay.asp?x=2&kategori=<%=haber("kategori")%>&id=<%=haber("id")%>','','width=705,height=560,scrollbars=yes,resizable=yes')">
<%=haber("ufakresim")%></a></td>
<% haber.MoveNext
Next %>birde kodların ta en başına ve en sonuna table ekle alpin dediği gibi
