<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% C_ID=trim(request.QueryString("C_ID")) if C_ID<>"" then if not isnumeric(Cint(C_ID)) then response.Redirect("/ver3.0/FAQ/") else sSql="select * from FaqData,FaqClass where F_Class=C_ID and F_Class="&C_ID&" and F_Check=1 order by F_ID DESC" end if else sSql="select * from FaqData,FaqClass where F_Class=C_ID and F_Check=1 order by F_ID DESC" end if oRs.open sSql,oConn,1,1 if oRs.bof and oRs.eof then response.redirect("/ver3.0/FAQ/") else page=request.querystring("Page") oRs.PageSize = 10 if Not IsEmpty(page) then if Not IsNumeric(page) then page=1 else page = cint(page) end if if page > oRs.PageCount then oRs.AbsolutePage = oRs.PageCount page=oRs.pagecount elseif page <= 0 then page=1 oRs.AbsolutePage = 1 else oRs.AbsolutePage = page end if else page=1 oRs.AbsolutePage=1 end if end if %> 破碎机,磨粉机,制砂机,移动破碎站-问答中心-黎明重工科技股份有限公司

产品问答

百科中心
<% if C_ID="" then else response.Write(oRs("C_Name")) end if %>问答中心
    <% 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 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()%>
问答中心
    <%call FAQ_Class(C_ID)%>