|
 |
<%'start into%>
 |
 |
 |
<%'start into%>
<%
set Frs=server.createobject ("adodb.recordset")
sql="select * from Cn_Faq where Faq_IsAnswer='T' and Faq_Col like '%商标%' order by Faq_QDate DESC"
Frs.open sql,conn,3,1
if Frs.eof then
response.write "| 正在建设中! 提问 | "
else
Frs.pagesize = 10
pages = Frs.PageCount
currentpage = 1
Frs.AbsolutePage =1
totalrecord=Frs.RecordCount
if trim(request("pgno"))<> "" then
Frs.AbsolutePage =trim(request("pgno"))
currentpage=trim(request("pgno"))
end if
from=(currentpage-1)*10
RowCount =Frs.pagesize
i=0
do while i
| ');"><%=Frs("Faq_Topic")%>
<%=Frs("Faq_QDate")%> |
<%
Frs.movenext
end if
loop
%>
| |
|
|
<% if cint(currentpage) > 1 then%>
上一页
<%end if%>
<%if cint(currentpage) < Frs.PageCount then%>
下一页
<%end if%>
|
|
<%end if%>
|
|
<%'end into%>
|
|
|
