📄 skill_add.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"),22)
id=request.querystring("id")
%>
<form name="form1" method="post" action="Skill_add.asp?id=<%response.write id%>">
<table width="60%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2" class="td1">
<img src="../images/sub01_05.jpg" height="25" align="middle">
<a href="Search_emly.asp?id=<%response.write id%>">员工搜索</a>-->
<a href="Search.asp?id=<%response.write id%>">档案维护</a>-->
<a href="Skill_list.asp?id=<%response.write id%>">技能维护</a>-->
技能添加
</td>
</tr>
<tr>
<td width="22%"><div align="right">员工编号：</div></td>
<td width="78%"><%response.write id%></td>
</tr>
<tr>
<td><div align="right">技 能：</div></td>
<td><input name="technic" type="text" size="15"></td>
</tr>
<tr>
<%
Dim res
id=request.QueryString("id")
Set res=server.CreateObject("adodb.recordset")
res.open "select * from techpost",conn,1,1
%>
<td><div align="right">技能职称：</div></td>
<td>
<select name="level">
<option>-请选择-</option>
<%
While Not res.eof
response.write"<option value='"&res(0)&"'>"&res(1)
res.movenext
Wend
res.close
Set res = Nothing
%>
</td>
</tr>
<tr>
<td><div align="right">技能描述：</div></td>
<td><input type="text" name="descript"></td>
</tr>
<tr>
<td valign="top"> <div align="right">备 注：</div></td>
<td><textarea name="remark" cols="40" rows="10"></textarea></td>
</tr>
<tr>
<td colspan="2">
<div align="center">
<input type="submit" name="Submit" value="提交" class="button">
<input type="reset" name="Submit2" value="重置" class="button">
</div> </td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td colspan="2" class="td1"><div align="center"><a href="Skill_list.asp?id=<%response.write id%>">返回</a></div></td>
</tr>
</table>
</form>
<%
If request.Form("submit")<>"" Then
id=request.querystring("id")
technic=Trim(request.Form("technic"))
level=Trim(request.Form("level"))
'response.write level
'response.end
descript=Trim(request.Form("descript"))
remark=Trim(request.Form("remark"))
If technic<>"" Then
Set res=server.CreateObject("adodb.recordset")
res.open"insert into skill (personnel_id,skill_technic,skill_level,skill_descript,skill_remark) values ("&id&",'"&technic&"',"&level&",'"&descript&"','"&remark&"')",conn,3,3
response.redirect("skill_list.asp?id="&id&"")
Else
response.write"<script>alert('员工编号和技能职称不能为空！');window.location.href('skill_add.asp?id="&id&"');</script>"
End If
End If
%>
<!--#include file="../Include/bottom.asp"-->
<!--内容结束-->
</div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -