update_guanglifw.asp

来自「这是一个很好的图书管理借阅登记系统,有这爱好的可以下载下来看看,很完整的」· ASP 代码 · 共 21 行

<!-- #include file="config.asp"-->
<%
if session("LHB_Group")<> 1 then
response.write "<script language=JavaScript>" & chr(13) & "alert('修改权限不够，请返回');" & "history.back()" & "</script>" 
Response.End
end if

L_GongHao=Request("LouHB_GongHao")
L_XiTongBM=Request("LouHB_XiTongBM")
L_GuangLiQX=Request("LouHB_GuangLiQX")

sql="update LHB_XiTong set L_GuangLiQX='"&L_GuangLiQX&"' where L_GongHao='"&L_GongHao&"' and L_XiTongBM='"&L_XiTongBM&"'"
'response.write sql
'response.end
Lours.Open sql,Louconn,1,3

response.write "<script language=JavaScript>" & chr(13) & "alert('恭喜！管理权限修改成功！');"&"window.location.href = 'LHB_user.asp'"&" </script>" 

set Lours=nothing
set Louconn=nothing
%>