📄 allshow_emly.asp
字号:
<input type="text" name="birthday" size="10" onFocus="javascript:ShowCalendar(this.name)" value=<%=rs("personnel_birthday")%>> </td>
<td><span class="STYLE2 STYLE1">*</span>籍贯：</td>
<td><input name="hometown" type="text" size="8" value="<%=rs("personnel_hometown")%>" datatype="Chinese" msg="籍贯填写错误！" onKeyUp="testlen(this,2,0)"></td>
<td> </td>
</tr>
<tr>
<td>民族：</td>
<td><input name="nation" type="text" size="8" value="<%=rs("personnel_nation")%>" datatype="Chinese" msg="民族填写错误！" onKeyUp="testlen(this,5,0)"></td>
<td><span class="STYLE2 STYLE1">*</span>婚姻状况：</td>
<td>
<select name="marry" datatype="Require" msg="未选择婚姻状况！">
<option value="已婚" <%
if rs("personnel_marry")="已婚" then
Response.Write "selected"
end if
%> >已婚
<option value="未婚" <%
if rs("personnel_marry")="未婚" then
Response.Write "selected"
end if
%>>未婚
<option value="离异"<%
If rs("personnel_marry")="离异" Then
End If
%>>离异
</select> </td>
<td><div align="right">专业：</div>
</td>
<td><input name="major" type="text" maxlength="8" size="15" value="<%=rs("personnel_major")%>" datetype="Chinese" msg="专业输入错误！" ></td>
</tr>
<tr>
<td height="23">政治面貌：</td>
<td><input name="political" type="text" size="8" value="<%=rs("personnel_political")%>" datatype="Chinese" msg="政治面貌填写错误！" onKeyUp="testlen(this,3,0)"></td>
<td><span class="STYLE2 STYLE1">*</span>身份证号：</td>
<td><input type="text" name="idcode" value="<%=rs("personnel_idcode")%>" datatype="IdCard" msg="身份证号填写错误！" onKeyUp="testlen(this,15,0)"></td>
<td><div align="right"><span class="STYLE2 STYLE1">*</span>邮政编码：</div></td>
<td><input name="postcode" type="text" size="8" value="<%=rs("personnel_postcode")%>" datatype="Zip" msg="邮政编码填写错误！" onKeyUp="testlen(this,6,0)"></td>
</tr>
<tr>
<td><span class="STYLE2 STYLE1">*</span>最高学历：</td>
<td><input name="educ" type="text" size="8" value="<%=rs("personnel_educ")%>" datatype="Chinese" msg="最高学历填写错误！" onKeyUp="testlen(this,3,0)"></td>
<td>毕业院校：</td>
<td><input type="text" name="graduate" value="<%=rs("personnel_graduate")%>" datatype="Chinese" msg="毕业院校填写错误" onKeyUp="testlen(this,6,0)"></td>
<td><div align="right">EMAIL：</div></td>
<td><input name="email" type="text" size="15" value="<%=rs("personnel_email")%>" datatype="Email" msg="Email 格式不正确！" onKeyUp="testlen(this,25,0)"></td>
</tr>
<tr>
<td><span class="STYLE2 STYLE1">*</span>家庭住址：</td>
<td><input type="text" name="address" value="<%=rs("personnel_address")%>" datatype="CEN" msg="家庭住址填写错误！" onKeyUp="testlen(this,20,0)"></td>
<td>住宅电话：</td>
<td><input name="fphone" type="text" size="12" value="<%=rs("personnel_fphone")%>" datatype="Phone" msg="住宅电话填写错误！" onKeyUp=""></td>
<td><div align="right">移动电话：</div></td>
<td><input name="mphone" type="text" size="12" value="<%=rs("personnel_mphone")%>" datatype="Mobile" msg="移动电话填写错误！" onKeyUp=""></td>
</tr>
<tr>
<td><span class="STYLE2 STYLE1">*</span>职称：</td>
<td id="leve" >
<select name="level" datatype="Require" msg="未选择职称！">
<%
dim rs_zc
set rs_zc=server.CreateObject("ADODB.recordset")
rs_zc.open "select tp_id,tp_name from techpost",conn,1,1
while not rs_zc.eof=true
if rs_zc.Fields(0).value=rs("personnel_level") then
response.Write"<option value='"&rs_zc.Fields(0).value&"' selected>"&rs_zc.Fields(1).value
else
response.Write"<option value='"&rs_zc.Fields(0).value&"'>"&rs_zc.Fields(1).value
end if
rs_zc.movenext
wend
rs_zc.Close
set rs_zc=nothing
%>
</select> </td>
<td>技术技能：</td>
<td><input type="text" name="skill" value="<%=rs("personnel_skill")%>" datatype="CEN" msg="技术技能填写错误！" onKeyUp="testlen(this,20,0)"></td>
<td><div align="right"><span class="STYLE2 STYLE1">*</span>是否部门负责人：</div></td>
<td>
<select name="deptman" datatype="Require" msg="未选择是否部门负责人！">
<option value="1" <%
if rs("personnel_deptman")=1 then
Response.Write "selected"
end if
%> >是
<option value="0" <%
if rs("personnel_deptman")=0 then
Response.Write "selected"
end if
%>>否
</select> </td>
</tr>
<tr>
<td>入职时间：</td>
<td><%=rs("personnel_sdate")%></td>
<td>离职时间：</td>
<td><%=rs("personnel_ldate")%></td>
<td><div align="right">员工状态：</div></td>
<td><%=rs("personnel_state")%></td>
</tr>
<tr>
<td valign="top">个人描述：</td>
<td colspan="5"><textarea name="descript" cols="95" rows="5" datatype="CEN" msg="个人描述填写错误！" onKeyUp="testlen(this,150,0)"><%=rs("personnel_descript")%></textarea></td>
</tr>
<tr>
<td colspan="6"><div align="center">
<input type="submit" name="Submit2" value="提交" class="button">
</div></td>
</tr>
<tr>
<td colspan="6"> </td>
</tr>
<tr>
<td colspan="6"><div align="center"><a href="Search.asp?id=<%=rs(0)%>">返回</a></div></td>
</tr>
</table>
<tr>
<td height="3"><div align="center"><hr size="1"></div></td>
</tr>
<tr>
<td><div align="center">
<div align="center"> Copyright<font size="2">(C)</font> 2006, All Rights Reserved STWHR06011-B</div>
</div>
</td>
</tr>
</form>
<div id="ph" style="position:absolute; width:238px; height:61px; left: 480px; z-index;top: 95px;">
<form name="photo" method="post" enctype="multipart/form-data" action="photoup.asp">
个人照片：
<input name="p_id" type="hidden" value="<%=rs(0)%>">
<input name="file" type="file" size="12">
<input type="button" name="chuan" value="上传" onClick="recheck()">
</form>
</div>
<%
Dim dept,post,plevelid,propertys,name1,sex,birthday,hometown,nation,marry,major,political,idcode,postcode,educ,graduate,email,address,fphone,mphone,level,skill,deptman,descript,sql
elseif op="1" then
id=request.QueryString("id")
'psonid=trim(request.Form("psonid"))
dept=trim(request.Form("dept"))
post=trim(request.Form("post"))
plevelid=trim(request.form("plevel"))
propertys=trim(request.form("propertys"))
name1=trim(request.Form("name1"))
sex=trim(request.Form("sex"))
birthday=trim(request.Form("birthday"))'&"-"&trim(request.Form("mm"))&"-"&trim(request.Form("dd"))
hometown=trim(request.Form("hometown"))
nation=trim(request.Form("nation"))
marry=trim(request.Form("marry"))
major=trim(request.Form("major"))
political=trim(request.Form("political"))
idcode=trim(request.Form("idcode"))
postcode=trim(request.Form("postcode"))
educ=trim(request.Form("educ"))
graduate=trim(request.Form("graduate"))
email=trim(request.Form("email"))
address=trim(request.Form("address"))
fphone=trim(request.Form("fphone"))
mphone=trim(request.Form("mphone"))
level=trim(request.Form("level"))
skill=trim(request.Form("skill"))
deptman=trim(request.Form("deptman"))
descript=trim(request.form("descript"))
'If dept<>"" And post<>"" and name1<>"" and deptman<>"" and sex<>"" and birthday<>"" and educ<>"" and marry<>"" and idcode<>"" and hometown<>"" and level<>"" and skill<>"" Then
'sql="update personnel set dept_id='"&dept&"',post_id='"&post&"',plevel_id='"&plevelid&"',work_property='"&propertys&"',personnel_name='"&name1&"',personnel_deptman='"&deptman&"',personnel_nation='"&nation&"',personnel_sex='"&sex&"',personnel_birthday='"&birthday&"',personnel_educ='"&educ&"',personnel_marry='"&marry&"',personnel_major='"&major&"',personnel_idcode='"&idcode&"',personnel_political='"&political&"',personnel_hometown='"&hometown&"',personnel_address='"&address&"',personnel_postcode='"&postcode&"',personnel_mphone='"&mphone&"',personnel_fphone='"&fphone&"',personnel_email='"&email&"',personnel_level='"&level&"',personnel_skill='"&skill&"',personnel_descript='"&descript&"',personnel_graduate='"&graduate&"' where personnel_id="
conn.execute "update personnel set dept_id='"&dept&"',post_id='"&post&"',plevel_id='"&plevelid&"',personnel_name='"&name1&"',personnel_deptman='"&deptman&"',personnel_nation='"&nation&"',personnel_sex='"&sex&"',personnel_birthday='"&birthday&"',personnel_educ='"&educ&"',personnel_marry='"&marry&"',personnel_idcode='"&idcode&"',personnel_political='"&political&"',personnel_hometown='"&hometown&"',personnel_address='"&address&"',personnel_postcode='"&postcode&"',personnel_mphone='"&mphone&"',personnel_fphone='"&fphone&"',personnel_email='"&email&"',personnel_level='"&level&"',personnel_skill='"&skill&"',personnel_descript='"&descript&"',personnel_graduate='"&graduate&"' where personnel_id="&id
'response.Write sql
'response.End
response.redirect("Search.asp?id="&id&"")
Else
response.write "<script>alert('带*的不能为空');history.go(-1);</script>"
'End If
End If
%>
<!--内容结束-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -