•'get user-specific data from login
table - return TRUE if false if person is logged out
•
•FUNCTION GetUserData
• SQLNoDebug
"SELECT _ID,Email_,RTRIM(ISNULL(Group_,'')) AS "+_
•
"Group_,Password_,Status__lookup_ FROM Application_ WHERE
"+_
•
"Email_='"+cUsername+"' AND
Password_='"+cPassword+"'"
• IF oRS.EOF
THEN
• IF
cUsername="" THEN
• 'log the user
out, but do allow access to the page
• Logout
•
GetUserData=TRUE
•
LoginOptions
• ELSE
• Close
• SQLNoDebug
"SELECT Email_,Password_ FROM Application_ WHERE "+_
•
"Email_='"+cUsername+"'"