<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<script Language="JavaScript">
function CheckForm()
{
  
   if(document.form1.Tno.value.length<1){window.alert("请输入用户");document.form1.Tno.focus();return (false);}
   if(document.form1.Tname.value.length<1){window.alert("请输入姓名");document.form1.Tname.focus();return (false);}
   if(document.form1.powdername.value.length<1){window.alert("选择权限组");document.form1.powdername.focus();return (false);}
   ;return (false);}
}

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

</head>

   <%
   
    '检查权限
       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

       '检查权限结束
   
  
   dim strID
  
  
   strId=request("id")
   set rs=server.createobject("adodb.recordset")
   sql="select * from teachers  where tid='"&strId& "'"
   rs.open sql,conn,1,1
%>

<body class="bodycolor" topmargin="5" >
<table border="0" width="100%" cellspacing="0" cellpadding="3" class="small">
  <tr>
    <td class="Big"> <p>修改</p>
    <p>&nbsp;</p></td>
  </tr>
</table>

<br>
 <table border="0" width="420" cellpadding="2" cellspacing="1" align="center" class="small">
  <form action="Savemodifyuser.asp"  method="post" name="form1" onSubmit="return CheckForm();">
    <tr>
      <td height="38" nowrap class="STYLE1">&nbsp;</td>
      <td class="STYLE1">
	  <input type="hidden" name="id" value='<%=Rs("tid")%>'>
	  </td>
    </tr>
    <tr>
      <td width="120" height="38" nowrap class="STYLE1"><div align="right">用户：</div></td>
          <td width="289" class="STYLE1"><!-------------- 时 ------------>
              <label>
              <input name="Tno" type="text" id="Tno"  value=<%=Rs("Tno")%>>
      </label></td>
    </tr>
        <tr>
          <td height="38" nowrap class="STYLE1"><div align="right">姓名：</div></td>
          <td class="STYLE1"><!-------------- 时 ------------>
              <input name="Tname" type="text" id="Tname"  value=<%=Rs("Tname")%>></td>
        </tr>
        <tr>
          <td nowrap class="STYLE1"><div align="right">权限组：</div></td>
          <td align="center" class="STYLE1"><div align="left">
            <select name="powdergroup" id="powdergroup">
              
              <option><%=Rs("powdergroup")%></option>
              <% Set RSsel = Conn.Execute("select vname,shuoming from  varset where name='powdergroup' order by vid")
                   While NOT RSsel.EOF %>
              <option value=<%=RSsel( "vname" )%>><%=RSsel( "vname" )%></option>
              
              <% RSsel.MoveNext
                  Wend
                  RSsel.Close%>
            </select>
            
          </div></td>
        </tr>
    <tr>
      <td nowrap class="STYLE1">&nbsp;</td>
      <td align="center" class="STYLE1"><label for="SMS_REMIND"></label></td>
    </tr>
  
    <tr align="center" class="TableControl">
      <td colspan="2" nowrap class="STYLE1">
      
        
      
        <input type="submit" value="确定" class="topanniu" >  
        &nbsp;&nbsp;
        <input type="button" value="关闭" class="topanniu" onClick="window.close();">      </td>
    </tr></form>
</table>





</body>
</html>