Hi there I found alot of nice tips here, thanks for that :) But I havent found exactly what I am looking for. I will keep searching but I thought I would post as well.
Here is my problem : I have to design a form that works like an old application form written in VFP7.
Basically a combo box chooses a customer, another combo box filtered by customer chooses a job. A third combo box filtered by Jobs chooses a stock.
There is a subform linked by Stock_ID that displays details of the stocks, amounts, locations, etc...
I want to limit record navigation to these combo boxes. Right now even with navigation buttons hidden and limiting tab cycle to current record; a user can use the mousewheel and page up / page down keys to change the current record in Stock table and thus changing the details in my sub form.
Does anyone know of a way to stop all record navigation unless I explicitly move the record pointer via code behind the combo boxes?
I will keep looking around here and will likely play with the Current event to reverse any changes made to the record pointer but it does not seem the best way to handle this.
I am not able to disable NavigationButton when i login navigation form using login form. I am using MS access 2007 - 2010.i am using below code but getting error.
Hello! I have little problem. I have form which have linked Child table. On that Child table in a form I have displayed Navigation Buttons. I don`t want to see them, but I can`t disable them. I tried everything.
I have few forms for which I have created a navigation form. Now in this navigation form, I have 4 tabs/ forms. I want to disable other 3 tabs/ forms when either of the one is active. I want to restrict user from switching the tab leaving the task incomplete in one tab.
It should show a popup msg, that "the task is active. Please submit before leaving the page."
In A2007 if you disable the Navigation Buttons on the form the Me.RecordCount will be set to 1 when the form opens ? I replace the Nav buttons with my own set but my "Go Next" button will not work untill I hit "Go to Last". This apparently restores the recordset count to the correct number of records.
I would like to disable the Navigation Pane completely, based on the security level of the user that logs in, of course.
I have code that checks their level (I'm an "Admin" and everyone else is a "User"). If they are a user, then it hides the ribbon and minimizes the nav pane. If the login is mine, it enables everything.
That works, but the only problem is that the user can just maximize the Nav Pane on their own and access all the tables, and I don't want that. I can't find any code that completely disables the pane.
I have this code connected to my login button on my login form:
Code:
If Security = "User" Then DoCmd.ShowToolbar "Ribbon", acToolbarNo DoCmd.NavigateTo "acNavigationCategoryObjectType" DoCmd.Minimize Else DoCmd.ShowToolbar "Ribbon", acToolbarYes DoCmd.NavigateTo "acNavigationCategoryObjectType" DoCmd.Maximize End If
I can go to the options menu and disable the nav pane completely, so I know since only I have access to the ribbon, I could always go in each time and recheck the display nav pane option on that menu. But, that could be a little bit of a pain having to do that each time.
Also, I know I could finish the design and convert the DB to an MDE, but since my DB isn't broken up into a front/back end, I have to access that same DB everyone else uses, and if any changes need to be made, I don't want to have to use my backup, transfer over the changes any user made to the records, and then reconvert it back to an MDE each time.
If it's possible, I'd like to do all this using VBA. If they aren't an ADMIN user, then disable everything for them, but if I login, enable everything for me.
Basically I want to put a code in the "on load" event of a form that enables or disables navigation buttons based on a value in a table (the table has 1 record and 1 column).
So if the value is "A", I want to hide navigation buttons on load; if it is "B", I want to show navigation buttons on load.
I know I can set this property in each form, but I have a number of forms that I want to configure at the same time.
My problem is that I don't know how to reference the value in the table.
I use Access 2007.I have a db split in FE(forms, queries, vbcode) & BE(tables only).I want users not to be able to view or explore the tables, the queries, the form design and details, in both Ends.Unfortunately, even disabling via VB code the menus, the db window, the tool & status bars, they appear and are accessible to the users (it only works in a non-split db, turned to an accde).
How can I disable any view on forms, queries, vbcode and tables details and data to users, in both FE and BE and only allow them to add data through specific form?
How can I iterate over all the records in a table and get each value from a field in each record? I want to get each value from the field, do something to it, then add it to a combobox. Is there a way to do this simply?
i have a combobox with two subforms and 1 main form.
the mainform is based on a query When i scroll, the records change, and the subforms corespond properly. BUT, when i use the combobox to change the records, i cant select anything. I see the list in the combox, but when i click i get the message: Cannot change value. Type autonumber.
Can i get rid of the record navigation bar at the bottom of a form? if so i can have a control button that will go the next record but how can i stop 2 people going to the same record?
I've inherited an Access 2003 database, a rather complex one. The database has a login, with the credentials stored in a table which I can view (minus the pass, which is masked). Of course, for security reasons, I shouldn't be able to just add a record and create a new ID, in essence bypassing all security. As such, the table with the user records does not permit new records to be added. What steps need I take to add new records, the option being greyed out in the interface, no new record bar available at the bottom of the table.
Ok, I am trying to make some sort of thumbnail preview form. The image appears in the imgBox no problem, and it is grabbing it from the field. When I use a combo box to navigate the records it works flawlessly
HOWEVER, I would like my users to be able to press bckwds/fwds arrows so i made some arrows with the wizard and added some code. Heres how it looks
--------------------------------------- Private Sub cmdNext_Click() On Error GoTo Err_cmdNext_Click
DoCmd.GoToRecord , , acNext Me.Requery If Me!SamPhoto = "" Or IsNull(Me!SamPhoto) = True Then imgSamPhoto.Picture = "" lblNoPhoto.Visible = True Else lblNoPhoto.Visible = False imgSamPhoto.Picture = Me![SamPhoto] End If MsgBox Me!SamPhoto Exit_cmdNext_Click: Exit Sub
Private Sub Form_Load() DoCmd.GoToRecord , , acFirst End Sub
------------------------------------------
My problem is that it never goes to the second record when i press next, and when i press back it says at end of recordset ( which makes sense ) but why would the back button work, and the fwd button do nothing ? I am hoping it is a small syntax error. Please help!
I am trying to do a search for my Access form using a combo box. It works when I search by a field called institution. But I want the records to be displayed in descending order by date rather than by Id. What should I add to my code.
Code: Private Sub Combo21_AfterUpdate() Dim rs As DAO.Recordset Set rs = Me.RecordsetClone rs.FindFirst "[INSTITUTION] = """ & Me.Combo21 & """"If rs.NoMatch ThenMsgBox "No Act Account for company selected."Else 'Display the found record in the form.Me.Bookmark = rs.BookmarkEnd IfSet rs = NothingEnd Sub
Also I want users to perform a search by selecting an institution from one combo box then a date from another box. Any help on this would be greatly appreciated.
Rather than using the 'Navigation' offered by MS Access I would like to have 2 text boxes, one that shows the total number of records in a recordset (DCOUNT works here) and one that shows the number of the current record, incrementing or decrementing as I click on the 'Next' and 'Previous' command buttons. Does anyone know if there is there a function that does this?
is there a way to disable the new record option (>*) at the bottom of the form...i want my users to be able to search all records through the form sometimes, but not add any new ones accidentally (or intentionally) while doing so. :confused:
I want to try to restrict the user not always changing the record, so i need a Disable combo box command. And i did try it by using "Name.Enabled = False" after user select the value from the combo box, but the program won't let me do that because of the record is on focus. So what can i do? I only have an idea of after the user select the value from cbo then jump the cursor immediately to the second column, but anybody can tell me how to do that? Thanks alot!
I have a little problem and do require help in fixing it. I am only 3% away from finishing the database (due today) but have a little bit of a problem on my hands. here it is:
I have a counter on my form that tracks which record is currently being viewed. the code for the counter is:
------counter code--------- 'Provide a record counter for using with ' custom navigation buttons (when not using ' Access built in navigation)
Dim rst1 As DAO.Recordset Dim lngCount As Long
Set rst1 = Me.RecordsetClone
With rst1 .MoveFirst .MoveLast lngCount = .RecordCount
End With
'Show the result of the record count in the text box (txtRecordNo) If Me.CurrentRecord = lngCount Then Command126.Enabled = False Command129.Enabled = False Else Command126.Enabled = True Command129.Enabled = True End If Me.txtRecordNo = "Record " & Me.CurrentRecord & " of " & lngCount & " record(s) for " & [CLIENT PREFIX] Me.Text292 = "Record " & Me.CurrentRecord & " of " & lngCount & " records" ----------counter code---------
On the same form, I have a delete button. The button deletes the current record that is being viewed (user prompted before it is deleted). The code for that button is as follows: ----delete code----- Private Sub command271_Click() On Error GoTo Err_cmdDelete_Click
DoCmd.SetWarnings False If MsgBox("Are you sure you want to delete this Audit and its associated measures?", vbQuestion + vbYesNo + vbDefaultButton2, "Delete?") = vbYes Then DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdDeleteRecord
CLIENT_NAME.SetFocus End If Exit_command271_Click: DoCmd.SetWarnings True Exit Sub Err_cmdDelete_Click: MsgBox Err.Description Resume Exit_command271_Click End Sub -------delete code--------
This button also works fine with the exception of the following. THE MAIN PROBLEM: example I have a client that has 5 different entries in my database (5 diff. facilities) and I want to delete one of their facilities. I would simply use my 'search' form and then navigate to the facility that I would want to delete. If that facility is facility 1, 2, 3, or 4 then I have no problems. The system deletes the selected record and then simply displays the one after. The PROBLEM is when you are trying to delete the 5th record. When the fifth (in this example, it could be the 9th record for any other client, as long as it is the last one) is the one to be deleted, an error occurs. When you hit the debug button the following line from the counter is highlighted: .MoveLast
I have solved this problem and I no longer get an error message BUT when the last record is deleted, the database simply loads a new and empty form that will accept data. I DO NOT WANT THIS TO HAPPEN. I want it to be set up as follows: If the last record (not the ONLY record, but the last record on file) is the one that is to be deleted THEN delete that record and load the one prior If there is ONLY ONE record, then delete it and load the main form.
Hi all, We have an Access 2000 db on a server that I can open. Problem is, when other users open it up and use the Navigation buttons to say, view the next record, Access crashes with the following error: "Method 'Requery' of object '_Subform' failed." (this is the Access supplied record navigation functionality - I havent customised it in any way)
Other users have been using it before with no problem (upto last week). I can still open the db and do not have any errors... So, it appears to be a user related problem.
Any suggestions or things I should check out, please?
The control source for the text box is a Number field called FileNo in a Table called File. THe default value of the text box is 0.
When the button is clicked a value is calculated using the last value under FileNo in the Table.
The problem is that I have to either navigate the records or close the form in order to save the new value onto the Table.
I need to be able to save a new value to the Table as soon as it is generated without having to close or navigate. So that I get some new value everytime I click the button without closing the Form. (when the button is clicked 1 will be added to the last value under FileNo on Table File)
The control source for the text box is a Number field called FileNo in a Table called File. THe default value of the text box is 0.
When the button is clicked a value is calculated using the last value under FileNo in the Table.
The problem is that I have to either navigate the records or close the form in order to save the new value onto the Table.
I need to be able to save a new value to the Table as soon as it is generated without having to close or navigate. So that I get some new value everytime I click the button without closing the Form. (when the button is clicked 1 will be added to the last value under FileNo on Table File)
I am using Access 2007 and am a former user of an old flat-file 32 bit program under Windows 3.x. I am fairly new to MS Access 2007. I run a filter or query, which will return X number of records. Then, I will search those X records by specific text, such as "assist" from the record navigation buttons. I search for "assist" and the text will be highlighted each time it is found in any text or memo field in the record. Hitting Enter takes me to the next occurrence and highlights the text. If "assist" occurs in 4 fields in a record, for instance, it will be highlighted in each of those 4 fields one by one as I hit Enter. The next Enter takes me to the next record and will then continue to the next occurrence of assist" in any of its fields. It will continue to highlight "assist" in those fields, in succession, until the last occurrence in all of those records is found, in which case Enter does not return "assist" anymore because the last occurrence has already been found.
This does not always work. Often, I get every occurrence of "assist," but in the current record only, even though the word exists in other remaining records that were returned with my original filters/query.
I've spent far too long searching for the answer to this. On my form's onCurrent event I want to check if I am on the last record and if so, disallow navigating to the next "record" which is blank. I'm not sure why Access will let this happen to begin with when selecting Next Record. Isn't that what New (blank) record is for?
Hello Everyone, Before I pose my question I would first like to applaud and thank this forum for the excellent and timely help it has provided me so far. The assistance I have received to date, from you as members, and via the search facility has been extremely helpful particularly as I am new to this type of stuff…
My question is this... I would like to disable users from selecting the 'Edit - Delete Record' facility from my main form upon its load. From searching the various forums I found a method upon which to disable the whole 'Edit' menu but not the specific 'Delete Record' function. Please accept my sincere apologies if this has already been posted but I simply cannot find it readily via a standard/refined 'search'. It might be the fact that I am phrasing the question incorrectly?? I don't want to severely restrict my users by disabling/hiding the whole menu but would rather limit them to accessing this option via a password protected command button?
What I have found so far. Private Sub Form_Load() CommandBars("Menu Bar").Controls("Edit").Visible = False End Sub
Any assistance/guidance would be very much appreciated
Kind Regards – Best wishes to all of the registered site members
I am currently working on a database and I'm using a form to view the records. A standard Access behavior is to show an empty record (new record) as the last one. is there a way to disable this "feature". I would like my form to display only the records, which are really filled with data and not show the blank one at the end??
