|
<%
set rs=Server.CreateObject("adodb.recordset")
rs.Open "select * from tnh_sefer order by id" ,con,3,3
rs.MoveFirst
num1=0
do until rs.EOF
Response.Write(" ")
Response.Write(rs.Fields("name")&" ")
rs.MoveNext
num1=num1+1
if num1=10 then
Response.Write(" |