|
 |
 |
 |
<%'start into%>
<%
set Frs=server.createobject ("adodb.recordset")
sql="select * from Cn_Faq where Faq_IsAnswer='T' and Not Faq_Col='专利' and not 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%>
|
| |
|
|
