Forms :: Login System That Assign Security Clearance - Form Not Found Error
Jun 24, 2013
I am relatively new to Access and VB. I am trying to create a log-in system that assigns a security clearance to each user and then restricts access to certain forms and reports based on security clearance. Right now, I have set up the log-in system - that seems to work fine. But when I try to lock the form based on security clearance, I get the 2450 - Form Not Found - error.
The code I am using on the form is as follows:
Private Sub Form_Open (Cancel As Integer)
If Forms!frmLogin!cboUser.Column(4) <> 1 Then
MsgBox "You do not have access to this form", vbOkOnly
DoCmd.Close acForm, "formname"
EndIf
End Sub
View Replies
ADVERTISEMENT
Jun 18, 2013
I am looking to lock my database until the user puts in the correct credentials.
I have already put the form on Pop Up and Modal. They can still select the "X" in the top right of the window.
View 1 Replies
View Related
Jun 17, 2013
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.
Is this even possible to accomplish?
View 2 Replies
View Related
Dec 2, 2014
I'm building a simple database for storing records about books.
I'm currently working on one of the data entry forms. Part of this form is supposed to enable the user to add details about the book and the series that it belongs to (if it does belong to one).
The relationship is One-to-Many: One series can have many books. I've made the series part a sub form.
When I enter some data to test that it works, I get an error message when I try to add a new series using the sub form. It says:
"You can't assign a value to this object.
*The object may be a control on a read-only form.
*The object may be on a form that is open in Design view.
*The value may be too large for this field."
As far as I know there isn't anything wrong, so I'm not certain why this error message comes up. I think it may have something to do with the primary key being the AutoNumber data type, but I just click 'OK' and ignore it, and it works fine.
The database works as far as I can see, I just want the error message to stop appearing.
View 6 Replies
View Related
Oct 23, 2007
Hi,
Sorry if this has been covered before but I couldn't find a post on it anywhere.
I have a login form but am not sure where to go with it now. I want the "Login" button to look up the username in the table "users" and check the password with the one submitted in the form. After this has been authorised I have also created field "permissions" in the users table and I would like that permission to be assigned to the users session.
Thanks,
Chris Farrants
View 11 Replies
View Related
Jun 11, 2007
hi.. i have a database stored on my main computer. all pcs on the network have windows xp.the database is stored in a shared folder.. and at the moment.. everyone on the network can open the database.. but not at the same time..basically if i have the database open.. my colleague on the pc next to me has to wait till i close it.so what i am asking is can someone direct me to a simple tutorial or some reading material..that introduces the methods needed to allow multiple pcs to access a single database with or without a login system.i imagine there will be certain read/write and locking issues.. but i really need it.thanks.
View 9 Replies
View Related
Apr 28, 2014
Code:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[OwnerID] = '" & Me![lstUsers] & "'"
Me.Bookmark = rs.Bookmark <---- error is here for the datatype mismatch or No record found
OwnerID is a string.
I have tried
Code:
rs.FindFirst "[OwnerID] = '" & Me.lstUsers & "'"
Me.Bookmark = rs.Bookmark
I have tried
Code:
Set rs = Me.Recordset.Clone
rs.FindFirst "[OwnerID] = " & Me![lstUsers]
Me.Bookmark = rs.Bookmark
View 14 Replies
View Related
Sep 19, 2014
I have a form (frmTimecardsDataEntry3*) that needs to requery combo boxes to narrow down the selections offered in the dropdown of each combo box.
It is a data entry form. I.e. Dataentry is set to yes.
The ClientName combo box has an after update event which requeries the matter combo box, so that the MatterName combo box dropdown only shows the matters relating to that client. This works just fine.
The MatterName combo box has an after update event which requeries the Rate combo box so that in the Rate combo box dropdown only the hourly charge rates relating to that matter are shown. That works too. So far so good.
I then tried adding another after update event to the MatterName combo box, so that another combo box, Application, was requeried too, so with the Private Sub it looked like:
Rate.Requery
Application.Requery
But this resulted in the error in the title to this post and the debugger highlighted in red the word Requery in the phrase Application.Requery.
I thought maybe Access does not allow two requeries resulting from one after update event, so instead I took Application.Requery out and placed it as an after update event in another combo box which did not have any other after update events to run.
However, this resulted in the same error.So the error appears to have something to do with trying to requery the Application combo box but I cannot see what is causing the error.
The Application combo box SQL is:
SELECT Applications.ApplicationID, [ApplicationDate] & " " & [ApplicationName] AS ApplicationDisplay, Applications.ApplicationDate, Applications.ApplicationName, Applications.MatterName
FROM Applications
WHERE (((Applications.MatterName)=[Forms]![frmTimecardsDataEntry3*]![MatterName]))
ORDER BY Applications.ApplicationDate, Applications.ApplicationName;
This is the same arrangement of SQL that I am using on the other requeried combo boxes that work. When I take the WHERE statement out of the Application SQL and run it the query returns all of the applications.
I am not sure what the error code is trying to tell me about the attempt to requery the Application combo box.
I have a yes/no box in the form and when the firm is first opened it has a small square dot in it, but as soon as any data is entered in the form the dot clears and leaves the usual empty tick box that you would expect to see.
Also, another possible symptom is that I had another version of this form previously working quite well except that when I did several data entries all at once, so I had several forms filled in with different data (before refreshing and thus entering the data in the table), when I scrolled between the forms I kept losing the MatterName data when I scrolled back, and then when I re-entered the ClientName data the correct MatterName data returned without me having to use the dropdown to select it.
I have had an earlier simpler version of this form working for some time, with ClientName requerying MatterName and MatterName requerying Rate, and I am using the same SQL structures in the new form but getting the error in the title to this post and the other isues just described.
View 2 Replies
View Related
Apr 2, 2013
Code : DoCmd.ShowToolbar "Ribbon", acToolbarNo
Should hide the ribbon. Instead I get a 'Variable Not Found' error.
This should be simple.
View 13 Replies
View Related
Apr 13, 2006
Hi Guys,
I am trying to set up a login form in my DB. I have followed the instructions from some of the previous posts on this site.
I have a table called tblUsers with 'UserId', 'UserName' and 'Password' as the fields. I also have two text boxes 'txtUserName', 'txtPassword' and a 'cmdLogin' command button on my form with the following code:
Private Sub cmdLogin_Click()
If IsNull(Me.txtUserName) Or Me.txtUserName = "" Then
MsgBox "You must enter a User Name.", vbOKOnly, "Required Data"
Me.txtUserName.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
If Me.txtPassword.Value = DLookup("Password", "tblUsers", "[UserID]=" & Me.txtUserName.Value) Then
DoCmd.Close acForm, "frmLogIn", acSaveNo
DoCmd.OpenForm "frmWorked"
Else
MsgBox "Password Invalid. Please Try Again", vbOKOnly, "Invalid Entry!"
Me.txtPassword.SetFocus
End If
End Sub
Unfortunately, this code is not working in my database (MS Access 2000). I think the error occurs on the line on which it checks the password against the stored password (If Me.txtPassword.Value = DLookup("Password", "tblUsers", "[UserID]=" & Me.txtUserName.Value) Then).
I get a Run-Time error'2471' message saying "The expression you entered as a query parameter produced this error: 'The object doesn't contain the Automation object for 'smith."
NB 'Smith' is the user name entered into the login form 'txtUserName' box.
Any idea why this may occur? I would be very grateful if you could let me know please.
Thanks alot for your time. And keep up the good work guys! :)
Kind regards,
Zaf
View 2 Replies
View Related
Sep 21, 2005
All,
I tried my damnedest to find something about this elsewhere in the forums but drew a blank.. so i figured I'd see what asking the question direct yeilds.
I would like to initiate workgroup level security to my database. but have no password required because i want to tie it to the username that is logged into the computer when the user logs into the domain initially? any thoughts?
View 2 Replies
View Related
Apr 24, 2006
1. I have several Tables, queries and reports. I need to delete all the information from these but keep the tables queries and reports the same, how do I do it? (macro i assume?)
2. How can I up! the security of access, i.e add a password to the file.
3. Also does access have any backup features I could use, like automatically backup the file to >>Here
View 1 Replies
View Related
Oct 5, 2003
I am a newbie and I am having a problem with MS Access 2000 security.
I have created a workgroup information file for a database to secure a database using a user level security. Everything seems to work ok if I use this WIF. But if I join the system.mdw file the database is not secure and opens without prompting for login. Please let me know if there is a method to block the user from using the system.mdw file.
View 4 Replies
View Related
Jan 8, 2006
Hi
I've done every search I could think of, but haven't come up with a solution.
I'm having a problem with file system security settings of windows 2000.
I have a FE/BE database setup, the BE is stored on a network drive that all users have access to. The FE is stored in the same spot on every workstation (C:dataXXXXXX.mdb). The FEs demonstrate considerable bloat and I understand that the solution is frequent Compact and Repairs.
However, each physical workstation is used by more than one user (different shifts) and the compact process removes the Everyone file system access from the database and replaces it with Administrators, and the current user; thereby preventing anyone other than the compacting individual from accessing the FE on that computer.
Is there a solution??
thanks
Jesse
View 1 Replies
View Related
Apr 7, 2013
I have inherited a 2003 db with unknown PIDs for the Group & User security.When trying to alter User details, I'm asked for a PID, so I'm trying to find the PID for the existing users.
I've gone to unhide the systems tables to get a dump of the data & hopefully find the PIDs but no luck so far.There is a Parent ID & if I run a query from the Users DB file, it appears as if it something like japanese writing ???
View 1 Replies
View Related
Jul 13, 2006
Does anyone have any sample code or a sample database?
I'm looking for a login form that has security level and passwords.
thanx
View 5 Replies
View Related
Apr 17, 2015
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...
View 2 Replies
View Related
Jun 27, 2013
I am trying to get the records on start and end date, still showing error no records found.
My code is like this:
Private Sub Command90_Click()
Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim strReport As String
Const strcJetDate = "#dd/MM/yyyy#"
[code]...
View 1 Replies
View Related
Mar 18, 2014
i have a login form in access , i want to set the value for the textbox , for example i want to set "Username" appear in the textbox when in click in the textbox clear the textbox like the title in the web it is possible !!
View 4 Replies
View Related
Apr 16, 2013
I try this code and it's not working
no record found
Code:
Private Sub openForm_but_Click()
Dim whr As String
whr = "get_date = #" & Me.gDate & "#"
DoCmd.OpenForm "searchResult_form", acNormal, "", whr, acFormPropertySettings, acDialog
End Sub
View 7 Replies
View Related
Dec 7, 2014
I have a linked table in ms access and it has a column as details. in ms access when i click on this button i will go to another form. i want to assign a picture (for opening a form) to this column but i don't know how i have to do this. my form opens as a datasheet view.
View 3 Replies
View Related
Apr 27, 2013
Is it possible to assign a query to the recordsource of a form dynamically? I assume the answer is yes. Can this action be done when the form is not open? If yes what is the correct syntax to use when the code is in a normal module as a public sub? I tried many possibilities and could not get it to work.
Code:
Dim ForNm as string
Dim Qry as string
ForNm = "PersonalFm"
Forms(ForNm).Recordsource = Qry
Forms![PersonalFm].Recordsource = Qry
[Forms]![PersonalFm].Form.Recordsource = Qry
View 14 Replies
View Related
Nov 16, 2013
I have a fully functioning frmLogin that appears when the database opens. After correctly logging in, it takes you to the appropriate switchboard. The problem is that I set autokeys to allow F1 to automatically open the switchboard, but I don't want users to hit this to bypass my login screen. The reason for keeping the switchboard open is to force the user to close the database using the switchboard(eventually I want to limit the user to only the forms that I have created in a split database).
My other option that I tried first was writing a module that would detect when all forms are closed, then open the switchboard. But I kept getting Error91 and got frustrated/stopped attempting this method. Using the hotkey gives the user a similar functionality, but less conveniently so(since its not an automated process, etc.).
View 4 Replies
View Related
Jan 3, 2015
i have created a login page and i have coded it but i do not know to set coding up so that it results in a linked form to open up..( main menu)
View 8 Replies
View Related
Sep 2, 2013
I've inherited an Access 2010 database that needs tweaking. I have a form, let's call it CALLED_FORM, that is loaded from various places - ie there are quite a few places that do the following
DoCmd.OpenForm "CALLED_FORM", , , , , , coupleofarguments
This works great when called from most places but if it is called from 1 specific form there is a likelihood that some code is executed that shouldn't be.
So I want to be able to do the following
In CALLED_FORM I want to be able to skip some code if the previous form is say FORMX. For all other forms I want it executed. E.g.
If PREVFORM <> "FORMX" then
code
more code
even more code
End If
Is there a system variable for PREVFORM.
I know I can change coupleofarguments to threearguments and pass something over in that to show which form it has been called from but that is a bit difficult.
View 3 Replies
View Related
Aug 20, 2013
I have been trying for weeks to get my login form to open up to a specific record on the mainform. I have built a form out of my Employee tbl (mainform). The table stores (ID,Name, password, EmpNumber ect.) I built a subform in that allows the user to type in the number of overtime worked on a paticular day. I have disabled the navigation on the main form so users can't advance to the next user but have enable the natigation on the subform so a particular user can advance to the next week of available overtime to input data.The goal is to get user login form to display a particular record on the main form and open a different form in the user is a supervisor.
Option Compare Database
Private intLogonAttempts As Integer
Private Sub cmdExit_Click()
DoCmd.Quit
End Sub
Private Sub cmdLogin_Click()
[code]...
'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
End Sub
View 1 Replies
View Related
