求助:如何实现审核签名
hjh40 2006-01-14 11:02:29 这段代码可以实现审核,但是如何才能实现签名呢。审核人的数据库字段:manager,请高手指点,谢谢!
<%
dim referer
referer = Request.ServerVariables("HTTP_REFERER")
if request("action") = "showyes" then
manager=request("longlongadminname")
call showyes()
elseif request("action") = "showno" then
call showno()
elseif request("action") = "delarticle" then
call delarticle()
elseif request("action") = "alldel" then
call alldel()
end if
%>
<%sub showno()
sql="update news set ifshow=0 where id="&request("id")
conn.execute(sql)
response.redirect (referer)
end sub%>
<%sub showyes()
sql="update news set ifshow=1 where id="&cstr(request("id"))
conn.execute(sql)
rs("manager")=manager
response.redirect (referer)
end sub%>