<!--#include file="../../SQLconn.asp"-->
<link rel="stylesheet" type="text/css" href="../../css/style.css" />

<html>
<head><title></title><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
 
<STYLE TYPE="text/css">
    <!--
    BODY 	    {background-color: #FFFFFF; text-align: center; font-size: 12px; font-family: Verdana;}
   
    .blackBacking   {background-color: #000000;}
    .names 	    {background-color: #ff9900; font-size: 13px; color: #FFFFFF; text-decoration: none; text-align:  center;       font-family: Verdana; font-weight: bold;}
    .calendarBody   {background-color: #F2EBCB; font-size: 13px; color: #000000; text-decoration: none; text-align:  center; font-family: Verdana;}
    .calCurrentDay  {background-color: #FFCCCC; font-size: 13px; color: #FFFFFF;}
    .calOtherDay    {background-color: #E1F0FF; font-size: 16px; color: #000000;}
    .calNotDay	    {background-color: #EEF1F2; font-size: 18px; color: #000000;}
	.caltime	    {background-color: #EEF1F2; font-size: 15px; color: #990000;}
    .calFormMenu    {background-color: #AECE6A; font-size: 13px; color: #FFFFFF; text-decoration: none; text-align:  center; font-family: Verdana; font-weight: bold;}
.STYLE4 {font-size: 18}
    -->
  </STYLE>
<body>
<script Language="JavaScript">
function form_check(){
if(document.form3.sendto.value.length<1){window.alert("请选择收短信人");document.form3.sendto.focus();return (false);}
if(document.form3.CONTENT.value.length<1){window.alert("请输入内容");document.form3.CONTENT.focus();return (false);}
if(document.form3.CONTENT.value.length>100){window.alert("短信内容超过100字了，请您移步到内部邮件发送！");document.form3.CONTENT.focus();return (false);}
}

function inputname(strname)
{
form3.sendto.value=strname;	
document.form3.CONTENT.focus();return (false);		
}



</script>

<%
'检查权限
       tname=request.cookies("tname") 
       Set MyOAASPObj= Server.CreateObject("YFSchoolOApro.YFSchoolDll")
           if MyOAASPObj.QuanXian(tname,"管理学校网站")=0 then 
		    response.redirect  "../../NoPower.asp"
           end if 
		   set MyOAASPObj=nothing

'检查权限结束
   %>
     

<table width="98%" height="499" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td height="33"><table width="100%" height="33" border="0" cellpadding="0" cellspacing="0">
      <tr>
      <td width="100" class="NemuNot" ><div align="center"><a href="addfile.asp" target="_self">发布</a><a href="manage.asp" target="_self">网站</a><a href="addfile.asp" target="_self">文章</a></div></td>
       <td width="100" class="Nemuselect" ><div align="center"><a href="manage.asp" target="_self">管理网站文章</a></div></td>
       <td width="100" class="NemuNot" ><div align="center"><a href="TiXing.asp" target="_self">发布文章提醒</a></div></td>
       <td    class="NemuLine">&nbsp;</td>
      </tr>
    </table></td>
  </tr>
  <tr>
   <td height="470" valign="top"   class="NemuMainBox">
   
   <br>
   
   <%
   tname=request.cookies("tname")
   
'检查权限
 set RsPowder=Conn.Execute("select p.powderdetail  from teachers t,teacherpowder p  where t.powdergroup=p.powdergroup and tname='"&request.cookies("tname")&"' and powderdetail='系统参数'")
	 if  RsPowder.eof and  RsPowder.bof then
  sql="Select * from SchoolWeb    order by id desc"                 ' (upname ='"&tname&"')  
else
    sql="Select * from SchoolWeb   order by id desc"
end if
Set rs=Server.CreateObject("Adodb.Recordset")
rs.open sql,conn,1,1
%>

<%
rs.pagesize=15 '每页记录条数
curpage=Request.QueryString("curpage") '将URL参数curpage传给curpage变量
rs.absolutepage=curpage '将本页设为curpage设置的页数
if curpage=0 then
   curpage=1
end if 

%>


 

<table width="95%" align="center" border="1" cellpadding="3"   cellspacing="0"  bordercolor="#6D8DD8"  class="mtable">
<tr style="background-color:#D6E4FF"  class="TableHeader">
     
      <td height="27" align="center" nowrap class="STYLE1"><span class="STYLE1">日期</span></td>
    
	  <td align="center" nowrap class="STYLE1">类别</td>
	  <td align="center" nowrap class="STYLE1">二级菜单</td>
	  <td align="center" nowrap class="STYLE1"><span class="STYLE1">标题</span></td>
      <td align="center" nowrap class="STYLE1"><span class="STYLE1">操作</span></td>
  </tr>
<%
   for i= 1 to rs.pagesize
      if rs.eof then
         exit for
      end if
%>
    <tr  onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#EFF8FF'"> 
	<td width="120" height="28" class="STYLE1"><div align="center"><%=rs("发布日期")%></div></td>
      <td width="120" class="STYLE1"><div align="center"><%=rs("类别")%></div></td>
      <td width="120" class="STYLE1"><div align="center"><%=rs("二级类别")%></div></td>
      <td   class="STYLE1"><div align="left">&nbsp;<a href="viewFile.asp?id=<%=rs("id")%>"  target="_blank" class="STYLE1"><%=rs("标题")%></a></div>
      <div align="center"></div></td> 
	<td width="150" class="STYLE1">
	   <div align="center"><a href="modifyfile.asp?years=<%=years%>&amp;curpage=<%=curpage%>&amp;id=<%=rs("id")%>"  target="main" class="STYLE1">修改</a> &nbsp; 
	    <a href="delete.asp?years=<%=years%>&curpage=<%=curpage%>&id=<%=rs("id")%>"  target="main" class="STYLE1">删除</a></div></td>
    </tr>
<%  rs.movenext
    next%>
</table>

 <br>
<div align="center">
  
  <span class="STYLE1">
  <%if curpage=1 then%>
  
首页
<%else%>
<a href="?curpage=1">首页</a>
<%end if%>

<%if curpage=1 then%>
上一页
<%else%>
<a href="?curpage=<%=curpage-1%>">上一页</a>
<%end if%>

<%if rs.pagecount<curpage+1 then%>
下一页
<%else%>
<a href="?curpage=<%=curpage+1%>">下一页</a>
<%end if%>

<%if rs.pagecount<curpage+1 then%>
尾页
<%else%>
<a href="?curpage=<%=rs.pagecount%>">尾页</a>
<%end if%>
(当前第<%=curpage%>页，共有<%=rs.pagecount%>页，共有：<%=rs.recordcount%>条记录)</span></div>
   
   
   <br>
   
   </td>
  </tr>
</table>
</body>
</html>
