Gönderen: 01-Haziran-2009 Saat 20:34 | Kayıtlı IP

Merhaba arkadaşlar,

Access den verileri cekip 2 tane yan yana ve alt alta sınırsız olmak uzere sıralamak istiyorum. Örneğin:

1.ürün     2.ürün

3.ürün     4.ürün

5.ürün     6.ürün                 

şeklinde olması için çalışıyorum. ama aşağıdaki kodlarla sadece alt alta oluyor. Yardımcı olursnaız sevinirim. İyi çalışmalar...

  <table width="599" border="0">
    <%
Set db = Server.CreateObject("adodb.connection" )
db.open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.Mappath("makam_grubu.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
Sorgu = "Select * from urun order by urunid asc"

rs.Open "urun",db %>
               <% while not rs.EOF
  urun_ismi=rs("urun_ismi")
 %>
        <tr>

          <td width="267" height="23" align="center">
<img src="resim/<%=rs("resim")%>" border="0" alt="" width="150" height="100"/><br />
<%response.Write(urun_ismi)  %></td>
       
<td width="322"><br /></td>
        </tr>
      <% rs.moveNext
 wend
 rs.close
set rs=nothing
db.close
set db=nothing
%>   </table>

Gönderen: 02-Haziran-2009 Saat 12:07 | Kayıtlı IP

Arkadaşlar resimlerde aşağıdaki gibi düzelterek bu sorunu cozdum fakat urun isimlerinde hala sorun var. Butun resimleirn altına ilk urun ismini yazıyor. Bunu acaba nasıl çözerim?

  <%
Set db = Server.CreateObject("adodb.connection" )
db.open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.Mappath("makam_grubu.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
Sorgu = "Select * from urun order by urunid asc"

rs.Open "urun",db %>

   <table width="599" border="0">
  
               <% while not rs.EOF
  urun_ismi=rs("urun_ismi")
 %>
 <%
For i=1 to 5
If Rs.Eof then exit for
%>

        <tr>
<%
For j=1 to 2
If Rs.Eof then Exit For
%>

          <td height="10" align="center">
<img src="resim/<%=rs("resim")%>" border="0" alt="" width="150" height="100"/><br />
<%response.Write(urun_ismi)  %><br /><%=i & "," & j%></td>
<%
Rs.Movenext
Next
%>
   </tr>
        
   
  <%
  next
 wend
 rs.close
set rs=nothing
db.close
set db=nothing
%>
    </table>