|
|
 您现在的位置：冯爷爷早期教育网 > 新闻播客 |
<%
dim son
SQLStr1="select id,title,tm from [news] where lbid=2 order by px desc"
dim SQLStr1,RS1,RecordCount,PageTotal,PageNo,PageSize,strsearch
file_name=Request.ServerVariables("SCRIPT_NAME")
PageSize = 30
PageNo=cint(Request.QueryString("page"))
Get_Recordset_AllField SQLStr1,RS1,RecordCount,PageTotal,PageNo,PageSize,"","",Conn
if not rs1.eof then
do while not rs1.eof
%>
<%
rs1.movenext
loop%>
<%jumppage RecordCount,PageTotal,PageNo,file_name,"keyword=" & keyword & "&" & "search_by=" & search_by& "&" & "son=" & link& ""%>
|
<%
else
%>
<%end if
rs1.close
%>
|
|
|
