Asp Veriyi Alt Alta Cekmek

29/Haz/08 23:41

Kısayol

Şikayet

Özel Mesaj

Aloryan

Kayıt Tarihi: 07/Mart/2007

merhaba murit ler simdi sizde asp konusunda yardım isticem

ben asp den anlamam bi işe giriştim tablo yanyana 2 tane icerik cekiyor ben bu iceri alt alta ceksin istiyorum kodu eklicem bi yardım edin bakim. birde 2 degilde 5 tane icerik cektirebilirsek de güzel olucak.

<%
    strSQL = "SELECT * FROM ilanlar WHERE onay = TRUE and flash = TRUE ORDER BY gunluk_sayac ASC"
    Set ks1 = baglanti.Execute(strSQL)
%>
<table width="631" align="center" cellpadding="0" cellspacing="0" class="tborder">
<tr>
    <td width="631"><table width="631" cellspacing="3">
      <tr>
        <td height="18" colspan="4" align="center" bgcolor="#669900" width="623"><strong class="baslik">Flaş İlanlar</strong> </td>
        </tr>
      <tr>
    <%
            For flash = 1 to 2
            if ks1.EOF Then Exit For
        %>
        <%
            strSQL = "SELECT * FROM ilan_resimleri where ilan_id='"+CSTR(ks1("id"))+"'"
            Set ks2 = baglanti.Execute(strSQL)
        %>
        <td width="1" valign="top">
        <% if ks2.EOF then %>
        <img src="images/no_image.jpg" width="50" height="50">
        <% Else %>
        <img src="images/onizleme_<%=ks2("resim")%>" width="50" height="50">
        <% End if %></td>
        <td width="395" valign="top">
        <strong><%=ks1("baslik")%></strong>
        <br />
        İl: <%=ks1("il")%>
        <br />
        İlçe: <%=ks1("ilce")%>
        <br />
        Semt: <%=ks1("semt")%><br />
        <strong>Fiyat:</strong> <%=para_bol(ks1("fiyat"))%> YTL
        <br />
        [<a href="default.asp?icerik=14&ayrinti=<%=ks1("id")%>">Detaylar</a>]        </td>
        <%
            ks1.MoveNext
            Next
        %>
      </tr>
      <tr>
        <td colspan="4" align="center" width="623">
                </td>
        </tr>
    </table></td>
</tr>
</table>
<%
    ks1.Close
    ks2.Close
    Set ks1 = Nothing
    Set ks2 = Nothing
%>

Her zaman derim = Bilmemek Ayıp deil Ögrenmemek Ayıp

Alıntı yap

30/Haz/08 01:34

Kısayol

Şikayet

Özel Mesaj

Aloryan

Kayıt Tarihi: 07/Mart/2007

ben vereyim cevapı belki biride benim gibi ararsa bulsun

      <%
    strSQL = "SELECT * FROM ilanlar WHERE onay = TRUE and flash = TRUE ORDER BY gunluk_sayac ASC"
    Set ks1 = baglanti.Execute(strSQL)
%>
<% do while i<6 and not ks1.eof %>
        <%
            strSQL = "SELECT * FROM ilan_resimleri where ilan_id='"+CSTR(ks1("id"))+"'"
            Set ks2 = baglanti.Execute(strSQL)
        %>

        <table border="0" width="687">
    <tr>
        <td width="201"><a href="default.asp?icerik=14&ayrinti=<%=ks1("id")%>"><% if ks2.EOF then %>
        <img src="images/no_image.jpg" width="150" height="150">
        <% Else %>
        <img src="images/onizleme_<%=ks2("resim")%>" width="150" height="150">
        <% End if %></a></td>
        <td width="476" bgcolor="#F7F7F7">
                <strong><%=ks1("baslik")%></strong>
        <br />
        İl: <%=ks1("il")%>
        <br />
        İlçe: <%=ks1("ilce")%>
        <br />
        Semt: <%=ks1("semt")%>   Açıklamalar : <%=ks1("aciklama")%> <br />
        <strong>Fiyat:</strong> <%=para_bol(ks1("fiyat"))%> YTL
        <br />
        [<a href="default.asp?icerik=14&ayrinti=<%=ks1("id")%>">Detaylar</a>]

Her zaman derim = Bilmemek Ayıp deil Ögrenmemek Ayıp

Alıntı yap

30/Haz/08 01:41

Kısayol

Şikayet

Özel Mesaj

WALLACEs

Kayıt Tarihi: 17/Eylül/2005

kodlarını eksik attın galiba bu uygulama çalışmaz do while 'ın loop'u yok

TBT'ye Mescit istiyoruz.

Alıntı yap