<%if session("password")<>"" then%>
<!--#include file="inc/conn1.asp"-->

<!-- #include file="inc/top.asp" -->
<!-- #include file="inc/adminmenu.asp" -->

<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
<%if request.querystring("kind")="admin" then%>

<%
    id=trim(Request("id"))
    sqlcmd = ("select  * from admin where id="&id)          '查詢id(ID號)這條記錄
    rs.Open sqlcmd,newconn,1,1
session("user")=rs("username")
%>
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><form method="POST" action="modify.asp">
        <table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr>
            <td height="25" align="center">&nbsp;</td>
            <td height="25">&nbsp;</td>
            <td height="25">&nbsp;</td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">用戶名</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input name="username" size="25" maxlength="30"  class="editbox1" value="<%=rs("username")%>">
            </td>
          </tr>
          <tr>
            <td height="25" align="center">密碼</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
              <input name="password" type="password" size="25" maxlength="30" class="editbox1" value="<%=rs("password")%>"></td>
          </tr>

          <tr>
            <td height="25" colspan="3">　　　　　　　　
                <div align="center">
                  <input class=bottom name=B12 type=submit value="修改記錄">
                  <input class=bottom name=B22 type=reset value="重新填寫">
                  <input type="hidden" name="kind" value="0">
                  <input type="hidden" name="id" value="<%=rs("id")%>">
              </div></td>
          </tr>
        </table>
</form>
</td>
  </tr>
</table>

<%end if%>
<%if request.querystring("kind")="user" then%>

<%
    id=trim(Request("id"))
    sqlcmd = ("select  * from user where id="&id)           '查詢id(ID號)這條記錄
    rs.Open sqlcmd,newconn,1,1
session("xh")=rs("xh")
session("return")="admin_user.asp"
%> 

	<form method="POST" action="modify.asp">
	
        <table border="0" cellspacing="0" cellpadding="0" align="center">
		
          <tr>
            <td width="57" height="25" align="center">班級</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input name="bj" size="25" maxlength="30"  class="editbox1" value="<%=rs("bj")%>">
            </td>
          </tr>
		  
          <tr>
            <td height="25" align="center">學號</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
              <input name="xh" size="25" maxlength="30" class="editbox1" value="<%=rs("xh")%>"></td>
          </tr>
		  
          <tr>
            <td width="57" height="25" align="center">姓名</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input name="xm" size="25" maxlength="40" class="editbox1" value="<%=rs("xm")%>">
            </td>
          </tr>
		  
          <tr>
            <td width="57" height="25" align="center">密碼</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input type="text" name="mm" size="25" class="editbox1" value="<%=rs("mm")%>">
            </td>
          </tr>
		  
          <tr>
            <td height="25" align="center">性別&nbsp;</td>
            <td height="25">&nbsp;</td>
            <td height="25">        
			 <select name="sex">
            <option<%if rs("sex")="男" then response.write(" selected")%>>男</option>
            <option<%if rs("sex")="女" then response.write(" selected")%>>女</option>&nbsp;   
</td>
          </tr>
		  
          <tr>
            <td width="57" height="25" align="center">&nbsp;</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
			&nbsp;
            </td>
          </tr>
		  
          <tr>
            <td width="57" height="25" align="center">住址</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
			<input name="addr" size="25" maxlength="100" class="editbox1" value="<%=rs("addr")%>">
            </td>
          </tr>
		  
          <tr>
            <td width="57" height="25" align="center">郵編</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
			<input name="yb" size="25" maxlength="100" class="editbox1" value="<%=rs("yb")%>">
            </td>
          </tr>
		  
          <tr>
            <td height="25" colspan="3">　　　　　　　　
                <div align="center">
                  <input class=bottom name=B12 type=submit value="修改記錄">
                  <input class=bottom name=B22 type=reset value="重新填寫">
                  <input type="hidden" name="id" value="<%=rs("id")%>">
                  <input type="hidden" name="kind" value="1">
              </div>
			  </td>
          </tr>
		</table>  
		  
</form>


<%end if%>


<%if request.querystring("kind")="date" then%>
<%
    id=trim(Request("id"))
    sqlcmd = ("select  * from bbs1 where id="&id)           '查詢id(ID號)這條記錄
    rs.Open sqlcmd,newconn,1,1
%> 

<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>
	<form method="POST" action="modify.asp">
	
        <table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr>
            <td width="57" height="25" align="center">年份</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input name="bj" size="25" maxlength="30"  class="editbox1" value="<%=rs("bj")%>">
            </td>
          </tr>
          <tr>
            <td height="25" align="center">工號</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
              <input name="xh" size="25" maxlength="30" class="editbox1" value="<%=rs("xh")%>"></td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">姓名</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input name="user" size="25" maxlength="40" class="editbox1" value="<%=rs("user")%>">
            </td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">項目</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input type="text" name="kc" size="25" class="editbox1" value="<%=rs("kc")%>">
            </td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">分數</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
              <input name="cj" size="25" maxlength="100" class="editbox1" value="<%=rs("cj")%>">
            </td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">月份</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
                <select name="xq" class="editbox1">
                <option selected<%if rs("xq")="1" then response.write(" selected")%>>1</option>
                <option<%if rs("xq")="2" then response.write(" selected")%>>2</option>
                <option<%if rs("xq")="3" then response.write(" selected")%>>3</option>
                <option<%if rs("xq")="4" then response.write(" selected")%>>4</option>
                <option<%if rs("xq")="5" then response.write(" selected")%>>5</option>
                <option<%if rs("xq")="6" then response.write(" selected")%>>6</option>
                <option<%if rs("xq")="7" then response.write(" selected")%>>7</option>
                <option<%if rs("xq")="8" then response.write(" selected")%>>8</option>
				<option<%if rs("xq")="8" then response.write(" selected")%>>9</option>
				<option<%if rs("xq")="8" then response.write(" selected")%>>10</option>
				<option<%if rs("xq")="8" then response.write(" selected")%>>11</option>
				<option<%if rs("xq")="8" then response.write(" selected")%>>12</option>
				
              </select>
            </td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">類型</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
            <select name="lx" type="lx">
               <option<%if rs("lx")="績效工資" then response.write(" selected")%>>績效工資</option>
               <option<%if rs("lx")="基本工資" then response.write(" selected")%>>基本工資</option>
               <option<%if rs("lx")="獎金" then response.write(" selected")%>>獎金</option>
            </select>

            </td>
          </tr>
          <tr>
            <td height="25" colspan="3">　　　　　　　　
                <div align="center">
                  <input class=bottom name=B12 type=submit value="修改記錄">
                  <input class=bottom name=B22 type=reset value="重新添寫">
                  <input type="hidden" name="id" value="<%=rs("id")%>">
                  <input type="hidden" name="kind" value="2">
              </div></td>
          </tr>
        </table>
</form>
</td>
  </tr>
</table>
<%end if%>

<%if request.querystring("kind")="bj" then%>

<%
    id=trim(Request("id"))
    sqlcmd = ("select  * from bjb where id="&id)          '查詢id(ID號)這條記錄
    rs.Open sqlcmd,newconn,1,1
%>
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><form method="POST" action="modify.asp">
        <table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr>
            <td height="25" align="center">&nbsp;</td>
            <td height="25">&nbsp;</td>
            <td height="25">&nbsp;</td>
          </tr>
          <tr>
            <td width="57" height="25" align="center">年代</td>
            <td width="16" height="25">　</td>
            <td width="225" height="25">
              <input name="bj" size="25" maxlength="30"  class="editbox1" value="<%=rs("bj")%>">
            </td>
          </tr>
          <tr>
            <td height="25" align="center">工號代碼</td>
            <td width="16" height="25">&nbsp;</td>
            <td width="225" height="25">
              <input name="xhf" type="text" size="25" maxlength="30" class="editbox1" value="<%=rs("xhf")%>"></td>
          </tr>

          <tr>
            <td height="25" colspan="3">　　　　　　　　
                <div align="center">
                  <input class=bottom name=B12 type=submit value="修改記錄">
                  <input class=bottom name=B22 type=reset value="重新填寫">
                  <input type="hidden" name="kind" value="3">
                  <input type="hidden" name="id" value="<%=rs("id")%>">
              </div></td>
          </tr>
        </table>
</form>
</td>
  </tr>
</table>

<%end if%>

<%if request.querystring("kind")="kc" then%>
<%
    id=trim(Request("id"))
    sqlcmd = ("select  * from kcb where id="&id)           '查詢id(ID號)這條記錄
    rs.Open sqlcmd,newconn,1,1
%> 
<table width=768 border="0" align=center cellpadding="0" cellspacing="0"><td align="center" width="50%"><br>
<form name="form1" method="post" action="modify.asp">
<table width="50%"  border="1" cellspacing="0" cellpadding="0" bordercolor="#CCCCCC">
  <tr align="center">
    <td height="32" colspan="2">修改與相對應的項目及類型</td>
    </tr>
  <tr>
    <td width="26%" align="center">年代</td>
    <td width="74%"><input type="text" name="bj" size="30" value="<%=rs("bj")%>">
          </td>
  </tr>
  <tr>
    <td align="center">項目</td>
    <td><input name="kc" type="text" size="30" value="<%=rs("kc")%>"></td>
  </tr>
    <tr>
    <td align="center">月份</td>
    <td><select name="select" class="editbox1">
              <option selected<%if rs("xq")="1" then response.write(" selected")%>>1</option>
              <option<%if rs("xq")="2" then response.write(" selected")%>>2</option>
              <option<%if rs("xq")="3" then response.write(" selected")%>>3</option>
              <option<%if rs("xq")="4" then response.write(" selected")%>>4</option>
              <option<%if rs("xq")="5" then response.write(" selected")%>>5</option>
              <option<%if rs("xq")="6" then response.write(" selected")%>>6</option>
              <option<%if rs("xq")="7" then response.write(" selected")%>>7</option>
              <option<%if rs("xq")="8" then response.write(" selected")%>>8</option>
              <option<%if rs("xq")="8" then response.write(" selected")%>>9</option>
              <option<%if rs("xq")="8" then response.write(" selected")%>>10</option>
              <option<%if rs("xq")="8" then response.write(" selected")%>>11</option>
              <option<%if rs("xq")="8" then response.write(" selected")%>>12</option>
            </select></td>
  </tr>
  <tr>
    <td align="center">類型</td>
    <td><select name="select2" type="lx">
              <option<%if rs("lx")="績效工資" then response.write(" selected")%>>績效工資</option>
              <option<%if rs("lx")="基本工資" then response.write(" selected")%>>基本工資</option>
              <option<%if rs("lx")="獎金" then response.write(" selected")%>>獎金</option>
            </select></td>
  </tr>

  <tr align="center">
    <td colspan="2">
    <input name="kind" type="hidden" value="4">
    <input type="submit" name="Submit" value="提交">&nbsp;
      <input type="reset" name="Submit2" value="重置">
      <input type="hidden" name="id" value="<%=rs("id")%>"></td>
    </tr>
  <tr>
    <td colspan=2><table width=100% cellspacing="0" cellpadding="0">
    <tr><td width=15% align=center>
    注意</td><td>1.填寫完后請到項目管理一欄進行確認。
    </td>
    </tr>
</table>
</form>

</td>
</tr>
</table>
<br><br>
<%end if%>



<!--#include file="inc/copyright.asp"-->