-
<%
For i = 1 to oRs.PageSize
if oRs.EOF then
Exit For
end if
Title=oRs("F_Title")
F_Class=oRs("F_Class")
F_ClassName=oRs("C_Name")
if Len(Title)>25 then
NTitle=left(oRs("F_Title"),20)&"..."
else
NTitle=oRs("F_Title")
end if
d_time=split(oRs("F_AddTime")," ")
dl_time=split(d_time(0),"-")
ds_time=""
for j=0 to 2
if len(dl_time(j))<2 then
ds_time=ds_time&"-0"&dl_time(j)
else
ds_time=ds_time&"-"&dl_time(j)
end if
next
ds_time=right(ds_time,10)
response.Write("
- "&ds_time&"·["&F_ClassName&"]"&NTitle&"") if i=5 then response.Write(" ") end if oRs.movenext Next %>
<%
if C_ID="" then
else
response.Write(oRs("C_Name"))
end if
%>問答中心
<%if oRs.pagecount<>1 and oRs.pagecount<>0 then%>
<%if page>1 then%>
[首頁]
[上一頁]
<%if page
[下一頁]
[尾頁]
<%else%>
[下一頁] [尾頁]
<%end if%>
<%else%>
[首頁] [上一頁]
[下一頁]
[尾頁]
<%end if %>
<%else%>
[首頁] [上一頁] [下一頁] [尾頁]
<%end if%>
[頁次:<%=page%>/<%=oRs.PageCount%>]
[共<%=oRs.RecordCount%>篇 <%=oRs.PageSize%>篇/頁]
<%oRs.close()%>