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

📄 changec.asp

📁 企业信息化管理系统:针对的是一个计算机配件生产公司为背景实现的。
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>员工工信息修改</title>
</head>
<script language="vbscript">
sub enter_onclick()
yes =window.confirm("是否要修改此人信息!?")
if yes = true then
    f.submit()
end if
end sub
</script>
<body>
<%

temp=request.form("hidden1")
'response.write(temp)
%>
<!--#include file ="Connections/auto.asp"--> 
<%
  set RS = server.CreateObject("ADODB.Recordset")
  Sname = "select *from Login, Message where  Message.ID ='"& temp & "'and Message.ID=Login.ID"
  RS.open Sname , CN
%>
<form  id="f" method="post" action="changecc.asp?op=<%=temp%>">
<table width="566" border="0" cellspacing="1" bgcolor="#336699" cellpadding="0" align="center">
  <tr>
     <td colspan="2" align="center" bgcolor="#FFFFFF"><div id="title" ><% response.write(RS("Name"))%> 
     信息</div></td>
	 <td align="center" bgcolor="#FFFFFF">修改内容</td>
  </tr>
  <tr>
    <td width="105" align="right" bgcolor="#FFFFFF">员工编号:&nbsp;</td>
    <td width="177" bgcolor="#FFFFFF">&nbsp;<% response.write(RS("ID"))%></td>
	<td width="276" bgcolor="#FFFFFF">&nbsp;<input type="text" name="id" value="<%response.write(RS("ID"))%>"></td>
  </tr>
  <tr>
    <td  align="right" bgcolor="#FFFFFF">姓名:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Name"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input type="text" name="lname" value="<%=RS("Name")%>"></td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">部门:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Part"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<select name="part" onChange="chan()" onFocus="chan()" onBlur="chan()">
	  <option value="财务部" <%if strcomp(RS("Part"),"财务部")=0 then response.Write("selected") end if%>>财务部</option>
	  <option value="人事部" <%if strcomp(RS("Part"),"人事部")=0 then response.Write("selected") end if%>>人事部</option>
	  <option value="企划部" <%if strcomp(RS("Part"),"企划部")=0 then response.Write("selected") end if%>>启划部</option>
    </select></td>
  </tr>
    <tr>
    <td align="right" bgcolor="#FFFFFF">职务:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Position"))%></td>
	<td id=PPP bgcolor="#FFFFFF">&nbsp;<select name="position" >
      <option>经理</option>
      <option>秘书</option>
      <option>员工</option>  
	    
    </select></td>
    </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">出生日期:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Data"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input name="data" type="text" value="<% =RS("Data")%>"> 
    &quot;####-##-##&quot;</td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">身份证号:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("PC"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input name="pc" type="text" value="<% =RS("PC")%>">
    &quot;18位&quot;</td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">电话:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("HomeTel"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input name="hometel" type="text" value="<% =RS("Hometel")%>"> 
    &quot;8位&quot;</td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">手机号码:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Tel"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input name="tel" type="text" value="<% =RS("Tel")%>">
    &quot;11位&quot;</td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">家庭住址:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Address"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input name="address" type="text" value="<% =RS("Address")%>"></td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">入公司时间:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("Start"))%></td>
	<td bgcolor="#FFFFFF">&nbsp;<input name="start" type="text" value="<% =RS("Start")%>"> &quot;####-##-##&quot;</td>
  </tr>
  <tr>
    <td align="right" bgcolor="#FFFFFF">个人简历:&nbsp;</td>
    <td bgcolor="#FFFFFF">&nbsp;<% response.write(RS("History"))%></td>
	<td bgcolor="#FFFFFF">
	  &nbsp;<textarea name="history"><% =RS("History")%>
	  </textarea></td>
  </tr>
    <tr>
    <td colspan="3" align="right" bgcolor="#FFFFFF"><input name="enter" type="button" id="enter" value="确认提交"></td>
    </tr>
</table>
</form>
  <%
   RS.close
   CN.close
  %>    
</body>
</html>

⌨️ 快捷键说明

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