?? chkadmin.asp
字號:
<%
'判斷用戶是否有管理權限
If IsEmpty(Session("UserID")) Then
Response.Write GetErr(7)
Response.End
End If
strSQL="SELECT UI_IsAdmin_B FROM [UserInfo] WHERE UI_ID_N="&Session("UserID")
Set objRS=Server.CreateObject("ADODB.RecordSet")
objRS.Open strSQL,objConn,1,3
If objRS("UI_IsAdmin_B")=False Then
Response.Write GetErr(8)
CloseDatabase
Response.End
End If
objRS.Close
%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -