<<
I am using MS Access 2000.
I've never used it before and so ain't got a clue, however if the below is
possible, i'll get myself a book from the library to assist me on my way.
Basically, I am wanting to create a searchable database. I will have a
different entry for around 100 people. Each entry will contain name, contact
details, three specific talents (ie. singing, dancing, painting). If they
only have 2, then the last field will be left blank. Now on top of this,
there will be a few prices, ie. price per hour etc...
Now once I have all my entries in my database, is there a way of me typing
in some search thingy-ma-bob "singing and dancing" and it will then come
back with a list of people who fall into this category?
Thanks all and sorry if this sounds a dumb question!
The free downloadable sample database at
www.bullschmidt.com/access uses the
query by form concept so that on the invoices dialog one can optionally choose
a rep, a customer, and perhaps a date range, click on a button that says
"Input," and then have the invoice form open up showing all the invoices that
match the criteria.
And you'd like you can use this as a starting point for your project.
And here is how the query by form concept can work.
On the invoices dialog there are the following controls:
InvDateMin with DefaultValue of =DateSerial(Year(Date())-1,1,1)
InvDateMax with DefaultValue of =Date()
InvRepNum with DefaultValue of *
InvCustNum with DefaultValue of *
Also on the invoices dialog there is a command button called cmdInput to open
the invoices form with the following code behind the OnClick property:
DoCmd.OpenForm "frmInv"
And of course there could be a button to open a report the same way:
DoCmd.OpenReport "rptInv", acViewPreview
The invoices form (frmInv) has RecordSource property of qryInv.
And the qryInv query's criteria for the InvDate field has:
Between [Forms]![frmInvDialog]![InvDateMin] And
[Forms]![frmInvDialog]![InvDateMax]
And the qryInv query's criteria for the RepNum field has:
Like [Forms]![frmInvDialog]![InvRepNum]
And the qryInv query's criteria for the CustNum field has:
Like [Forms]![frmInvDialog]![CustNum]
One related point is that you probably wouldn't want to allow blanks (i.e.
Nulls) in fields that are going to be used with Like in any criteria for that
field. Otherwise the blanks wouldn't be shown.
For example (based on what is entered into a last name search field):
Like 'Smith' would show Smith records
Like '' would show no records (probably not what one would want)
Like '*' would show all records
And to counter that I like to have the search fields have a DefaultValue of *
and not allow the search fields to be blank.
Or a more complicated solution would be to create the query's SQL statement
dynamically so that the criteria on a particular field isn't used unless
needed.
For example:
' Set strSQL.
strSQL = "SELECT * FROM MyTable WHERE (1=1)"
If Not IsNull(Rep) Then
strSQL = strSQL & " AND (Rep='" & Rep & "')"
End If
If Not IsNull(Customer) Then
strSQL = strSQL & " AND (Customer='" & Customer & "')"
End If
Best regards,
J. Paul Schmidt, Freelance Access and ASP Developer
www.Bullschmidt.com/Access - Sample Access Database
www.Bullschmidt.com/login.asp - Web Database Demo