江苏省高邮中学—校友联络

<% option explicit %> <%dim rs,sql,typeid,number,theday,curpage,i typeid=trim(request("typeid")) if typeid="" then response.write "错误!版面编号不能为空!返回" response.end end if set rs=server.createobject("adodb.recordset") '每页显示的文章数 rs.open "select morenumber from news_parameter where parameterid=1",conn,1,1 if not rs.bof and not rs.eof then number=rs("morenumber") else number=50 end if rs.close rs.open "select typename from type where typeid=" & cstr(typeid),conn,1,1 if not rs.bof and not rs.eof then sql=rs("typename") end if rs.close set rs=nothing set rs=server.createobject("adodb.recordset") rs.open "select * from news where typeid=" & cstr(typeid) & " and audit=1 order by ntime DESC",conn,1,1 if err.number <> 0 then response.write "数据库出错" else %> 江苏省高邮中学—校友联络

　网站首页　网络办公　甘雨论坛　甘雨博客　资源中心　设置首页　收藏站点　关于我们　

江苏省四星级普通高中
江苏省德育先进学校
江苏省中小学党建工作先进集体
江苏省爱国卫生先进单位
江苏省群众体育先进学校
江苏省“五四”红旗团委
江苏省现代教育技术实验学校
国家教师基金“十一五”规划
重点课题实验校
国家级课题“传统文化与
语文教学”实验校

目前位置:校友联络	知名校友	校友通讯	校友登记

	知名校友

	校友通讯


<% response.write " " response.write "第" + cstr(curpage) + "页/总" + cstr(rs.pagecount) + "页 " response.write "本页" + cstr(i-1) + "条/总" + cstr(rs.recordcount) + "条 " if curpage = 1 then response.write "首页前页 " else response.write "首页前页 " end if if curpage = rs.pagecount then response.write "后页末页" else response.write "后页末页" end if rs.close set rs=nothing%>

<% end if %>