<!--#include file="../../checkLogin.asp"-->
<!--#include file="../../SQLconn.asp"-->
<link rel="stylesheet" type="text/css" href="../../images/<%=request.cookies("imgdir")%>/css/style.css" media="all"/>


<p>
  <script Language="JavaScript">
 function form_check(){
  if(document.form3.vid.value.length<1){window.alert("请输入序号");document.form3.vid.focus();return (false);}
   
                  }

  </script>
</p>


<%
   var=request("var")
   '检查权限
       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

     '检查权限结束
   
   %>
      <form id="form3" name="form3" method="post" action="saveNemu.asp?var=<%=var%>"  onSubmit="return form_check();">
	  <table width="588" border="1" align="center" cellpadding="3"   cellspacing="0"  bordercolor="#6D8DD8"  class="mtablehui"> 
<tr style="background-color:#D6E4FF"  class="TableHeader">      <td height="30" colspan="3" valign="middle"  align="center" nowrap class="NemuNot">
	  
      <table width="588" border="0" align="center" cellspacing="0" bordercolorlight="#11b1ff" bordercolordark="#f0f8ff">
      <tr align="middle">  <td class="STYLE1">&nbsp;</td>
      <td height="25" class="STYLE1"><div align="center">序号</div></td>
      <td align="center" valign="middle" class="STYLE1"><div align="left">
      <label><input name="vid" type="text" class="text" id="vid" size="5" /></label>
      </div></td><td>&nbsp;</td> </tr>
      <tr align="middle">
        <td class="STYLE1">&nbsp;</td>
        <td height="27" class="STYLE1"><div align="center">类别</div></td>
        <td align="center" valign="middle" class="STYLE1"><div align="left">
          <input name="vname1" type="text" class="text" id="vname1" />
        </div></td>
        <td>&nbsp;</td>
      </tr>
      <tr align="middle"> <td width="83" class="STYLE1">&nbsp;</td>
      <td width="87" height="28" class="STYLE1"><div align="center">二级类别</div></td>
      <td width="398" align="center" valign="middle" class="STYLE1"><div align="left">
	  <input name="vname2" type="text" class="text" id="vname2" />
	  <input name="Submit" type="submit" class="topanniu" value="添加" />
      </div> </label></td><td width="12">&nbsp;</td> 
      </tr></table>
	    </td>    </tr>    </table> 
      </form>

    <table width="588" align="center" border="1" cellpadding="3"   cellspacing="0"  bordercolor="#6D8DD8"  class="mtable">   
    <tr style="background-color:#D6E4FF"  class="TableHeader">
    <td align="center" nowrap class="STYLE1">序号</td>
    <td height="27" align="center" nowrap class="STYLE1">类别
      <div align="center"></div></td><td width="184" align="center" nowrap class="STYLE1">二级类别</td>
    <td width="111" align="center" nowrap class="STYLE1">操作</td>
    </tr>

   
   <%Set Rslist=Server.CreateObject("Adodb.Recordset")
   sqllist="select * from varset where  name='"&var& "'  order by vid" 
   Rslist.open sqllist,conn,1,1
   while not Rslist.eof and not Rslist.bof%>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#EFF8FF'">
    <td width="52" height="27" align="center" nowrap class="STYLE1"><%=Rslist("vid")%></td>
    <td width="184" align="center" nowrap class="STYLE1"><%=Rslist("vname1")%></td>
    <td align="center" nowrap class="STYLE1"><%=Rslist("vname2")%></td>
    <td align="center" nowrap class="STYLE1">
	<a href="modifyNemu.asp?var=<%=var%>&id=<%=Rslist("id")%>">修改</a>&nbsp;&nbsp;&nbsp;
	 
	<a   href= "# "   onclick= "javascript:if(confirm( '您真的要删除记录？ '))href= 'deleteNemu.asp?var=<%=var%>&id=<%=Rslist("id")%>'; "> 删除 </a>
	  </td>	
    </tr>
<%  Rslist.movenext
    wend
%>
</table>
<br>
