<%
SQL = "Select * from faq where an_body Is not Null and check_on ='on' order by ask_time desc"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL,conn,1,1
if not rs.EOF then
actionPage = cint(0 & trim(request("page")))
if actionPage < 1 then actionPage = 1
rs.PageSize = 10
if actionPage > rs.PageCount then actionPage = rs.PageCount
rs.AbsolutePage = actionPage
For iPage = 1 To rs.PageSize
%>
