<% sql="select * from proclass1_proclass2 where class2id="&request.QueryString("class2id") set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 class2name=rs("class2name") class2folder=rs("class2folder") %> <%ShowMetaSchoolNR "proclass2","class2ID",Request.QueryString("class2ID"),"在职研究生教育公告"%>

教育公告

    <% set rs=server.createobject("adodb.recordset") sql="select * from Info where class1id=25 and xuexiao="&request.QueryString("class2id")&" order by InfoID desc" rs.open sql,conn,1,1 if rs.eof and rs.bof then response.Write("暂无记录") else if not rs.eof then page = request("page") if page="" then page=0 intPageSize=70 rs.pagesize = intpagesize intcount = rs.recordcount intpagecount = rs.pagecount if int(page)>rs.pagecount then page=rs.pagecount end if if page="" or page=0 or page="-1" then page=1 else page=int(page) end if if intcount > 0 then rs.AbsolutePage=page end if for i=1 to intPageSize %>
  • /info_detail_info<%=rs("infoid")%>.html" target="_blank"> color="#FF0000"<%end if%>><%=rs("title")%>
  • <% rs.movenext if rs.eof then exit for next end if end if %>
    <% ChangePageFront %>
<% RsClose() ConnClose() %>