allow specific users to make specific actions based on information given in a form

[Oblivion_Creed]

I have a library project in which there are many library's and each has worker in it.


When worker enters the project he type in the library in which his working and his ID.
If all the data is correct than the librarian can take or return books that are assigned to his library.

now how can i do that?

my project:

Login Form:

I need it to raise an error if ID is not ok (does not exist / dont match with the library)



here is how the librarians table looks like:








If user push the button he should be moved to a form where he has options of returning a book , writing a book and so on..


how can i do such thing?

[CJ_London]

you would use vba and an if clause. You haven't provided enough information to provide detailed code but it would perhaps be something like this in the click event for your login button

if dcount("*","tblLibrarians","LibraryNumber=" & me.cboLibrary & " AND IDNumber=" & me.txtLoginID)<>0 then 'there is a match on library and user so user can use this library
    docmd.openform "frmBookOptions"
else 'user not found for this library
    msgbox "Sorry, you do not have access to this library"
end if

[Oblivion_Creed]

you would use vba and an if clause. You haven't provided enough information to provide detailed code but it would perhaps be something like this in the click event for your login button

if dcount("*","tblLibrarians","LibraryNumber=" & me.cboLibrary & " AND IDNumber=" & me.txtLoginID)<>0 then 'there is a match on library and user so user can use this library
    docmd.openform "frmBookOptions"
else 'user not found for this library
    msgbox "Sorry, you do not have access to this library"
end if

what other details should i bring?

[CJ_London]

just realised your idnumber is text, so modify to

....AND IDNumber='" & me.txtLoginID & "'")....

what other details should i bring?

name of your form you want opening, how you want it opened. names of the controls on your form. what happens if the user is not identified as a valid user (system closed, user given another opportunity to login, etc). whether or not you need to retain the userID for use elsewhere. Whether the form you are opening is a generic form for all libraries or you have different forms for different libraries (which is not generally not recommended)

Background around how your login form is used - can the user be a member of more than one library? does the user login, take or return a book and logout again, or remains logged in for the day.

The code I provided is a very basic level. From your description and table, it looks like a user can only be a member of one library - so why ask them to choose a library? As a security measure it doesn't really stand up to scrutiny and will be easily overcome by a user who wants to login as someone else

[Oblivion_Creed]

just realised your idnumber is text, so modify to

....AND IDNumber='" & me.txtLoginID & "'")....



name of your form you want opening, how you want it opened. names of the controls on your form. what happens if the user is not identified as a valid user (system closed, user given another opportunity to login, etc). whether or not you need to retain the userID for use elsewhere. Whether the form you are opening is a generic form for all libraries or you have different forms for different libraries (which is not generally not recommended)

Background around how your login form is used - can the user be a member of more than one library? does the user login, take or return a book and logout again, or remains logged in for the day.

The code I provided is a very basic level. From your description and table, it looks like a user can only be a member of one library - so why ask them to choose a library? As a security measure it doesn't really stand up to scrutiny and will be easily overcome by a user who wants to login as someone else

My whole project is written in Hebrew, will that be a problem?

[CJ_London]

for me, yes!

As said, I've provided a basic example - this may be enough for you to move forward or it may not. If it isn't then more detail, along the lines I have suggested, will be required

[Oblivion_Creed]

what other details should i bring?

Im a real noob and im not sure how to import that...

Here's the tables name in hebrew with translate, could you please simply copy and paste?

ספרנים - Librarians table name

תעודת זהות - ID (of the Librarian in the Librarians table)

מספר סיפרייה - Library number in the Librarians table


סיפריות - Library table name

קוד סיפרייה - Library number in Library table



if it helps here are the codes in builder to the specific data:

[ספרנים]![תעודת זהות] - librarian ID in librarian table

[ספרנים]![מספר סיפרייה] - library number in librarian table

[סיפריות]![קוד סיפרייה] - library number in library table

[CJ_London]

that is information you have already provided.

Im a real noob and im not sure how to import that...

copy and paste in the click event for your login button then correct for name spellings

[Oblivion_Creed]

that is information you have already provided.

copy and paste in the click event for your login button then correct for name spellings

is ther any place there where you can paste that as a code?

[CJ_London]

I don't understand the question - I provided code for you to copy and paste to the click event of your login button

[Oblivion_Creed]

what other details should i bring?

what me.cbolibrary stands for?

[CJ_London]

the cbo prefix is standard terminology to identify a control as a combobox. You had not provided the names of your controls so I used that instead

[Oblivion_Creed]

you would use vba and an if clause. You haven't provided enough information to provide detailed code but it would perhaps be something like this in the click event for your login button

if dcount("*","tblLibrarians","LibraryNumber=" & me.cboLibrary & " AND IDNumber=" & me.txtLoginID)<>0 then 'there is a match on library and user so user can use this library
    docmd.openform "frmBookOptions"
else 'user not found for this library
    msgbox "Sorry, you do not have access to this library"
end if

i tried to use the code (changing parameters name) and it gave me this error: "Run Time Error 3464: Data Type Mismatch in criteria expression




edit: nvm you fixed it

"

[CJ_London]

my original code assumed that LibraryNumber and IDNUmber were both numeric, but in post #4 I corrected it for txtloginID