Run Query In (1 Viewer)

Diamond-Leopard · Nov 20, 2018

So I have a very simple query that does a quick search through one of my tables for the word entered into a text box on a form... at the moment I have a button under the text box which says "Run Query" and this pops up the query with my search results and that is all dandy.

What I would like is the search results to be in another large text box under the input text box which would display the results .. so instead of a new window with the query on it.. I would like the querey to be displayed in the text box as soon as the input text box is changed.

So something like

Private Sub txtInputBox_AfterUpdate()

txtSearchResults.value = 'Resultsofquery'

End Sub

Any Idea?

Thanks Guys

Galaxiom · Nov 20, 2018

Textbox is not really suited to this task. You could use a subform structure.

isladogs · Nov 20, 2018

That won't work unless the query output only has one record and one field.
Instead create a subform with the query as it's record source.
Add the subform to your main form and make it hidden by default.
When you click the button make the subform visible to show your results

Diamond-Leopard · Nov 20, 2018

Ok guys so I now have a subform inside that form and the subform is made visable when the button is clicked but the query pops up empty? Do i need like a refresh code? like something to re-run the query with the new word in the text box?

isladogs · Nov 20, 2018

Requery the suform.

Diamond-Leopard · Nov 20, 2018

Sweeet Guys I just did a requery.Queryname and that has sorted it sweet!!

I wonder now If I can have it only pop up if it shows a search result?

If it finds nothing can I make it stay hidden?

isladogs · Nov 20, 2018

Ah...never satisfied

You could add something like

Code:

if DCount("*","YourQueryName")>0 Then
Me.subform.visible =true
End if

Diamond-Leopard · Nov 20, 2018

I did it,

It worked perfectly!

You are truly a god to me

Thank you very much

isladogs · Nov 20, 2018

You're welcome.
Now you can do me a favour.
Please skim read this thread and make a comment. You'll see why.
https://www.access-programmers.co.uk/forums/showthread.php?t=302524.

Run Query In (1 Viewer)

Diamond-Leopard

Registered User.

Galaxiom

Super Moderator

isladogs

MVP / VIP

Diamond-Leopard

Registered User.

isladogs

MVP / VIP

Diamond-Leopard

Registered User.

isladogs

MVP / VIP

Diamond-Leopard

Registered User.

isladogs

MVP / VIP

Similar threads

Users who are viewing this thread