⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 contract_add.asp

📁 武汉软件园人力资源管理系统完整源代码,希望大家能够多多交流.
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>人力资源管理系统≡技能添加≡</title>
<link href="../Include/type.css" rel="stylesheet" type="text/css">
</head>

<body>
<!--#include file="../Include/conn.asp"-->
<!--#include file="../Include/Head.asp"-->
<!--#include file="../Include/Syscheck.asp"-->
<div id="content" style="position:absolute; width:90%; height:115px; z-index:3; left: 48px; top: 190px;">
<!--内容开始-->
<%
call checkin_sys(session("UsersId"),session("PerId"),24)
id=request.querystring("id")
Set res=server.CreateObject("adodb.recordset")
res.open "select * from pactdata",conn,1,1
%>
<script type="text/javascript" src="date/date.js"></script>
<script type="text/javascript">
</script>
  <form name="form1" method="post" action="Contract_add.asp?id=<%response.Write id%>">
<table width="60%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr class="td1"> 
	<td colspan="2">
	<img src="../images/sub01_05.jpg" height="25" align="middle">
		<a href="Search_emly.asp?id=<%response.write id%>">员工搜索</a>--&gt;
		<a href="Search.asp?id=<%response.write id%>">档案维护</a>--&gt;
		<a href="Contract_list.asp?id=<%response.write id%>">合同维护</a>--&gt;
		<a href="Contract_add.asp?id=<%response.write id%>">合同添加</a>
	</td>
  </tr>
	<tr>
		<td width="20%"><div align="right">员工编号:</div></td>
		<td width="80%"><%response.Write id%></td>
	</tr>
    <tr>
     <td><div align="right">合同编号:</div></td>
	 <td>
	  <select name="pactid">
<%
      While Not res.eof
	      response.write "<option value='"&res(0)&"'>"&res(1)
		  res.movenext
	  wend
%>
      </select>	  </td>
  </tr>	

    <tr>
     <td><div align="right">签署时间:</div></td>
	 <td>
	 <INPUT type="text" name=text1 size="15"onfocus="javascript:ShowCalendar(this.name)">	 </td>
  </tr> 
     <tr>
     <td><div align="right">解除时间:</div></td>
	 <td>
	 <INPUT type="text" name=text2 size="15"onfocus="javascript:ShowCalendar(this.name)">	 </td>
  </tr> 
  <tr>
     <td valign="top"> <div align="right">备注:</div></td>
	 <td><textarea name="remark" cols="39" rows="4"></textarea></td>
  </tr>
    <tr> 
      <td colspan="2">
        <div align="center">
          <input type="submit" name="Submit" value="提交" class="button">
          &nbsp;&nbsp;
          <input type="reset" name="Submit2" value="重置" class="button">
          </div></td>
      </tr>
    <tr>
      <td colspan="2">&nbsp;</td>
    </tr>
    <tr>
      <td colspan="2" class="td1"><div align="center"><a href="Contract_list.asp?id=<%response.Write id%>">返回</a></div></td>
    </tr>
</table>
</form>
<%
res.close
Set res=Nothing 
%>
<%
If request.Form("submit")<>"" Then 
id=request.querystring("id")
pact=Trim(request.Form("pactid"))
sdate=Trim(Request.Form("text1"))
ldate=Trim(Request.Form("text2"))
remark=Trim(request.Form("remark"))
	If sdate<>"" and ldate<>"" Then 
		Set res=server.CreateObject("adodb.recordset")
		res.open "insert into pact (personnel_id,pactdata_id,pact_sdate,pact_ldate,pact_remark) values ('"&id&"','"&pact&"','"&sdate&"','"&ldate&"','"&remark&"')",conn,3,3
	response.redirect("Contract_list.asp?id="&id&"")
	Else 
		response.write"<script>alert('签署时间与解除时间不能为空!');window.location.href('Contract_add.asp?id="&id&"');</script>"
	End If 
End If 
%>
<!--内容结束-->
</div>
<!--#include file="../Include/bottom.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -