Duyuruyu Kapat
Facebook Gözat
Twitter Gözat

Asp Sayfalama ?

Konu, 'ASP' kısmında qupal tarafından paylaşıldı.

  1. qupal

    qupal Üye

    Kayıt:
    9 Mart 2007
    Mesajlar:
    41
    Beğenilen Mesajlar:
    0
    Merhaba Arkadaşlar Asp Yeni yeni başladım...

    vt'nındaki Veriler ilk 100 veri sıralanıyor ama 2 nci sayfaya bir türlü gecemedim..

    Nerede hata yapıyorum bilmiyorum..
    yardımcı olursanız cok sevinirim...

    Kodlar:
    PHP:
    <html>
    <
    head>
    <
    meta HTTP-EQUIV="Page-Exit" content="revealTrans(Duration=2.0,Transition=12)">
    <
    meta http-equiv="Content-Language" content="tr">
    <
    link rel="stylesheet" type="text/css" href="stilsyf.css">
    <
    meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
    <
    title>:: Mybil.Org ::toplistsite eklelink ekledizinkodsuz toplistpagerank kontrolmultirankbacklink kontrolsitemi eklebedava reklam verhit kazan</title>
    <
    meta name="description" content="toplist, site ekle, link ekle, dizin, kodsuz toplist, pagerank kontrol, multirank, backlink kontrol, sitemi ekle, bedava reklam ver, hit kazan.">
    <
    META NAME="keywords" content="site ekle, link ekle, toplist, hit kazan, dizin, kodsuz toplist, sitemi ekle, pagerank arttır, dizin, backlink kazan">
    <
    meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
    <
    meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9">
    </
    HEAD>
    <
    body onLoad="if (document.layers){changecontent();moveImg();};clearTimeout(stt);window.status=''">
    <
    script>
    <!--
    // <meta HTTP-EQUIV="Page-Exit" content="revealTrans(Duration=2.0,Transition=12)"> ve 
    // <body onLoad="if (document.layers){changecontent();moveImg();};clearTimeout(stt);window.status=''"> tagını eklemeyi unutmayın.!!!
    stt=setTimeout("Sayfa Yükleniyor Lütfen Bekleyin....",60);
    top.window.moveTo(0,0);
    if (
    document.all)  {top.window.resizeTo(screen.availWidth,screen.availHeight);}
    else if (
    document.layers||document.getElementById
     {if (
    top.window.outerHeight<screen.availHeight||top.window.outerWidth<screen.availWidth)
      {
       
    top.window.outerHeight screen.availHeight;
       
    top.window.outerWidth screen.availWidth;
      }
    }
    //-->
    </script>
    </body>
    </html>
    <HTML>
    <HEAD>
      <style>
       <!--
       a{text-decoration:none; color:#000000}
       a:hover{text-decoration:none ; color:#336699}
       -->
       </style>
     
    <center>
    <BODY BGCOLOR=#FFFFFF LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0 text="#000000" link="#000000" vlink="#000000" alink="#FF0000" background="http://www.mytr.net/videolar/efestech_resimler/back_kare.gif">
    <table border="1" width="51%" bordercolor="#000000">
     <tr>
      <td colspan="3"> 
      <p align="center"><!--#include file="ustmenu.asp"--></td>
     </tr>
     <tr>
      <td width="5%"> <!--#include file="sol.asp"--></td>
      <td width="80%" valign="top"> 
          <table border="0" cellspacing="1" width="81%" id="AutoNumber2">
            <tr>
              <td width="95%" align="center" valign="top"><z <!--#include file="baglanti.asp"-->
    <%
    neye = request.querystring("neye")
    if neye="" or neye="1" then neye="gosterilme"
    if neye="2" then neye="Giden"
    if neye="3" then neye="Gelen"
    %>
    <head>
      <style>
       <!--
       a{text-decoration:none; color:#000000}
       a:hover{text-decoration:none ; color:#336699}
       -->
       </style>
         <%
      set toplist = Server.CreateObject("ADODB.RecordSet")
      SQL_toplist = "Select * from toplist WHERE aktive=1 ORDER BY "&neye&" desc"
      toplist.open SQL_toplist,baglanti,1,3
    %> 
     
    <script>
    <!--
    function MM_openBrWindow(theURL,winName,features) { //v2.0
      window.open(theURL,winName,features);
    }
    -->
      </script>
    </head>
    <table width="538" border="0" cellspacing="0" cellpadding="0" bgcolor="r" align="center">
           <tr> 
              <td> 
                <table width="564" border="0" cellspacing="1" cellpadding="2" height="83">
                  <tr bgcolor="#FF9933"> 
                    <td bgcolor="#3366FF" width=309 height="22" colspan="2" background="20-bg.jpg">
        <p align="center"><b>
        <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
                    Site Adı:</font></b></td>
                    <td width=45 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>
        <font color="#FFFFFF">Giden</font></b></font></td>
                    <td width=38 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center">
        <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
        <b>&nbsp;Gelen</b></font></td>
                    <td width=64 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center">
        <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF"><b>
        Gösterilme</b></font></td>
                    <td width=80 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center"><font color="#FFFFFF">İstatistik</font></td>
                  </tr>
                  <% if toplist.eof then %> 
     
              <% 
        else
        for m=1 to 100
        if toplist.eof then exit for
        if m mod 2=0 then
        bg="#efefef"
        else
        bg="#CCCCCC"
        end if
        %> 
            <tr bgcolor="<%=bg%>"> 
            <td width="17" height="19"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    <%=m%></a></a></font></td> 
            <td width="288" height="19"><p align="left">
      <a target="_blank" title="<%=toplist("Key")%>" href="yonlendir.asp?uye=<%=toplist("username")%>"><%=toplist("Siteadi")%></a></td>
    <td width="45" height="19"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    <%=toplist("Giden")%></font></td>
    <td width="38" height="19"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    <%=toplist("Gelen")%></a></font></td>
    <td width="0" height="19"><%=toplist("Gosterilme")%></td>
     
    <td width="0" height="19"> 
    <p align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    </a>
    </font><b>
    <a href="toplist.asp?id=<%=toplist(0)%>" href="toplist.asp?id=<%=toplist(0)%>">Stats</a></b></td>
     
            </tr>
            <%
      toplist.movenext
      next
      toplist.close
      set toplist = Nothing
      end if
    %>
      <tr bgcolor="#FF9933"> 
                    <td bgcolor="#3366FF" colspan=6 width="558" height="38" background="20-bg.jpg">
        <p align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>
        <font color="#FFFFFF"><a target="_self" href="uyeler.asp">
        <font color="#FFFFFF">Sitenizi Ekleyin</font></a></font></a><font color="#FFFFFF"> 
        | 
        <a target="_self" href="uyeler.asp?islem=bilgi">
        <font color="#FFFFFF">Bilgileriniz</font></a></font></a><font color="#FFFFFF"> 
                    | Sıralama =&gt;</font></b><font color="#FFFFFF"> </font> 
        <a target="_self" href="<%=Request.ServerVariables("SCRIPT_NAME")%>?neye=1">
        <font color="#FFFFFF">Gösterilme</font></a><font color="#FFFFFF">
        </font> 
        <a target="_self" href="<%=Request.ServerVariables("SCRIPT_NAME")%>?neye=2">
        <font color="#FFFFFF">Giden</font></a><font color="#FFFFFF">
        </font> 
        <a target="_self" href="<%=Request.ServerVariables("SCRIPT_NAME")%>?neye=3">
        <font color="#FFFFFF">Gelen</font></a></font><p align="left">&nbsp;</td>
                  </tr>
          </table></td></tr></table>
    </td>
            </tr>
          </table>
          </td>
      <td width="2%" valign="top"> <!--#include file="sag.asp"--></td>
     </tr>
    </table>
    </BODY>
    </HTML>
     
     
  2. Hasceviz

    Hasceviz Üye

    Kayıt:
    25 Şubat 2007
    Mesajlar:
    221
    Beğenilen Mesajlar:
    0
    sayfalama

    şunu bir denermisin

    PHP:
    <html>
    <
    head>
    <
    meta HTTP-EQUIV="Page-Exit" content="revealTrans(Duration=2.0,Transition=12)">
    <
    meta http-equiv="Content-Language" content="tr">
    <
    link rel="stylesheet" type="text/css" href="stilsyf.css">
    <
    meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
    <
    title>:: Mybil.Org ::toplistsite eklelink ekledizinkodsuz toplistpagerank kontrolmultirankbacklink kontrolsitemi eklebedava reklam verhit kazan</title>
    <
    meta name="description" content="toplist, site ekle, link ekle, dizin, kodsuz toplist, pagerank kontrol, multirank, backlink kontrol, sitemi ekle, bedava reklam ver, hit kazan.">
    <
    META NAME="keywords" content="site ekle, link ekle, toplist, hit kazan, dizin, kodsuz toplist, sitemi ekle, pagerank arttır, dizin, backlink kazan">
    <
    meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
    <
    meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9">
    </
    HEAD>
    <
    body onLoad="if (document.layers){changecontent();moveImg();};clearTimeout(stt);window.status=''">
    <
    script>
    <!--
    // <meta HTTP-EQUIV="Page-Exit" content="revealTrans(Duration=2.0,Transition=12)"> ve 
    // <body onLoad="if (document.layers){changecontent();moveImg();};clearTimeout(stt);window.status=''"> tagını eklemeyi unutmayın.!!!
    stt=setTimeout("Sayfa Yükleniyor Lütfen Bekleyin....",60);
    top.window.moveTo(0,0);
    if (
    document.all)  {top.window.resizeTo(screen.availWidth,screen.availHeight);}
    else if (
    document.layers||document.getElementById
     {if (
    top.window.outerHeight<screen.availHeight||top.window.outerWidth<screen.availWidth)
      {
       
    top.window.outerHeight screen.availHeight;
       
    top.window.outerWidth screen.availWidth;
      }
    }
    //-->
    </script>
    </body>
    </html>
    <HTML>
    <HEAD>
      <style>
       <!--
       a{text-decoration:none; color:#000000}
       a:hover{text-decoration:none ; color:#336699}
       -->
       </style>
     
    <center>
    <BODY BGCOLOR=#FFFFFF LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0 text="#000000" link="#000000" vlink="#000000" alink="#FF0000" background="http://www.mytr.net/videolar/efestech_resimler/back_kare.gif">
    <table border="1" width="51%" bordercolor="#000000">
     <tr>
      <td colspan="3"> 
      <p align="center"><!--#include file="ustmenu.asp"--></td>
     </tr>
     <tr>
      <td width="5%"> <!--#include file="sol.asp"--></td>
      <td width="80%" valign="top"> 
          <table border="0" cellspacing="1" width="81%" id="AutoNumber2">
            <tr>
              <td width="95%" align="center" valign="top"> <!--#include file="baglanti.asp"-->
    <%
    neye = request.querystring("neye")
    if neye="" or neye="1" then neye="gosterilme"
    if neye="2" then neye="Giden"
    if neye="3" then neye="Gelen"
    %>
    <head>
      <style>
       <!--
       a{text-decoration:none; color:#000000}
       a:hover{text-decoration:none ; color:#336699}
       -->
       </style>
    <%
         KayitSayisi = 30 
         If Request.QueryString("s" ) <> "" Then 
         Sayfa = CInt(Request.QueryString("s" ) ) 
         Else 
         Sayfa = 1 
         End If 
      set toplist = Server.CreateObject("ADODB.RecordSet")
      set toplist = baglanti.execute("select * from toplist where active=1 order by neye DESC LIMIT " & (KayitSayisi*Sayfa )-(KayitSayisi ) & "," & KayitSayisi ) 
      set SQL_toplist = baglanti.Execute("SELECT COUNT(neye ) FROM toplist" )
      toplist.open SQL_toplist,baglanti,1,3
     
        TopKayit = SQL_toplist(0)
     
        if not toplist.eof then 
    %> 
     
    <script>
    <!--
    function MM_openBrWindow(theURL,winName,features) { //v2.0
      window.open(theURL,winName,features);
    }
    -->
      </script>
    </head>
    <table width="538" border="0" cellspacing="0" cellpadding="0" bgcolor="r" align="center">
           <tr> 
              <td> 
                <table width="564" border="0" cellspacing="1" cellpadding="2" height="83">
                  <tr bgcolor="#FF9933"> 
                    <td bgcolor="#3366FF" width=309 height="22" colspan="2" background="20-bg.jpg">
        <p align="center"><b>
        <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
                    Site Adı:</font></b></td>
                    <td width=45 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>
        <font color="#FFFFFF">Giden</font></b></font></td>
                    <td width=38 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center">
        <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
        <b>&nbsp;Gelen</b></font></td>
                    <td width=64 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center">
        <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF"><b>
        Gösterilme</b></font></td>
                    <td width=80 bgcolor="#3366FF" height="22" background="20-bg.jpg">
        <p align="center"><font color="#FFFFFF">İstatistik</font></td>
                  </tr>
                   <% 
            i=1 
         do while not toplist.eof
        %> 
     
              <% 
        'else
        'for m=1 to 100
        'if toplist.eof then exit for
        if m mod 2=0 then
        bg="#efefef"
        else
        bg="#CCCCCC"
        end if
        %> 
            <tr bgcolor="<%=bg%>"> 
            <td width="17" height="19"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    <%=m%></a></a></font></td> 
            <td width="288" height="19"><p align="left">
      <a target="_blank" title="<%=toplist("Key")%>" href="yonlendir.asp?uye=<%=toplist("username")%>"><%=toplist("Siteadi")%></a></td>
    <td width="45" height="19"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    <%=toplist("Giden")%></font></td>
    <td width="38" height="19"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    <%=toplist("Gelen")%></a></font></td>
    <td width="0" height="19"><%=toplist("Gosterilme")%></td>
     
    <td width="0" height="19"> 
    <p align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
    </a>
    </font><b>
           <% 
           i = i + 1 
           toplist.movenext 
           loop 
           %> 
           <b><font>Sayfalar : </font></b> 
           <% 
           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 ) ) )
           If SayfaSayisi > 1 Then 
           For i=1 To SayfaSayisi 
           %>
    <a href="toplist.asp?id=<%=toplist(0)%>" href="toplist.asp?id=<%=toplist(0)%>">Stats</a></b></td>
           <% 
           Next 
           End If 
           End If 
           End If
           %>
     
            </tr>
     
      <tr bgcolor="#FF9933"> 
                    <td bgcolor="#3366FF" colspan=6 width="558" height="38" background="20-bg.jpg">
        <p align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>
        <font color="#FFFFFF"><a target="_self" href="uyeler.asp">
        <font color="#FFFFFF">Sitenizi Ekleyin</font></a></font></a><font color="#FFFFFF"> 
        | 
        <a target="_self" href="uyeler.asp?islem=bilgi">
        <font color="#FFFFFF">Bilgileriniz</font></a></font></a><font color="#FFFFFF"> 
                    | Sıralama =&gt;</font></b><font color="#FFFFFF"> </font> 
        <a target="_self" href="<%=Request.ServerVariables("SCRIPT_NAME")%>?neye=1">
        <font color="#FFFFFF">Gösterilme</font></a><font color="#FFFFFF">
        </font> 
        <a target="_self" href="<%=Request.ServerVariables("SCRIPT_NAME")%>?neye=2">
        <font color="#FFFFFF">Giden</font></a><font color="#FFFFFF">
        </font> 
        <a target="_self" href="<%=Request.ServerVariables("SCRIPT_NAME")%>?neye=3">
        <font color="#FFFFFF">Gelen</font></a></font><p align="left">&nbsp;</td>
                  </tr>
          </table></td></tr></table>
    </td>
            </tr>
          </table>
          </td>
      <td width="2%" valign="top"> <!--#include file="sag.asp"--></td>
     </tr>
    </table>
    </BODY>
    </HTML> 
     
    Son düzenleme yönetici tarafından yapıldı: 2 Temmuz 2008
  3. qupal

    qupal Üye

    Kayıt:
    9 Mart 2007
    Mesajlar:
    41
    Beğenilen Mesajlar:
    0
    oldu çok teeşekür ederim