0
Kayıt Ol

ASP Tablo

4

●

953

  • 24-06-2009, 17:45:33
    #1
    €mR@H
    €mR@H
    Bu aşağıdaki kod beni yedi bitirdi yahu Tabloları sıfırdan yaptım yine olmadı yine olmadı...

    Sorunum şu : Aşağıdaki resimde alt alta dizili ben bunu yan yana dizmeye çalışıyorum


    <%
    rs.movenext
    loop
    %>

    bu kodu sağ tabloya yerleştiriyorum ya çalışımıyor yada değişen birşey olmuyor.






    Sitede yerleşimi 

    <%
set rs = server.createObject("adodb.recordset")
sql="Select top 2 * from rs  order by id desc"
rs.open sql,conn,1,3

set rs2 = server.createObject("adodb.recordset")
sql="Select * from ayar"
rs2.open sql,conn,1,3
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<title>Haberler</title>
<style fprolloverstyle>A:hover {color: #800000; font-family: Tahoma; font-size: }
</style>
</head>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="00" marginwidth="0" marginheight="0" link="#808080" vlink="#808080" alink="#808080">
<table border="0" width="62%" id="table1" cellspacing="0" cellpadding="0" height="59%">
<tr>
        <td width="68%" height="122" valign="top">
      <div align="center">
            <table border="0" width="752" id="table3" cellpadding="0" style="border-collapse: collapse" height="23">
              <tr>
                <td width="757" height="19" valign="top"><p align="right"><font face="Verdana" size="1"><%=rs2("siteadres")%></font></td>
              </tr>
            </table>
            <table width="741" height="262" border="0" cellpadding="0" id="table2" style="border-collapse: collapse">
              <tr>
                <td height="1" colspan="2" style="border-bottom-style: none; border-bottom-width: medium"><font face="Verdana" size="1"> <img border="0" src="https://www.r10.net/images/empty.gif" width="1" height="1"></font></td>
              </tr>
              <%if rs.eof then%>
              <tr>
                <td height="12" colspan="2"><font face="Verdana" size="1" color="#800000">Haber Bulunamadı</font> </td>
              </tr>
              <%end if%>
              <% do while not rs.eof%>
              <tr></tr>
              <tr>
                <td width="244" height="200"><img border="0" src="https://www.r10.net/images/empty.gif" width="1" height="1">
                    <table border="0" width="244" id="table5" cellpadding="0" height="30%" bgcolor="#FFFFFF">
                      <tr>
                        <td width="124"><p align="left"><font face="Verdana" size="1"><b><font color="#800000">Tarihi :</font></b>&nbsp;<%=rs("tarih")%></font></td>
                        <td width="114"><div align="left"><font face="Verdana" size="1"><font color="#800000"><b>Yayın :&nbsp;</b></font>
                                  <%
                            if rs("kat")="1" then
                            response.write "Akşam"
                            elseif rs("kat")="2" then
                            response.write "Bugün"
                            elseif rs("kat")="3" then
                            response.write "Sabah"
                            elseif rs("kat")="4" then
                            response.write "Milliyet"
                            elseif rs("kat")="5" then
                            response.write "Hürriyet"
                            elseif rs("kat")="6" then
                            response.write "Star"
                            elseif rs("kat")="7" then
                            response.write "Radikal"
                            elseif rs("kat")="8" then
                            response.write "BT Haber"
                            elseif rs("kat")="9" then
                            response.write "Dünya"
                            elseif rs("kat")="10" then
                            response.write "Activeline"
                            elseif rs("kat")="11" then
                            response.write "Gözlem"
                            elseif rs("kat")="12" then
                            response.write "Cumhuriyet"
                            elseif rs("kat")="13" then
                            response.write "Vatan"
                            elseif rs("kat")="14" then
                            response.write "Yeni Şafak"
                            elseif rs("kat")="15" then
                            response.write "Fotomaç"
                            end If
                            
                            %>
                        </font></div></td>
                      </tr>
                      <tr>
                        <td colspan="2"><img border="0" src="haberresim/<%=rs("resim")%>" width="213" height="136"></td>
                      </tr>
                      <tr></tr>
                      <tr>
                        <td colspan="2"><font face="Tahoma" size="1"><span style="text-decoration: none; font-weight:700"><font color="#000000"><a title="<%=rs("aciklama")%>" href="habergoster.asp?id=<%=rs("id")%>"><span class="box"><span style="text-decoration: none"><font color="#000000"><%=rs("baslik")%> </font> </span> </span> </a> </font> </span> </font> </td>
                      </tr>
                  </table></td>
                <td width="498" height="200">
<%
rs.movenext
loop
%>
</td>
              </tr>
            </table>
      </div></td>
  </tr>
<tr></tr>
    <tr></tr>
</table>

<p>&nbsp;</p>
</body>

</html>
  • 24-06-2009, 18:43:20
    #2
    TaGo
    TaGo
    biliyorum ama anlatamıyorum beynim pörsüdü bu gün.

    google amcaya ASP ile yan yana sıralama yazıp arat
    maxiasp.com 'da 2-3 örnek olacak çok basit mantığı var beceremezsen yarın sabah söz anlatırım
  • 24-06-2009, 19:14:55
    #3
    Peksoft
    Peksoft
    Sizi taş devri kodırları siziii.
    Bırakın artık şu table'yi, css diye bişey icat olmuş, div bulunmuş.

    <%
do while not asd.eof
%>
<div style="float:left;width:200px;"><%=asd("baslik")%></div>
<%
asd.movenext:loop
%>
    @€mR@H; sana tavsiyem biraz css'i araştır, gerçekten harika bişey.
    Sayfa kaynağında, resim kenarı, yazı fontu, rengi, boyutu, stili, vs... bir çok şeyi halledince kaynak çok kalabalıklaşıyo ama css ile css dosyasında sitede kulanacağın tüm stilleri yazarak kaynak'ta <div class="hede"> gibi kısacık bi' kodla halledebilirsin.

    Örneğin;
    Css,
    .ornek {
font-size: 15px;
font-family: arial;
color: lightgreen;
background-color: #f3f3f3;
width: 250px;
height: 300px;
}
    Html,
    <div class="ornek">Örnek</div>
    Bak basit bi' örnekle bile ne kadar tasarruf ettik.

    Bu yazıyı okuduktan sonra burayla devam edebilirsin.
  • 26-06-2009, 11:48:03
    #4
    €mR@H
    €mR@H
    @peksoft çok saol fakat tablolarda hallettim ben o işi saçma bi hata yapmışım düzeltince oldu ama bu demek değilki sorunlarım bitti Birde tabloları 4 den sonra ağaıya atacak şekilde bir mod yazmam gerekecek yukarıdaki koda göre bunu nasıl yapacağım konusunda bir bilgisi olan varsa çok sevinirim bunuda hallettimmi bu iş burda biter
  • 27-06-2009, 03:15:51
    #5
    Blus
    Blus
    arkadaşım eger mysql ile yapıyorsan tam senlik bir kodum var.

    <table width="900" align="center" border="0" cellspacing="0" cellpadding="0">
    <tr>
    <%
    KayitSayisi = 5

    If Request.QueryString("s") <> "" Then
    Sayfa = CInt(Request.QueryString("s"))
    Else
    Sayfa = 3
    End If

    Set SQLTop = Mysql.Execute("SELECT COUNT(id) FROM galeri")
    TopKayit = SQLTop(0)

    set rs = Mysql.Execute("SELECT * FROM galeri ORDER BY id DESC LIMIT "&(KayitSayisi*Sayfa)-(KayitSayisi)&","& KayitSayisi&"")
    i=0
    do while not rs.eof
    i=i+1
    %>
    <td><table width="225" border="0" cellspacing="0" cellpadding="0">
    <tr>
    <td class="detay"><%=rs("adres")%></td>
    </tr>
    </table></td>
    <%
    if i = 4 then
    %>
    </tr>
    <tr>
    <%
    i=0
    end if
    rs.movenext
    loop
    rs.close
    set rs=nothing
    %>
    </tr>
    <tr>
    <td>
    <%
    If CInt(TopKayit) > CInt(KayitSayisi) Then
    SayfaSayisi = CInt(TopKayit) / CInt(KayitSayisi)
    If InStr(1,SayfaSayisi,",",1) > 0 Then SayfaSayisi = CInt(Left(SayfaSayisi,InStr(1,SayfaSayisi,",",1))) + 1

    If SayfaSayisi > 1 Then
    For i=1 To SayfaSayisi
    Response.Write "<a href=""?s=" & i & """ style=""color:#0000FF"">" & i & "</a> "
    Next
    End If
    End If
    %>
    </td>
    </tr>
    </table>