Clike here: All Faq Question
<%sort_1="index" speaktype="" speaktype=request("speaktype") %> <%set rs=server.createobject("adodb.recordset") sql="select * from speak where 1=1 " if speaktype<>"" then sql=sql&" and speaktype='"&speaktype&"' " sql=sql&" order by id desc" rs.open sql,conn,3,1 speaktype=request("speaktype") rs.PageSize =10 page=Request("page") if not isnumeric(page) then page=1 page=cint(page) if page="" then page=1 end if if page<1 then page=1 end if if page>rs.PageCount then page=rs.PageCount end if %> <%if rs.RecordCount >0 then count=0 rs.AbsolutePage=cint(page) %> <%while (not rs.eof) and count <%speaktype=rs("speaktype") select case speaktype case "1" speaktype_tmp="Crushing" case "2" speaktype_tmp="Screening & Washing" case "3" speaktype_tmp="Complete Crushing Plant" case "4" speaktype_tmp="Feeding & Conveying" case "5" speaktype_tmp="Grinding" case "6" speaktype_tmp="Grinding Plant" case "7" speaktype_tmp="Other" case else speaktype_tmp="" end select %>
<% rs.movenext count=count + 1 wend %> <%end if %>
current page <%=page%>/ totle page <%=rs.PageCount %>¡¡turn to page ¡¡¡¡ First Up Down Last
<% rs.close() set rs=nothing %> <%conn.close() set conn=nothing %>
Categories: *
Subject: *
Name: *
E-mail: *
Question: