General :: Custom Message For When Record Locking Is Set?
Oct 20, 2014
My database has been set with the 'All records' locking option set to prevent two or more people editing files at once. This is working fine but I wondered if there is a way to make a more personal message appear instead of the default Access one, just to maintain a uniform look.
I have created a command button through the wizard that is basically: DoCmd.GoToRecord , , acNewRec
Well, it puts all this code in the event:
Private Sub NewVerification_Click() On Error GoTo Err_NewVerification_Click DoCmd.GoToRecord , , acNewRec InboundQuestions!Page1.SetFocus VerificationNo.SetFocus Exit_NewVerification_Click: Exit Sub Err_NewVerification_Click: MsgBox Err.Description Resume Exit_NewVerification_Click
End Sub
Well, my PK field is one users enter in manually (please don't ask why). What I need is something that checks to see if the number in that field is a duplicate key, so I can tell users via msgbox "Duplicate Number, try again". Right now, it's not that descriptive, it says "You can't go to the specified record". I guess all i need is an If statment, but I don't know the code that checks to see if [field1]'s value has already been used in my table. Any ideas?
I would like to create a custom pop-up Message when one attempts to add a duplicate record.
Currently, I have a default pop-up message when you try to add a duplicate record. I set the field as Indexed= yes(No Duplicates) which generates a default pop-up message but it is technical and wordy. I would like to be able to simplify the wording to just let the user know not to add a duplicate record.
I have inherited a number of 2007 Access databases that have a PDF (Adobe Acrobat Document) as the file type for the locking record.
These databases seem significantly slower, and have more frequent "Not Responding" periods on the network - especially when compared to those with a standard ldb file type locking record.
What determines the file type for a locking record?
Can the Adobe locking record be changed to a ldb? and How?
I have got a No record found for some forms as the code below,
Private Sub Form_Load() If Me.Recordset.RecordCount = 0 Then DoCmd.Close MsgBox "* No Registration Found *" End If End Sub
When a paramter search is done and no results found it shows up a message saying "No Registration Found" is is possible to bring up the same type of message in a report format?
I use the following code for an error message box to pop up. I need to know how bring up a custom form I have made instead of the standard message box but don't know how to code it into the function.
Function StartUp() On Error GoTo Err_ProcedureName
Set db = CurrentDb Set rs = db.OpenRecordset("tblEmployeeBenefits", dbOpenDynaset)
If rs.EOF = False Then rs.MoveLast If rs.Fields("FlagDate") = True Then MsgBox "You need Administrative access for this function to work.", vbOKOnly, "Serious Warning" DoCmd.Quit End If
Else
If rs.BOF = True Then y = 0
Do Until x = 1 x = rs.RecordCount
rs.AddNew rs.Fields("MeDate") = Date + y rs.Update y = y + 1 Loop End If End If UpdateTable
I have created a database in access with multiple fields.
I have restricted to entering data a specific field with numbers only, but I would like to display a custom error message instead of the default access message. For example: "You can only enter a number in this field" and for another field; you must enter a name in this field if someone tries to ignore a specific field.
I have tried the code below, but I am not getting what I need. I have a table [Student Info] with a field [Student ID] as the primary key and many other fields. I added the Student ID field to my form, [Student Add]. When I input an ID that already exists I get an error code as expected but then my form still loads. I currently have a second form for updating student info [Student Update] for which I have a parameter form that asks for the Student ID. I would like to use just one form to add and update students if possible. So, if you add a new Student ID you can enter all pertinent data. However, if you enter a duplicate Student ID the form should populate with that student's information.
If I must have two forms (1 to add and 1 to update) and a duplicate Student ID is entered into the Add form, the user should get a message stating that the record already exists. Then, (Option 1) force the Add form to close without saving or (Option 2) give an option for opening the Update form. Either option is acceptable at this point because I am stuck.
When attempting to use the code below, I get a data mismatch error on the "Answer = DLookUp......" line.
Here's one I use on Social Security numbers for a pop up when a duplicate.... SS# is stored in table "tblApplicant"
Private Sub SocialSecurity_BeforeUpdate(Cancel As Integer) Dim Answer As Variant Answer = DLookup("[SocialSecurity]", "tblApplicant", "[SocialSecurity] = '" & Me.SocialSecurity & "'") If Not IsNull(Answer) Then MsgBox "Duplicate Social Security Number Found" & vbCrLf & "Please enter again.", vbCritical + vbOKOnly + vbDefaultButton1, "Duplicate"
I have created a custom message box form that suits my needs for this particular situation. It is called (opened) in the middle of a bunch of other VBA procedures. What I am having a problem with is how do I "pause" the rest of the code from running after the message box call?
For example, with a regular msgbox() function, once called, the code will wait for the user input or click of a button, then continue. My problem is that I am using the basic docmd.openform procedure, and it opens the message box form just fine, but then continues on with the rest of the code after the form is opened.
How would I "pause" the code after the call of opening my custom message box form, then continue it after the user clicks one of my closing buttons from that form?
Furthermore, although its not entirely needed in this situation, for future reference, how would I have that message box form return a value to the calling procedure?
Having set a table short text field to 'Indexed (No Duplicates)', I have a form which produces a '2105 runtime error' when the user attempts to submit a duplicate value. I would like to replace this default error message with a more user-friendly MsgBox.
My code for the SaveRecord button is:
Code:
Private Sub SaveRecord_Click() DoCmd.GoToRecord , , acNewRec MsgBox "Record successfully saved", vbOKOnly + vbInformation, "Record Saved" End Sub
My code to capture the 2105 runtime error is:
Code:
Private Sub Form_Error(DataErr As Integer, Response As Integer) If DataErr = 2105 Then MsgBox ("This villa booking has already been logged.") Response = 0 End If End Sub
Unfortunately when the save button is clicked (when attempting to save a duplicate value), the 2105 error still runs. What are I doing wrong?
It is my understanding that a custom macro was built to pull text data from a file and import it into Access in the appropriate fields. This macro no longer works and will return the following error message:
"License information for this component not found. You do not have an appropriate license to use this functionality in design mode."
It only gives an option to click OK. When you do it shows a box called "Action Failed" that lists the macro name, condition, action name, and arguments with three button to click on the right of the box: "Step" "Halt" and "Continue". It appears that only the "Halt" button is available to be clicked.
Does this sound like an issue with the Access license or whatever license the macro might have? We're trying to decide if it's possible to restore the functionality of the macro.
is it possible once a record has been entered, to lock it so that it can not be changed by just anyone but that the administrator could change it using a password?
Had a good look at previous posts but couldn't find exactly what I am after. Having entered a record I don't want users to go back and edit/amend the input. I can see how to lock and unlock records but controlling this wilt say a checkbox also means any user can 'uncheck' and edit. Is there a method to restrict who can unlock ('uncheck') and edit a record, other than using Access Security permissions. Thanks RussG
I can't do nothing in my database because it keeps saying users have it open. There is nobody in the database though. I open up the file and saw two admins names and I deleted them both because we out of the database. The database is on a network drive and when I try to do any updates I get the message "Can't save changes or make changes because the database is open"
I DON"T KNOW WHAT TO DO, FOR THE LOVE OF GOD SOMEONE HELP ME PLEASE, Help me Jesus, Help Me Oprah, Help Me Tom Cruise!
This is my first post and I am really hoping someone will be able to help me.
I have created a database for a friend and multiple users will be using it. I would like to know if anyone is able to assist me in being able to lock a specific record when a particula option on a combo box is selected.
For example:
I have a combo box with several status'. Open, Pending and Closed.
Once the status is changed to closed, can that record be locked to unable ant further editing?
I have created a form using Access 2003 which users have to enter data into.
What I want is a button on the form which will display "lock record". When the user clicks this it will lock the record so that another user can’t accidentally change the field values. If they do want to change the field values the will have to press another button displaying “unlock form”
I have a split database, with identical front end databases that have tables linked to the back end database. All forms are all located in the client databases.
Both databases are set to "no locks" (I believe this is referred to as "optimistic" record locking?) and are set to "shared" open mode.
However 2 seperate users cannot open the main form, even when opening different records - it comes up with the record locking error message.
Question - The form they open is filtered to show only one record (as selected on opening the form) - will this lock the whole table or just the one record it is looking at?
I'm not sure I've explained myself brilliantly here - I'm not up on all the lingo! If you don't understand please say & I'll try to explain better.
:confused: I created a data base in which 4 users enter information using a form. I have no record locking applied. When 2 or more of the users enter the form at the same time but have not entered any information they get a record lock error when one of them tries to enter data. The company wants to open this up to more people so I need to stop this from happening. Any ideas? I'm using access 2003 and windows xp.
Is there a way to assign a new record upon opening the form rather than waiting for data to be entered? I think this would be my last resort because it could create alot of blank records. All help is appreciated.
I've created a database and split it so that the data tables are held separately. Everything works fine apart from when 2 users simultaneosly try to create a new record on the same table. I'm guessing this is a record locking issue but can't work out what I should be amending.
Using 2010 32 bit on win 7.I've been having an issue recently with forms not allowing changes to existing records or adding new records. These have previously worked for years and I haven't done any design changes in 12 months.
Some forms are base on queries that are based on single linked tables and some on joined queries but all have unique identifiers with enforced integrity.I noticed that changing the Record Source in the form from 'Dynaset' to 'Dynaset (Inconsistent Updates)' resolves the issue. But I'm stumped to what's causing this to happen in the first place.