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

📄 update.asp

📁 人力资源管理系统(绝对是大型的真正商业代码)
💻 ASP
字号:
<!--#include file="../dbconn.asp"-->
<html>
<head>
<link rel="stylesheet" type="text/css" href="../css/cdol.css">
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<title>个人简历修改结果</title>
</head>
<body  topmargin=0 marginheight=0 bgColor=#E6E5B8 text="#383098">
现在位置:<a href="../index.asp">首页</a>—<a href="postcom.htm">会员注册</a>--修改结果 
<%if Request.Form("id")="" then
Response.Redirect "comlogin.htm"
else%>
<% 
ID=trim(Request.Form("ID")) 
passwd=trim(Request.Form("passwd_1")) 
name=trim(Request.Form("cname")) 
sex=trim(Request.Form("sex")) 
old=trim(Request.Form("old")) 
marry=trim(Request.Form("marry")) 
address=trim(Request.Form("address")) 
phone=trim(Request.Form("phone"))
bp=trim(Request.Form("bp"))
email=trim(Request.Form("email"))
gradu=trim(Request.Form("gradu"))
edu=trim(Request.Form("edu"))
school=trim(Request.Form("school"))
subject=trim(Request.Form("subject")) 
years=trim(Request.Form("work_year")) 
company=trim(Request.Form("company")) 
position=trim(Request.Form("position"))
computer=trim(Request.Form("computer"))
english=trim(Request.Form("english"))
other=trim(Request.Form("other"))
area=trim(Request.Form("job_area"))
salary=trim(Request.Form("salary_wish")) 
jobname=trim(Request.Form("jobname_wish")) 
jobclass=trim(Request.Form("jobclass_wish")) 
Dim SQL
SQL = "Update resume " & "Set " & "pwd="
SQL = SQL & "'" & passwd & "'" & ", "
SQL = SQL & "name="
SQL = SQL & "'" & name & "'" & ", "
SQL = SQL & "sex="
SQL = SQL & "'" & sex & "'" & ", "
SQL = SQL & "old="
SQL = SQL & "'" & old & "'" & ", "
SQL = SQL & "marry="
SQL = SQL & "'" & marry & "'" & ", "
SQL = SQL & "address="
SQL = SQL & "'" & address & "'" & ", "
SQL = SQL & "phone="
SQL = SQL & "'" & phone & "'" & ", "
SQL = SQL & "bp="
SQL = SQL & "'" & bp & "'" & ", "
SQL = SQL & "email="
SQL = SQL & "'" & email & "'" & ", "
SQL = SQL & "gradu="
SQL = SQL & "'" & gradu & "'" & ", "
SQL = SQL & "edu="
SQL = SQL & "'" & edu & "'" & ", "
SQL = SQL & "school="
SQL = SQL & "'" & school & "'" & ", "
SQL = SQL & "subject="
SQL = SQL & "'" & subject & "'" & ", "
SQL = SQL & "work_year="
SQL = SQL & "'" & years & "'" & ", "
SQL = SQL & "company="
SQL = SQL & "'" & company & "'" & ", "
SQL = SQL & "position="
SQL = SQL & "'" & position & "'" & ", "
SQL = SQL & "computer="
SQL = SQL & "'" & computer & "'" & ", "
SQL = SQL & "english="
SQL = SQL & "'" & english & "'" & ", "
SQL = SQL & "other="
SQL = SQL & "'" & other & "'" & ", "
SQL = SQL & "job_area="
SQL = SQL & "'" & area & "'" & ", "
SQL = SQL & "salary_wish="
SQL = SQL & "'" & salary & "'" & ", "
SQL = SQL & "jobname_wish="
SQL = SQL & "'" & jobname & "'" & ", "
SQL = SQL & "jobclass_wish="
SQL = SQL & "'" & jobclass & "'"
SQL = SQL & " where userid=" & ID
Conn.Execute SQL
Response. Write "<html><body><center><font size=3>数据已经成功更新!<p>"
Response.Write "<a href='modresu.asp'> 查看结果 </a>"
Response.Write "</font></center></body></html>"
Conn.Close
Set Conn = Nothing %>
<%end if%>
</body>
</html>








⌨️ 快捷键说明

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