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

📄 result.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">
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<%if Request.Form("jobid")="" then
Response.Redirect "modjobin.htm"
else%>
<% 
id=trim(Request.Form("jobid")) 
jobname=trim(Request.Form("job_name")) 
jobclass=trim(Request.Form("job_class")) 
area=trim(Request.Form("job_area")) 
num=trim(Request.Form("job_num")) 
money=trim(Request.Form("job_money")) 
des=trim(Request.Form("job_des_req")) 
Dim SQL
SQL = "Update job " & "Set " & "job_name="
SQL = SQL & "'" & jobname & "'" & ", "
SQL = SQL & "job_class="
SQL = SQL & "'" & jobclass & "'" & ", "
SQL = SQL & "job_area="
SQL = SQL & "'" & area & "'" & ", "
SQL = SQL & "job_num="
SQL = SQL & "'" & num & "'" & ", "
SQL = SQL & "job_money="
SQL = SQL & "'" & money & "'" & ", "
SQL = SQL & "job_des_req="
SQL = SQL & "'" & des & "'"
SQL = SQL & " where jobid=" & ID
Conn.Execute SQL%>
<table border="0" width="100%">
  <tr>
    <td width="100%"><%Response.Write "<center>贵公司的招聘信息已经成功更新!请刷新后查看结果。<p>"  
Response.Write "<center><a href='modyourjob.asp?jobid="&id&"'>返回</a>"%> 
</td>
  </tr>
</table>
<p> </p>
<p> </p>
<p align="center"><a href="javascript:onClick= window.close()">关闭窗口</a></p>
<%Conn.Close
Set Conn = Nothing %>
<%end if%>
</body>
</html>














⌨️ 快捷键说明

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