Code:
***** class="alt2" dir="ltr" style=" margin: 0px; padding: 6px; border: 1px inset; width: 640px; height: 498px; text-align: left; overflow: auto"><html> <head> ****** **********="Content-Type" *********"text/html; charset=windows-1254"> <title>New Page 1</title> </head> <body> <table border="1" width="100%" id="table1"> <font color="#FF00FF"> <% set data=server.createobject("adodb.connection") set rst6=server.createobject("adodb.recordset") data.Open "Provider=SQLOLEDB.1;Password=4671547;Persist Security Info=True;User ID=web;Initial Catalog=TICONA2005;Data Source=ramazan" rst6.open "select * from TBLSTSABIT order by STOK_KODU ",data,3,3 deste=15 Sayfa=rst6.recordcount/deste sayi=request("S") Liste=sayi * deste if sayi=>2 then for i= 0 to Liste-15 if i=rst6.recordcount then exit for end if rst6.movenext next else end if %> </font> <font color=#FF3300> <% if sayi=1 then liste=1 end if %> <% for i= liste to liste+Deste%> <tr> <td><b><font size="1" face="Tahoma"><%=rst6.fields("STOK_KODU")%>--<%=rst6.fields("STOK_ADI")%></font></b></td> </tr> <% if i=rst6.recordcount then exit for end if rst6.movenext next %> </table> <table border="1" width="100%"> <tr> <%for i=1 to Sayfa%><td><a href=index.asp?S=<%=i%>><%=i%></a></td><%next%> </tr> </font> </table> </body> </html>
