<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->
<!doctype html>
<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"/>
<script src="../laydate/laydate.js"></script>
<body>
<% grade=Request( "grade" )

 strdate1=request("date1")
 strdate2=request("date2")
  
 if strdate1="" then 
   strdate1=date()-3
 end if
 if strdate2="" then 
   strdate2=date()+2
 end if

 %>

<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="MyKeCheng.asp" target="_self">个人课程表</a></li>
            <li><a href="KeChengBiaoQuanXiao.asp" target="_self">全校课程表</a></li>
            <li class="on">课程异动情况</li>
        </ul>
    </div>	
	</td>
  </tr>


  <tr>
   <td height="470" valign="top"   class="NemuMainBox">		 
	<br>	
		<form id="form1" name="form1" method="post" action="KeChengYiDong.asp">
				<table width="95%" height="30" border="1" align="center" cellpadding="3"   cellspacing="0"  bordercolor="#6D8DD8"  class="mtablehui">
  <tr style="background-color:#D6E4FF"  class="TableHeader">
    <td height="30" colspan="2" align="center" valign="middle" nowrap="nowrap" class="NemuNot">
		开始 <input name=date1  placeholder="请输入日期"  style="width:90px"  value=<%=strdate1%> class="laydate-icon" onClick="laydate()">
		&nbsp;&nbsp;结束<b><b>
		 <input name=date2  placeholder="请输入日期"  style="width:90px"  value=<%=strdate2%> class="laydate-icon" onClick="laydate()">
		</b></b>&nbsp;&nbsp;选择年级
		  <select name="grade">
			<option selected="selected"> <%=grade%> </option>
			<% Set RSsel = Conn.Execute("select vname,shuoming from  varset where name='grade' order by vid")
			   While NOT RSsel.EOF %>
			<option><%=RSsel( "vname" )%></option>
			 <% RSsel.MoveNext
			    Wend
		  	    RSsel.Close%>
		</select>&nbsp;&nbsp;&nbsp;<input name="Submit" type="submit" class="topanniu" value="搜索" />
		</td>  
    <td width="11%" height="30" align="center" valign="middle" nowrap="nowrap" class="NemuNot"><input name="button" type="button" class="topanniu" onClick="location='YiDongAdd.asp?grade=<%=grade%>'" value="异动登记"></td>
  </tr></table>
	   
		
	   
		<br>
		<%  tname=request.cookies("tname")
		    nowxueqi=request.cookies("nowxueqi") 
    Set   MyOAASPObj = Server.CreateObject("YFSchoolOApro3.YFSchoolDll3")
          call  MyOAASPObj.KeChengYiDong(nowxueqi,grade,strdate1,strdate2)
         set   MyOAASPObj=nothing	
 %>
		 
	  
		 
		 <br>
		</form>
		</td>
  </tr>
</table>
</body>
</html>
