  <% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="16"
	dir="../err.asp" 
  %>
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
<!--#include file="../rolecheck.asp"-->

<%
dim jobuserid,typeid 
jobuserid=Replace_Text(request("jobuserid"))
typeid=Replace_Text(request("typeid"))
 
if jobuserid="" then
response.Write("<script >alert('对不起！参数传递错误!');history.back(-1);</script>")
response.End()
end if
 
  conn.execute "update yixiang_jobuser set islock=1 where id="&jobuserid
    conn.close
  response.Redirect(request.ServerVariables("HTTP_REFERER"))
%>