<!--#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 message(CAL_ID)
{
window.open("note.asp?iD="+CAL_ID,'_blank',	  "height=250,width=250,status=0,toolbar=no,menubar=no,location=no,left=300,top=200,scrollbars=auto,resizable=no");
}



</script>

<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  class="on">已收短信</li>
            <li><a href="Havesend.asp">已发短信</a></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")
			
			author=request("author")
			 
			Set rssendedShou=Server.CreateObject("Adodb.Recordset")
			sqlshou="SELECT m.*, s.*   FROM message m INNER JOIN  seemessage s ON m.mid = s.mid  where sendto ='"&tname&"' and upname like '%"&author&"%'  and s.isdel='0' order by m.mid  desc"
			rssendedShou.open sqlshou,conn,1,1
			%>
			
			<%
			rssendedShou.pagesize=12 '每页记录条数
			 
			curpage=Request.QueryString("curpage") '将URL参数curpage传给curpage变量
			 
			rssendedShou.absolutepage=curpage '将本页设为curpage设置的页数
			if curpage=0 then
			curpage=1
			end if 
			%>
		<FORM ACTION="deleteDuo.asp?curpage=<%=curpage%>" METHOD="post"  NAME="form1">
			
			
			</p>
			</div>
			<table width="97%" align="center" border="0" cellpadding="0"   cellspacing="0"  bordercolor="#6D8DD8"  >   
			
			
			 
			
			
			<%
			for i= 1 to rssendedShou.pagesize
			if rssendedShou.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=<%=rssendedShou("sid")%>>&nbsp;
			<%if rssendedShou("Havesee")="未查阅" then  %>
			<img src="../images/<%=request.cookies("imgdir")%>/gonggaoNew.gif" width="22" height="9"> 
			<%end if %>
			
			<%if rssendedShou("Havesee")="已发手机" then  %>
			<img src="../images/img/message/phone.gif" width="14" height="20"> 
			<%end if %>
			
			<a href="javascript:message(<%=rssendedShou("mid")%>);"><%=rssendedShou("message")%></a></div>
			
			</td>
			<td style="border-bottom:1px solid #dddddd;"  width="80" class="STYLE1"><div align="center" class="STYLE1">
			
			<a href="send.asp?sendtoname=<%=rssendedShou("upname")%>"   target="main"">回复</a>
			&nbsp; 
					
			
			
			<a href="delete.asp?curpage=<%=curpage%>&ID=<%=rssendedShou("sid")%>"> 删除</a>
			
			</div></td>
			<td style="border-bottom:1px solid #dddddd;"  width="80" class="STYLE1"><div align="center"><a href="Received.asp?author=<%=rssendedShou("upname")%>" target="main"><%=rssendedShou("upname")%></div></td>
			<td style="border-bottom:1px solid #dddddd;"  width="70" class="STYLE1"><div align="center" class="STYLE1"><%=rssendedShou("upDatetime")%></div></td> 
			</tr>
			<%  rssendedShou.movenext
			next%>
			
			<%  if rssendedShou.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 rssendedShou.recordcount>rssendedShou.pagesize then  %>
			
			<div>
			<div align="center"></div>
			</div>
			<div align="center" class="STYLE1">
			<%if curpage=1 then%>
			首页
			<%else%>
			<a href="?seetype=已收短信&curpage=1&biaoqian=1">首页</a>
			<%end if%>
			
			<%if curpage=1 then%>
			上一页
			<%else%>
			<a  href="?seetype=已收短信&curpage=<%=curpage-1%>&biaoqian=1">上一页</a>
			<%end if%>
			
			<%if rssendedShou.pagecount<curpage+1 then%>
			下一页
			<%else%>
			<a href="?seetype=已收短信&curpage=<%=curpage+1%>&biaoqian=1">下一页</a>
			<%end if%>
			
			<%if rssendedShou.pagecount<curpage+1 then%>
			尾页
			<%else%>
			<a href="?seetype=已收短信&curpage=<%=rssendedShou.pagecount%>&biaoqian=1">尾页</a>
			<%end if%>
			(当前第<%=curpage%>页，共有<%=rssendedShou.pagecount%>页，共有：<%=rssendedShou.recordcount%>条记录)</div>
			<%end if%>
	 
	
	
	  </td>
  </tr>
</table>
</body>
</html>
