Thank you so much for your time, advice and patience..it has been very much appreciated.
I believe that I have managed to create my very own plaster for my database problem which at the moment works!
I've simply repeated the close and open form code after inserting the name of a child and this...
I think I've found the Public variable at the top of md_AccessRights...
Option Compare Database
Option Explicit
Public AccessRights As Integer
You said the below code doesn't make sense but it seems to work until we get that untrapped issue...??
Public Sub SettingAccessRights()
Select Case...
First question, how do you trap an error?
In regards to the where is the AccessRights = bit...
It sits in mdl_AccessRights as detailed above with all the select cases...
Case 1: AccessRights = 1
If User.AccessID = 1 Then
Form_frmChildDetails.Allow edits = True
...
Else
...
Case 2...
Hi and many thanks for your continued support...
1) I'd love to tell you that each user has a copy of the front end but I've got bigger problems as all are sharing a front end on the network!!
2) I've tried to detect where things are going wrong so here's what I've done...
I've stripped out...
Wow! Thanks so much... A lot to digest..
Here is the basUserInfo module
Option Compare Database
Option Explicit
Public Type UserInfo
' ViewID As Integer
AccessID As Integer
Active As Boolean
Password As String
UserID As String
SecurityID As String
End Type
Public User...
Thanks to everyone so far.
MajP... Here is some mdl_AccessRights code:
Public Sub SettingAccessRights()
Select Case AccessRights
Case 1: AccessRights = 1
If User.AccessID = 1 Then
Form_frmSearch.cmdAdmin.Visible = True
Form_frmSearch.lblAdmin.Visible = True...
Being a real novice at this part of Access I'd say "homegrown code-level security". I was just chuffed it all worked when it was a local table.
This is the code on my login button
Private Sub cmdLogin_Click()
On Error GoTo Err_cmdLogin_Click
Dim db As DAO.Database
Dim rst As DAO.Recordset...
Hi,
I have a database which I've recently converted to SQL backend tables.
Since the conversion when I use my log-in form which takes a network login and password, the access rights are no longer consistent throughout the database.
When I get to the main form, for read only users they can...
Hi All,
Thanks so much for your efforts. Between everyone's suggestions I've managed to get the functionality working as I wanted. In terms of the neatest way of doing it, I can't be sure but for now, it works so here is what my code looks like for anyone else who has a similar issue...
Thanks Andy...
I got the following message in the Immediate window...
INSERT INTO tblCAFHistory (HistoryDescriptionID,CAFID) VALUES ('1',)
Does this help?!
Cheers
This is going to sound very school boy like and ignorant but having got up the expression builder and drilled down to the assessment ID field through various ways (including the loaded forms) all I get is [txtAssessmentID] but that doesn't give me the full syntax path I would have thought you...
Thanks so much for help BUT...
It didn't work, just did the same as before...pops up with a query box which if I insert the assessment ID number works but I want this to be seamless without my intervention!
Sorry!
It's so annoying!
Hi All,
I've tried the following code to take a different route but still no joy...am I doing this right? It appears to be having a type mismatch when appending to the new table and not working so it's not picking up the value more just the name of the field...which then causes the type...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.