work_del.asp

嘉缘人才6.0精简 ,很好用的人才系统

<%ds="../"%>
<!--#include file="../conn/conn.asp" -->
<!--#include file="../inc/sub.asp"-->
<!--#include file="checkpmember.asp" -->
<%
work_id=clng(trim(request("id")))
action=cint(trim(request("action")))
rid=clng(trim(request("rid")))

'删除工作经历

    conn.execute("delete from job_p_work where work_id="&work_id)
'   --更新简历时间
    conn.execute("update job_p_resume set resume_announcedate=date()  where resume_id="&rid)
'   --判断是否还有该语言版本的教育经历,若没有则把该简历中的相应语言版本的教育标志置0
    sql="select count(*) as worknum from work where work_resumeid=@work_resumeid and work_language="&lang
    set rs=server.CreateObject("adodb.recordset")
	rs.open sql,conn,1,1
	worknum=rs("worknum")
	rs.close
	set rs=nothing
	if worknum=0 then    
       conn.execute("update job_p_resume set resume_work=0 where resume_id="&rid)
     end if
conn.close
set conn=nothing

 response.redirect "works.asp?action="&action&"&rid="&rid&""
 response.end

%>