check_admin_user2.asp
<%
strSQL = "SELECT * FROM tblAdminUsers WHERE tblAdminUsers.UserID ='" & strAdminUserName & "' and tblAdminUsers.Access=5"
rsCheckAdminUser.Open strSQL, strCon
if rsCheckAdminUser.RecordCount=0 then
Session("AdminUserGood") = False
Response.Redirect"unauthorized_admin.htm"
End if
Set adoCon = Nothing
Set strCon = Nothing
Set rsCheckAdminUser = Nothing
%>
5 is the Number which u assigned for Administrator
Conn.CursorLocation = 3 do include this after giving the database location ok
it will work fine.
Topic Options
Post Options
Thanks(0)
