Im having a few problems trying to get my login form to function properly. I have created a username and login form.
- created 2 unbound text boxes with user and password
- created a button that performs the function of calling the username and password based on whether the user enters the password correctly.
When you input the password it continue to prompt you to enter the password when it is the correct password.
Does anyone know how to get around this?
Thanks
database attached + code for command below
Private Sub cmdLogin_Click()
'Check to see if data is entered into the UserName combo box
If IsNull(Me.cboEmployee) Or Me.cboEmployee = "" Then
MsgBox "You must enter a User Name.", vbOKOnly, "Required Data"
Me.cboEmployee.SetFocus
Exit Sub
End If
'Check to see if data is entered into the password box
If IsNull(Me.txtPassword) Or Me.txtPassword = "" Then
MsgBox "You must enter a Password.", vbOKOnly, "Required Data"
Me.txtPassword.SetFocus
Exit Sub
End If
'Check value of password in tblEmployees to see if this matches value chosen in combo box
If Me.txtPassword.Value = DLookup("strEmpPassword", "tblEmployees", "[lngEmpID]=" & Me.cboEmployee.Value) Then
Else
MsgBox "Password Invalid. Please Try Again", vbOKOnly, "Invalid Entry!"
Me.txtPassword.SetFocus
End If
'If User Enters incorrect password 3 times database will shutdown
intLogonAttempts = intLogonAttempts + 1
If intLogonAttempts > 3 Then
MsgBox "You do not have access to this database. Please contact your system administrator.", vbCritical, "Restricted Access!"
Application.Quit
End If
I have a ms access application in Front End and linked tables to sql server 2008 r2 in back end.. every time I open my application the linked tables ask to me for the user and password of the sql server user of the odbc conection. I want to connect to my sql database without login every time the user open the application, I know that can be possible if I start session from vba code...
I have access 2010, I currently have a database in place and operational. What I am wondering is there a way to have a form come up whenever someone opens access and asks for a password and login name. Also I would like to have a 2 tier system. One for Admins and the other for users with limited access.
Works great, but when I hit the number "3", (3 times in row) it will let me into the form. I want it to not let me in IF I don't know the password.
Where did I go wrong?
Private Sub Form_Load() Dim pw As Variant
If InputBox("What is the password?", "Password") = "1" Then Else MsgBox "Invalid Password", vbCritical, "Sorry Charlie" DoCmd.Close If InputBox("What is the password?", "Password") = "2" Then Else MsgBox "Invalid Password", vbCritical, "Sorry Charlie" DoCmd.Close End If End If
I protect my code from people being able to read it by setting a password on the code from Tools > Properties, selecting the Protection tab and entering a password, and clicking "Lock Project"
Is there a way to write code that will remove that Lock Project check and check it back on?
I've looked through the Application.SetOption command and it doesn't seem to be one of the choices. It would be very helpful if someone knew how to do this.
On my login form, after the user enters the username and password he will have to go manually using the mouse to point at the Enter command button, is it possible to make in a way that after the user enters the password and hit enter proceeds as clicking on the enter command button
I have created a form and modual to capture the current user. The problem is I want to use this infomation to populate a name field in my project form. The modual and form are capturing the login name of tpeter which is correct, but that is not listed name that I want. I need to to associate tpeter with Tim Peter and automaticaly fill in the field. Here is the sql of the field in the project form:
SELECT [tblemployee].[UserId], [tblemployee].[FirstName] & " " & [tblemployee].[LastName] AS Expr1 FROM tblemployee;
Here is the SQL for the Modual:
Option Compare Database Private Declare Function GetUserName Lib "ADVAPI32.dll" Alias "GetUserNameA" _ (ByVal lpBuffer As String, nSize As Long) As Long
Public Function GetCurrentUserName() As String On Error GoTo Err_GetCurrentUserName Dim lpBuff As String * 25 Dim ret As Long, Username As String ret = GetUserName(lpBuff, 25) Username = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1) GetCurrentUserName = Username & ""
Exit_GetCurrentUserName: Exit Function
Err_GetCurrentUserName: MsgBox Err.Description Resume Exit_GetCurrentUserName End Function
I am still learning Access and coding so I am not sure exactly what everything means yet.
At the moment i have a straight forward login form, were if the username matches to the password the user can log in otherwise they cannot. However i need a login based on access rights. For example if a user A log in he is the administrator and has access to all the tables, to be able to synchronise, add/delete records. However if it is user B they can only read thad inforation form the datasbase. one way i was thinking was about trying to enable and disable certain command buttons on a form. If the users is not admin to disable the add button etc. Has anybody got any other ideas, or do u think this is suitable, or any examples of login screens
I downloaded the attached free login script from somewhere. I configured it so that it points to my website index page after validation.
I've added another field in the database called delegation. An admin delegation would point to a separate index page with admin options allowing the user extra privelleges. I'd like to add a few more lines of code to the check_user.asp page to allow this. Any ideas. I appreciate any help.
I have finished the database application, and now want to make a user login for specific users to run the application (but not to change the internal desgin or data).
How can it be done ? Do I need to split the database first before doing that ? :confused:
Hi.. Been trying to work this out for a little while now. I run an IT workshop for adults with learning issues and although my other office skils are pretty good, my Access skills are a little lacking.
My clients login and out on paper at the moment but I would like to change this to a database type system. The entries would only be name and an automatic one to record actual time of login.
I use Environ("Username") all the time, most frequently for logging who has done something to a record, and have once used it to log people into the database (very basic, much the same as logging who did what to records).
But I was wondering, how feasible is it as a security measure?
I often use it on the main menu of my DBs to give me a different menu (with more advanced options on) than other users.
Is it really that safe to use it as a means to allow people in, or stopping them? I know that obviously you have to stop them getting in other ways (holding shift for example), but assuming all of that is done, in theory, they should only be able to get in if they can log in as an authorised user?
Don't know why it is just struck me - just curious I suppose!
Dear all, I have an application includes one table "info" and two forms "frmlogin" & "frmwelcome". The table "info" contains many columns, two of them are [UserName] and [PassWord]. This table is filled with three records. "frmlogin" form contains two text boxes and one button. I want the user to enter user name and the password in those two text boxes, and when clicking the button, I want the application if that user is registered or no. If yes, he/she will be moved to the "frmwelcom", that display "Welcome [UserName]".
I would like to create a simple login system for my db whereby users differentiated by approvers (people who approve PO forms) or preparers (people who prepare PO forms). The problem is, I do not know where to carry on after creating the form for login. How do I go about doing it? I have seen some samples but I do not really understand the code. Hope that someone will be able to guide me along. Thanks a million.
How can I create a login form in Access to track user's input and the date and time of the input. I need to be able to see who entered specific information into the main form. On my main form I have a button to open a query and send that information to a text file but I would like the information to sent to the text file tab delimited. So far I have only been able to get it to go into the text file with comas to separate the columns. Any ideas on how to do these two things?
I need help with my Video rental store project the problem is that I want a security login method works with the my requirements. The manager has his own form with all the information he need and the other employees has another form.
I used this tutorial http://www.databasedev.co.uk/login.html to make the login form
the employee tables has ID, Password, Access Level
The VB code is like this
Option Compare Database Private intLogonAttempts As Integer Private Sub Form_Open(Cancel As Integer) 'On open set focus to combo box Me.cboEmployeeLogOn.SetFocus End Sub
Private Sub cboEmployeeLogOn_AfterUpdate() 'After selecting user name set focus to password field Me.txtPassword.SetFocus End Sub
Private Sub btnLogin_Click()
'Check to see if data is entered into the UserName combo box
If IsNull(Me.cboEmployeeLogOn) Or Me.cboEmployeeLogOn = "" Then MsgBox "You must enter a User Name.", vbOKOnly, "Required Data" Me.cboEmployeeLogOn.SetFocus Exit Sub End If
'Check to see if data is entered into the password box
If IsNull(Me.txtPassword) Or Me.txtPassword = "" Then MsgBox "You must enter a Password.", vbOKOnly, "Required Data" Me.txtPassword.SetFocus Exit Sub End If
'Check value of password in tblEmployees to see if this 'matches value chosen in combo box
If Me.txtPassword.Value = DLookup("EmployeePassword", "tblEmployee", "[EmployeeID]=" & Me.cboEmployeeLogOn.Value) Then
MsgBox "Password Invalid. Please Try Again", vbOKOnly, "Invalid Entry!" Me.txtPassword.SetFocus End If
'If User Enters incorrect password 3 times database will shutdown
intLogonAttempts = intLogonAttempts + 1 If intLogonAttempts > 3 Then MsgBox "You do not have access to this database.Please contact admin.", vbCritical, "Restricted Access!" Application.Quit End If
End Sub
I am asking for two things. First I want the Manger go to his form after the login completed and all the other employees go to another form I specify.
Second if there is a way that I show the name of the Employee in the destination form by knowing his ID (passing the ID to the other form).
Before we start - I'm a web dev / sql server grunt. I don't have much experience with access.
We've just performed our PC roll-over and we've moved from Access 2000 to 2003. We have alot of DB's around and some of which have *.mdw's. After the rollover was complete I've gone to the required computers and from ther 'Joined' the work group through the work group administration tool. This allowes the users into the required DB via the correct login.
HOWEVER.... drum roll.
No other databases which don't have any workgroups or logins are displaying the same login from my first DB. Entering the log and pass from the first database will then let you into this unrelated DB.
Does anyone have any ideas on how I can fix this problem?
I really need some help guys. For some reason Access always asks for a login/password even if the database isn't protected. Even when I start a brand new database the prompt comes up. Any ideas as to how to get rid of this.:confused:
i am a new memebr so i want to say hello to everyone, anyways i have created a database in microsoft access and have created a login screen where i have created different users and given them different access rights and permission in using my database, and that all works fine when i log on to the database from where the computer i created all these rights i get a login screen where the user enters the username and pass and then that opens up the database and allows the to view parts of the database which they are allowed to however my problem is this...
it works fine on the computer i created these access using the security (user-level security wizard) feature in microsoft access but when i open the database on a different computer it doesnt bring up a user login screen, meaning it lets anyone access the database etc so what do i do??? please help
I want to create a database need user login the system at first, i try to use a function to handle the checking, but it return "Type mismatch" & Runtime error "Operation is not allow when the object is closed", i am not sure my code is all right, can anyone help me to find out what the problem in my program?
I have built a login form which shows or hides all tool bars depending on the user name and password. Can I also control the other permissons like being able to edit forms and tables? I know I can do this using the MS Access built in functionality, but can I do it programatically from my user login screen.
I set the tool bar visibility, close the login form and open the main switchboard using the "on click" button of my login form. Can the above permissions controls be done here as well?
I have a form with all the navigation keys and it also lists your own name which you logged in with. Value comes from a string called strUser.
Now i have made a query (based on tblUsers) that returns me the user that is logged in and his status and acces rights. Criteria comes from the label showing the username on the form. I managed to get the value of that checkbox set to true whenever he logs in through a query on the login screen.
Now, whenever the user quits the application i want the status changed. So that the checkbox is unchecked when the user quits. this way the administrator can see who is logged in and logged out. How do i get it to false when he logs out. Thanks in advance
