I have disabled the Ribbon using XML code in the USysRibbon table. Everything has worked fine, except that now when I click on two different tabs that exist on my form, the Form Tools Ribbon pops up with options to go to Layout, Design View, etc., and other options, too.
I have two subforms on this tab, but neither one has a Ribbon Name set (I didn't even know how to do that when I made them) where to look to see why this is happening. The Ribbon does not show at all on the other tabs like it is supposed to. It only shows when I click on my 3rd and 4th tabs, and then it disappears again when I click on other tabs.
I am able to bypass the shift key so I can disable ribbon and all menus at startup.
But the issue I have is anytime someone makes a copy of the database or it is their first time opening it they get prompted with the security warning:
"Security Warning - some active content has been disabled, click here to enable"
and it gives them complete access to see the back end of the database because while that warning message is popped up ... before they click "enable" they can go do anything in the database including see tables, data, and vba.
Once they click "enable content" that first time the bypass takes effect and the ribbon and all menus disappear, but if they dont click it they can navigate all around the db
In my database, my "switchboard" consists of two listboxes: "Available Forms" and "Available Reports". The Available Forms listbox lists all the forms that can be accessed, and Available Forms listbox lists all the reports that can be accessed. I did this so that I wouldn't have to create buttons for each new form or report. They all are automatically listed in the listbox for the user to double-click on to open.
Since all my form and report names are not user-friendly (ie: fmComplicatedAndUglyName, rpComplicatedAndUglyReport) I want a way for the db admin to easily assign captions for each form that the average database user would find intuitive and easy to understand (ie: "Car Maintenance" instead of fmCarMaintenance). To do this, I built a table called tbDBObjectsCaptions consisting of these fields:
dbObject_ID (PK - Long Integer) Caption (Text)
Next, I have an unbound form (fmDBObjectsCaptions) consisting of two subforms:
1) sbfDBObjectsCaptions_Forms, which lists all Forms with captions 2) sbfDBObjectsCaptions_Reports, which lists all Reports with captions.
Each subform's record source is tbDBObjectsCaptions with an Inner Join between the table and the MSysObjects table so that I can show only forms (Type field in MSysObjects = -32768) or only reports (Type field in MSysObjects = -32764). So, the record source looks like:
Code: SELECT tbDBObjectsCaptions.dbObject_ID, tbDBObjectsCaptions.Caption FROM tbDBObjectsCaptions INNER JOIN MSysObjects ON tbDBObjectsCaptions.dbObject_ID = MSysObjects.Id WHERE (((MSysObjects.Type)=-32768));
(Except the Report's subform record source Where statement would have "-32764" instead of "-32768".)Each subform also consists of a "Caption" textbox and a combobox that lists all the forms or reports in MSysObjects. The Row Source for those comboboxes are:
Code: SELECT MSysObjects.Id, MSysObjects.Name FROM MSysObjects WHERE (((MSysObjects.Name) Not Like "*sbf*") AND ((MSysObjects.Type)=-32768));
(Except the Report's combobox row source Where statement would have "-32764" instead of "-32768".)My first day playing with fmDBObjectsCaptions went fine. Both subforms' comboboxes list either Reports or Forms and would easily let me choose a form or report. The subforms would record the same "Id" from the MSysObjects table into the tbDBObjectsCaptions table and each Caption I typed in was recorded into the tbDBObjectsCaptions table for each "Id" I chose. It worked just fine.
However, the next day, I noticed that the captions I assigned for forms/reports were now assigned to different forms and reports! In fact, the fmDBObjectsCaptions no longer shows any captioned reports as their Types have somehow changed from -32764 to -32768 and are therefore now displayed in the Forms subform.
Either the dbObject_ID is somehow mysteriously changing for each record in the tbDBObjectsCaptions table or the Id is somehow mysteriously changing for each record in the MSysObjects table. I don't know how or why but that's what's happening. So now, in the fmDBObjectsCaptions form, my Forms subform is displaying the wrong captions for the forms, and is also displaying records that were originally Reports (items that have captions but blank comboboxes were originally entered in the Reports subform).
I attached a copy of the database. Any different solution that allows for easy Admin'ing of displayed form/report names?
I have a textbox & button that when entered & pushed - run a query for the top values randomly depending on the value entered into the textbox.
My code is...
strSQL = "SELECT TOP " & Me.Text140.Value & " [CAN - NAME].Name, [CAN - CPT/VOUCHER].Voucher_Number, " & _ "[CAN - CPT/VOUCHER].Procedure_Code, [CAN - CPT/VOUCHER].Service_Date_From, [CAN - CPT/VOUCHER].Patient_ID, [CAN - CPT/VOUCHER].service_id, Rnd([service_id]) AS RandomNum " & _ "FROM [CAN - CPT/VOUCHER], [CAN - NAME] WHERE [CAN - CPT/VOUCHER].Service_Date_From Between " & Me.StartDate.Value & " And " & Me.EndDate.Value & " ORDER BY Rnd([service_id]) DESC "
It runs like it should but doesn't populate any records...that is until I go into the design view, deselect one of the fields and then reselect the same one - only then does it populate.
Do I need to open the query first and then update/append instead?
My subforms are randomly adding blank records and one subform I would like to stay blank repopulates with data, though not necessarily the most recently added record. Both of these seem to happen when I navigate to other main records in the database and then return to this page.Using Access 2013, I have a large form with 10 pages. On one of the pages, I have two subforms. This is set up to gather many-to-one data. The top subform is my data entry form with three fields (two combo and a text) and a command button. The bottom subform is a datasheet displaying the three fields.
The two combo boxes are cascading, and they work great. The text box is there to collect additional info for each selection. The command button works to
1) save the record, 2) requery both subforms in order to display the new data on the datasheet, 3) clear the combo and text boxes, and 4) set focus back to the initial combo box. It all works!
But then when I leave that main record, the horror begins: blank records (from the "many" table) show up on the datasheet and the data entry fields do not stay blank. I suspect my problem is in the command button. I added this code to the OnClick for the command button:
Code:
Private Sub addMinistryItems_Click() 'save record If Me.Dirty Then Me.Dirty = False 'requery both subforms Forms![BCD MAIN 2013]!Child572.Form.Requery Forms![BCD MAIN 2013]!Ministries1.Form.Requery
I can't figure out Form Filters. Basically I have a load of controls on the form. The first control I select I'm able to click the Filter button on the Ribbon and get shown a load of checkboxes to filter the field on (see capture.png)On subsequent controls, clicking the Filter button on the ribbon doesn't show the checkboxes for that control (see capture2.png).
In Access 2007.I have a Main Form with (1) subforms that have a differenet .RibbonName set. When switching focus to the subforms, the Ribbon Tab for the Main Form stays active and the subform's Ribbon is not activated. I have put the ribbons assigned to the subforms on a main form, and they activate as expected. This is a major issue to which I can find nothing on the web!If i open subform directly, ribbon functioning fine
-Allow Full Menus = false; -start from scratch = true;
I want to restrict the users to only be able to access certain tabs in the ribbon .example "user1" cannot access the external tab and the create tab, but can access all others.
I am trying to find a way to hide the close button on the ribbon. My 2007 and 2010 users keep closing the database by the "x" and it's driving me nuts. I have an exit on the switchboard. I tried to disable navigation and ribbons under options and it hides everything except the x. I tried the code:
Code: Docmd.Showtoolbar "Ribbon", acToolbarNo
In the startup form. Still doesn't give me what I want.
When you open a form in datasheet view, the default ribbon is of course the "Datasheet" tab. I would rather have the "Home" tab ribbon open up, because I have one field in this form set up as hyperlinks to open another form, so the filter and search buttons would be more useful to the user. I'd rather not go to the trouble to create a custom ribbon, so is there anyway to set the default ribbon tab to "Home" when you load the form? There is a ribbon property for the form, but I don't know the reference name for the tab.
It's been a while since I last used Access but now I need to be reminded how to populate a sub-form with all rows for a query (Access 2013).
- Do I need to establish a relationship between Table A (main form) and Table B (sub-form)? - What sub-form properties need to be set to display all retrieived rows from the main form query (select where Table A PK = Table B PK)?
I've got a form with a drop down combo box with two columns. When you hit the down arrow it shows both columns, but when you click a choice, it only shows the data in the first column. How do I make it show both columns after it has been chosen? First col is First Name, second col is Last Name.
I have a query that pulls information from a combo box in my form, now I've made a pivot form to report the outputs, however my legend will only display the first two letters of word... I need to show the entire word.
Then I created a form named MAINF with FLOWER_SHIPPING as its RecordSource. The form only has one TextBox: Date.
Then in MAINF, I created a subform named SUBF with FLOWER_SHIPPING as its RecordSource, in Datasheet View. It shows all fields in FLoWER_SHIPPING as it is.
The link between MAINF and SUBF is Date.
I want SUBF to only show record based on the Date chosen in Date TextBox in MAINF. So far, yes it did what I want. But with problems:
1) [SOLVED] SUBF does show record based on the Date I've chosen in MAINF's TextBox Date, but it ALWAYS ALSO shows the first record on the FLOWER_SHIPPING table. And the date in the first record always changed into the Date I just input in the TextBox Date in the MAINF. Automatically.
Example: I chose 6/22/2013, and there are 2 records with that date. the SUBF will show 3 records: those 2 records + the first row of FLOWER_SHIPPING with its Date automatically set to 6/22/2013.
2) When I chose a date in MAINF, I have to click everywhere in the SUBF so that it will refresh its content. Can I have it refresh automatically everytime after a date chosen?
I have a bound form which shows list of items in the stock. When i click on a button it should open another form which shows the details of item which we choose from the first form.the code which i have in click event of the form is :
Code: Dim strCrit As String strCrit = "PkID=" & Me.RadStocks DoCmd.OpenForm "frmIssueRadItems", , , strCrit
It works sometimes but most of the time it gives error saying " syntax error(missing operator) in query expression 'PkID=Airmux 200E DC".
I have created a form with combo box which shows certain fields I selected. By clicking that I want to open a NEW form which has all the fields so that I can edit the record.
I have a totals query that shows results in a chart. It takes a parameter to limit results, by a combobox in a form.
Parameter in the query includes the OR "*" expression, in case someone wants to get the results unfiltered.
The Combobox in the form, has an AfteUpdate event that opens the chart (form) every time its value changes, by the [DoCmd.OpenForm "ChartForm" , acNormal] expression.
I don't know how to make it open the ChartForm when no parameter is selected in the combobox.
The recordsource is a query with over 6,000 records. The form currently lists the records in datasheet format with header and footer for things like buttons and filtering. The client wants to be able to go from page to page of the souce query, showing 100 records on the form at a time.
But at the same time, they should be able to filter or sort the data source in it's entirety. The person who created the form came up with what seems like an awful solution to the problem. It seems to use a random number generator to determine how many records to portray at a time. I see this in the code as well as in operation, because the number of records on page to page varies. It doesn't even start out at 100! Worse yet, using a sort on the page only sorts the records that are visible.
In my database main form with subform. subform have query as recordsource.total of one of field in subform shown on main form. all is ok and show total correctly but when subform have no records then total field on main form shows #error. How to convert this value either into null string or zero(0).
guys, here is my problem. I created a tool to manage changes. As part of the process a support can edit a change to change the status and the requester can validate that the change is done properly. Both processes work in the same way, the diference is that the can modify different fields in the form. But here is the procedure. Edit a task (support role): From a task management menu press the button to open a form with a list of changes to be done. Double clicking in a specific change number a new form with the change detail is opened. When the support finishs press the save button and insert the changes in a history table (to track the changes) and update the change table to update the record. Until this point everything is great. Validate a task: (requester role): from the task management menu press a button to open a form with a list of changes to be validated. Double clicking in a specific change number a new form with the change detail is opened. When the requester finishs press the save button and save the changes in a history table (to track the changes) and the change table to update the record.
The problem is that the validate task form doesnt update the change table and doesnt insert all the fields in the history table, only some of them.
Here is the error msg: " ILI index tool can't update all the records in the update query. ILI index tool did not update 0 fields due to a type conversion failure, 0 records due to the key violations,1 records due to the lock violations, and 0 records due to the violation rule violations. Do you want to continue running this type of action query anyway? to ignore the errors and run the query, click yes. for an explanation of the causes of the violations, click help"
Here are the sql to update and insert once the save button is pressed: Public Sub grabarstatus() 'DoCmd.SetWarnings False MsgBox "entered" DoCmd.RunSQL "insert into [history] (change_id,before,after,user,modify,action) values (" & Me.Task_Num.Value & ",'" & vstatus & "','" & Me.status.Value & "','" & Forms!Login!username1 & "','" & Now() & "','Validate status');" DoCmd.RunSQL "update [newchange] set status='" & Me.status.Value & "' where change_id=" & Me.Task_Num.Value & ";" DoCmd.SetWarnings True End Sub
Is there any known issues and even better fixes for records where they partially vanish into thin air, well the meaningful contents disappear and I'm left with nulls. Been an ongoing issue for quite some time, rebuilds haven't fixed the problem, although the same table, different records every time too. There are in excess of 50,000 records in this table and it's just the one here and there, on a frequency basis, say every month or so. :confused:
