<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->

<html>
<head><title></title><meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" type="text/css" href="../images/<%=request.cookies("imgdir")%>/css/style.css" media="all"/>

<body>
<script language=javascript>


function unselectall(){
if(document.myform.chkAll.checked){
document.myform.chkAll.checked = document.myform.chkAll.checked&0;
}
}
function CheckAll(form){
for (var i=0;i<form.elements.length;i++){
var e = form.elements[i];
if (e.Name != 'chkAll'&&e.disabled==false)
e.checked = form.chkAll.checked;
}
}
</script>

<table width="100%" height="495" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="27">
	<div class="header">
	<div class="nav">
        <ul>
            <li><a href="send.asp">发送短信</a></li>
            <li><a href="Received.asp">已收短信</a></li>
            <li  class="on">已发短信</li>
			
			<%tname=request.cookies("tname")'检查权限
	 
       Set MyOAASPObj = Server.CreateObject("YFSchoolOApro.YFSchoolDll")
           if MyOAASPObj.QuanXian(tname,"发送短信")=0 then
		   else %>
		    <li><a href="sendZiYou.asp">手机短信</a></li>          
		   <% end if 
		   set MyOAASPObj=nothing
'检查权限结束
%>
			
        </ul>
    </div>	
	</td>
  </tr>
  <tr>
   <td height="470" valign="top"   class="NemuMainBox">
	 <br>
	   <%  imgdir=request.cookies("imgdir")
	       tname=request.cookies("tname")
			
			Set rssended=Server.CreateObject("Adodb.Recordset")
			sqlsended="Select * from message  where upname ='"&tname&"' and isdel=0 order by mid desc"
			rssended.open sqlsended,conn,1,1
			%>
			
			<%
			rssended.pagesize=12 '每页记录条数
		 
			 
			curpage=Request.QueryString("curpage") '将URL参数curpage传给curpage变量
			 
			rssended.absolutepage=curpage '将本页设为curpage设置的页数
			if curpage=0 then
			curpage=1
			end if 
			
			%>
			</p>
			</p>
			<FORM ACTION="deleteDuofa.asp?curpage=<%=curpage%>" METHOD="post"  NAME="form2">
			<table width="97%" align="center" border="0" cellpadding="0"   cellspacing="0"  bordercolor="#6D8DD8"   >   
			
			 
			
			<%
			for i= 1 to rssended.pagesize
			if rssended.eof then
			exit for
			end if
			%>
			<tr onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#EFF8FF'"> 
			<td style="border-bottom:1px solid #dddddd;"   height="31" class="STYLE1">
			<div align="left">
			
			<input type="checkbox" name="checkbox" value=<%=rssended("mid")%>>&nbsp;
			<a href="viewHaveSend.asp?id=<%=rssended("mid")%>&curpage=<%=curpage%>"  target="_blank" class="STYLE1"> &nbsp;<%=rssended("message")%></a></div></td>
			<td style="border-bottom:1px solid #dddddd;"  width="140" class="STYLE1"><div align="left">
			
			 <%
					
			Set rssee=Server.CreateObject("Adodb.Recordset")
			sqlsee="Select count(*) as zongshu,(Select count(*) as zongshu from seemessage where  mID='"&rssended("mid")& "'  and havesee<>'未查阅') as yiyue   from seemessage where  mID='"&rssended("mid")& "'"
			rssee.open sqlsee,conn,1,1
			%>	
							
		<img src="../images/img/message/bg.jpg" border="1" height="10" width="<%=FormatNumber(rssee("yiyue")/rssee("zongshu")*100,0)%>">
           <%=rssee("yiyue")%>/<%=rssee("zongshu")%>
			
			
			</div></td>
			
			<td style="border-bottom:1px solid #dddddd;" width="60" class="STYLE1"><div align="center" class="STYLE1">
			
			<a href="delsend.asp?curpage=<%=curpage%>&id=<%=rssended("mid")%>"  target="main" class="STYLE1"> 删除</a>
			
			</div></td>
			<td style="border-bottom:1px solid #dddddd;" width="120" class="STYLE1"><div align="center" class="STYLE1"><%=rssended("upDatetime")%></div></td> 
			</tr>
			<%  rssended.movenext
			next%>
			<%  if rssended.recordcount>0 then  %>
			
			<tr>
              <td style="border-bottom:1px solid #dddddd;" height="28" colspan="4">
	       	<span class="STYLE1"><input name='chkAll' type='checkbox' id='chkAll' onclick='CheckAll(this.form)' value='checkbox'>全选</span>&nbsp;&nbsp;&nbsp;&nbsp;
	<input name="Submit2" type="submit" class="topanniu" value="删除"></td>
  </tr>
			<%end if %>
			
			
			</table>
			<br>
			<%  if rssended.recordcount>rssended.pagesize then  %>
			<div align="center" 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 rssended.pagecount<curpage+1 then%>
			下一页
			<%else%>
			<a href="?curpage=<%=curpage+1%>">下一页</a>
			<%end if%>
			
			<%if rssended.pagecount<curpage+1 then%>
			尾页
			<%else%>
			<a href="?curpage=<%=rssended.pagecount%>">尾页</a>
			<%end if%>
			(当前第<%=curpage%>页，共有<%=rssended.pagecount%>页，共有：<%=rssended.recordcount%>条记录)</div>
			<%end if %>
	</form></td>
  </tr>
</table>

</body>
</html>
