Modules & VBA :: How To Handle User Forgot Password
Apr 16, 2015
code for the "Forgot Password?" button on a login screen? I want an email notification sent to me if someone has forgotten their password, and/or automatically reset their password to a default value based on their user name.
I'm creating a database for my church. I created it on my home computer, FTP'd it to a server, and then downloaded it to my church computer.
It was about 3 weeks between the first FTP and the FTP to the church due to loading of Access etc....
Now that I have it downloaded, I cannot remember the password that I set up originally for the db admin account! (or others)
I know this security feature is designed to lock down a database to unauthorized users, so it's not intended to be easy to get around...but how do I get around it?
I'm just a lowly programmer, trying to help out the church and I really don't want to recreate the whole thing! I've tried every password I can think of that I may have used with all combinations of upper-lower cases, but I can't come up with it.
So I have a login system established with loginID, passwords, and different user types. I also have a User Change Password form. However, this form only allows the user to change their password to something new. Also, for some reason the form only allows the first user in the table (ID#1) to be changed regardless of who is logged in. I was using an embedded Macro. I need to be able to have the old password entered and verified before the password can be changed to something new.
Private Sub Command3_Click() 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
I am using an RC4 vba function to encrypt the password when a user account is setup in the front end of my split database. The password is stored in the backend encrypted. It is encrypted in the before update event of the form by calling a function against the bound password field. My problem is that when I want to maintain user accounts using this form, I want to be able to see the password as plain text.
I can decrypt it and display it in the form in plain text but cannot update it. This is because to display the password in plain text requires me to use a query as the record source for the form and this query requires an expression to call the decrypt function against the password field. The form will not allow any changes against a field that uses an expression as the control source.
I have been trying to create a login form that allows the user to change his/her temporary password logging it to the proper table along with timestamp and who done it info.But, after spending the morning trying to find the proper syntax I am flummoxed.
I can get everything to work accept the update of the fields. I can get the command to work (writes to the location) but it does the pop-up what is the parameter thing when it works. I have all the information just need to get it in so the command recognizes it.
DoCmd.SetWarnings False DoCmd.RunSQL "UPDATE lut_TeamList SET Pass = txt_Password.value WHERE TeamListID = Me.cbo_UserName.Value" DoCmd.RunSQL "UPDATE lut_TeamList SET UpdatedBy = Me.cbo_UserName.Value WHERE TeamListID = Me.cbo_UserName.Value" DoCmd.RunSQL "UPDATE lut_TeamList SET UpdatedWhen = Now() WHERE TeamListID = Me.cbo_UserName.Value DoCmd.SetWarnings True
I've got this database that needs some users to be read only and some users to have full control. I applied the appropriate ntfs permissions but there is a problem. If a read only users open the database, and then a full control users opens the database its stuck in read-only.
My db contains an unlinked form that is used to append records to 1-3 separate tables (tests to see if master records exists, appends if needed, moves on to child records). One of the fields is a text field meant for notes. The VBA errors out whenever this text contains apostrophes or quotes.
Is there a simple way to recall the string field with quotes and apostrophes intact and append it, or will I have to validate and remove them from the string?
I have successfully created a user id & password prompt which works excellently.
The database i have created has three forms inwhich two departments access. I have an issue where one department is only allowed to view a search screen and the other department is allowed to enter in information and search. I also have a section for managers to login and run reports.
In my userid & password table i have created and field called Level which includes: Administrator, Manager, Bookings,User
Admin - Full Access Managers - Full Access - But not able to edit queries and tables Bookings - Order Form, Search Form User - Search Form
Here is the code i have used:
Login OK Button:-
Private Sub login_Click()
If txtPassword.Value = DLookup("Password", "tblAccess", "[UserId] = txtUser.Value") Then CheckFlag DoCmd.Close acForm, "frmUserLogon" Else MsgBox "INCORRECT PASSWORD! Please try again" End If
End Sub
Module1: Option Compare Database Public Flag As Integer '1: Reports Opener 2:Log 3:OpenUKSupplier
Function CheckFlag() Select Case Flag Case 1 DoCmd.OpenForm "frmReports Menu"
Case 2 DoCmd.OpenForm "frmbooking" Case 3 DoCmd.OpenForm "Frmsearch" Case Else 'Should never be here
End Select End Function
Where would i add the code to the module or to the event?
:Hi, At the moment I'm writing a production database for work, which include parts in/out, production planning, kitting lists and other forms. What I'm after is a way that when the database opens it asks for a password and depending what it is, is what you can do. Administrator can do all, Stores can only enter parts and scheduler can only enter planning and so on.
I have created a login form, with a user name and password. It works great. However I need to use the login form for three different command buttons, on my main access form. The same login form will be used but It will need to open three different forms depending on what command button was selected on the main page.
I open main page, PID- click on buildings the login form pops up and I enter the correct username and password the building doc opens. Got it?? The same process for each, I would like to know how is this possible? How do I change the differnt documet that opends according to the command button that has been pushed? :confused: Thanks in advance
I use a database that someone else set up and is no longer here. To get access to the database you need to enter a user id and password. I have a new user who has been getting into the database using an established user's id and password.
I went into the file and found the table with the users, their id's and passwords listed, and added the new person to the table, but I still get an invalid user message when trying to access the database with the new user's information.
I went through the Access Help and tried a couple things it said for adding users to a password protected database, but either I didn't do it right, or the way to add a user is different from what I am getting from Access Help.
Lastly, this database is different in that if I would add a report, it only shows up on my computer when I access the database, the report doesn't show up on anyone else's. That is odd to me, but it is how it works.
Into the form named: Administratorsfrm, I added a textbox defined as usertxt and also a textbox named passwordtxt as well as a button named logincmd.
The user defined is the Network user and this is added automatically to the usertxt field everytime when I open the Administratorsfrm form. To do this I use the next code:
Private Sub Form_Open(Cancel As Integer) Dim wshNetwork As Object 'New wshNetwork Set wshNetwork = CreateObject("WScript.Network") Me.Usertxt = wshNetwork.UserName Set wshNetwork = Nothing End Sub
I would like that the user types his/her password (Network password or Unlocking computer) and after this could Login to the database application. I mean, the user will type his password and then the event should compare the password typed with the network password or unlocking password and if this is correct should open the database application (Main Menu Form: Mainfrm)
gosh, I can't believe I forgot simple thing. when I'm opening a form in Access it automatically goes to new/blank form, I'm try to make it go to first record instead and can't remember how I didin't before.
I have a form in which I collect approvals from two different departments. To approve an item the user selects their name from a combobox, and then tick an option box to indicate approval. The combobox is from table 'Users' and has a query as a source with the following fields, 'UserNum, First, Last, Password'. The 'approval' fields are on table 'Approvals' and are yes/no fields.
What I'd like to have happen is that the user chooses their name from the combobox and then ticks the option box for approval; when ticked I would like a messagebox to appear asking for the users password based on the name chosen in the combobox.
I am looking at the public function routine, that validates the password entry. I want to know how i can make a message pop up with the specific error the user has made on entry.
Public Function ValidatePwd(varPassword As Variant) As Boolean Dim blnValid As Boolean Dim blnValidCriteria As Boolean Dim intChar As Integer
I am trying to open a database with a password (I know the password) from another database however I cannot work out how to do it. I have been using this code to do this to open databases without passwords for a while.
I am using Access 2007.
Code: Private Sub Command36_Click() Const cstrClientFEPath = "G:Templates" Const cstrFEFile = "db.accdb" Dim intX As Integer 'Utility var
Code: Private Sub Form_Open(Cancel As Integer) Const cstrPassWord As String = "open" Dim strPassWord As String strPassWord = InputBox("Password:") If Not strPassWord = cstrPassWord Then Cancel = True End If End Sub
to password protect a form within my database. it is working great however i was wondering if there is any way to make the characters appear as **** when entering the password?
I have a mdb file that does not have database or user level security, but it does have a VBA password.I want to transfer (overwrite) a new form to this database from another Access database. The form I'm exporting has VBA code. When I try using docmd.TransferDatabase I get an error. The error is:
"The TransferDatabase action was canceled."The line is:
where txtCheckInFile is the location and mdb file name I'm trying to send the export.It might be because the form already exists. So, if I go into the database and delete form, and repeat the export I get the message:
"Microsoft protect this Visual Basic for Applications Project with a password. You must supply the password in the Visual Basic Editor before you can perform this operation."My question is it possible to transfer a form to a MDB that has a passworded VBA? I know the VBA password.If not, perhaps it is possible to remove the VBA password in the database (using VBA), make my export, and then add the password back in?