Thread: Form based on table is not populating

I have a table that displays a list of entries - this table was being displayed in datasheet mode.
I wanted to be able to control the ability to edit records on the datasheet so have created a form that displays in continuous view so that I can turn off editing.
The problem is that the form is not actually retrieving the data from within the table and displaying it in the form.

I have no idea what is causing the data not to populate.
The form uses the table as its record source and all the controls are set to the correct columns in the table.

I am hoping that this makes sense.

Of course ... Sorry ... when I posted this I was getting flustered with not being able to find any way to fix the issue.

Here is the sample.


I realise now that my post may also not have been too clear so I'll update things now that I am thinking a little better.

As you will see by looking at the database there are several functions.
The ones that have issues are:
the "view all" button - what it originally did was displayed the contents of the "movie database list" table directly in datasheet view.
The problem I have with the way that works is that the datasheet view can be edited directly without requesting any confirmation at all so edits can be made by mistake and then the table updates automatically without asking for confirmation - My first thought was to lock the datasheet and then put an edit button on there - my online searches have all said that cmd buttons and controls cannot be added to the datasheet - so next I tried to create the form "continuous view form" so that I could lock everything and add edit button - for some reason this form is returning only a singular row instead of the complete datasheet view that it should be showing and I don't know how to fix this.

Second - the "search movies" button - If you click the search button without inputting criteria it displays the complete table - I would prefer it to show a msg box that says something like "please type in some search criteria and try again" and if the search criteria that they try to search for does not match any existing entries then a msg box stating "no matching results could be found, pls try again"
I do have a msg box code in the search button but it is not working as expected.

no only me ... but i do have a child under 2 yrs old who likes to play with the laptop .... and i also just want to make sure that i can't mistakenly press something and edit an entry.

I tried the code you put in post above but that didnt work. Did some searching and found the vba code is ".locked" and tried the following as well:

I added an edit cmd button to the continuous view sheet (which adds one to each row that shows) and then added the following code:

Private Sub Command26_Click()
Me.Text7.Locked = False
Me.Text9.Locked = False
Me.Text11.Locked = False
Me.Text13.Locked = False
End Sub

but that didnt unlock the boxes for editing.


Does anyone know of a way that I can do this ?

Originally Posted by alansidman

Ok. More thinking outside the box. Add an after update event to each of the four text boxes. In the after update event put the same code used in the on load event to lock the text boxes.

So, when the form loads, the text boxes are locked. Click on the command button and you can edit any text box. Click on a tab or enter and the after update event fires and re-locks all the text boxes.

Its a workaround that just may work.

Alan

Thanks Alan,
It is a kind of workaround. It does work however the only thing wrong with it is that for me to actually edit an entire movie record (read line) I need to click the edit button each time I change the focus to the new text box.

What about a way to use the command button to open a new form with only that lines entries in it .... the form would look just like the search form already created but pre-populate with the relevant entry ?

that sounds great thanks alan .... will fix it now .... will probably use the form idea.

brings me to my next question:
I need 2 msg boxes to show up during searching.
first - a msg box when there are no matches to any of the searched criteria.
second - a msg box when nothing at all has been entered into ALL of the boxes in the search form (it cannot be allowed to fire the code if even one of the boxes has something entered into it)

Code I found was:

]Private Sub Command7_Click()

If Nz(Me.Title, "") > "" Then

If DCount("*", "search", "[Movie Title] = '" & Me.Title & "'") Then
MsgBox ("No movies matching your search. Please refine your search and try again.")
Else
DoCmd.OpenQuery ("search")

]Else
 MsgBox "You Must Enter a Title in Order to Search!"
 Title.SetFocus

End If
End If

The problem is that this code does two things - one ... it forces the second msg box to show whenever there is nothing in the title search box - even if both other boxes are filled.
two - when no search results are found it still opens a blank datasheet.

There are 3 search criteria and the no results found needs to run on all 3 or any combination of them.
and the second msg box needs to run only if all 3 boxes are empty.
and when the no results found code runs then NO datasheet is to be opened at all - just an immediate return to the main search menu form

Originally Posted by alansidman

For your if statements, I would consider using something of the order of

HTML Code: 

if Len(textbox) <1 and len(textbox2) <1 etc. Then
Msgbox

Alan

Will that for the no search results found ? or is that just for the no search criteria entered ?