huiyuanok.asp

来自「网佳网络办公系统（以下简称OA）是一套基于B/S模式的无纸化办公系统。[显著特点」· ASP 代码 · 共 24 行

<!--#include file="config.asp"-->
<%
username=session("hxf_u_nickname")
grade=session("hxf_u_grade")
mykind=session("mykind")
mypai=session("mypai")
if username=""  then  Response.Redirect "../error.asp?id=440"
name=Request("lname")
caozuo=Request("caozuo")
jibie=Request.Form("dengji")
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
connstr=Application("hg_connstr")
conn.open connstr
if caozuo=1 then
sql="update 用户 set 状态='2' where 姓名='"& name &"'"
else
sql="update 用户 set 状态='正常' where 姓名='"& name &"'"
end if
conn.execute(sql)
Response.Redirect "huiyuan.asp"
rs.close
set rs=nothing
%>