Replies

Hi Pat,

I’m not sure where you want me to try to (!).

Yes, Member/BusinessName is the name of the control on the frmMemberStatusAdd.

Thanks,
Leesha

Uhm, I “think” that is where the problem is arising as the code gets past the point of opening the form but seems to blow up on the form load code. To answer your questions:

Control source = member/businessname
Number of columns = 4
Column widths = 0″;1″;1;1″
Bound column = 1

Thanks so much!

Alicia

Hi Hans,

No the record for the member does not already exist. The form opens with the pupose of adding a new membership record for the name chosen from the demographics table/form.

I entered this code behind the cmd button that is used to open the form:

DoCmd.OpenForm “frmMemberStatusAdd”, , , , acFormAdd, , Me.[LASTNAME/BUSINESS]

I entered the following code on the frmMemberStatusAdd:

Me.[Member/BusinessName].DefaultValue = Chr(34) & Me.OpenArgs & Chr(34)

When the run the cmd. button on the demographics form to open frmMemberStatusAdd I get the following error:

Object doesn’t support this property or method and when I debug it it is the code one the form load property that is in yellow.

Alicia

Hi Charlotte,

When I ran the code I got an error message that says the openform action was canceled.

This is the code I used –

DoCmd.OpenForm “frmMemberStatusAdd”, , , “[Member/BusinessName] = ‘” & Me.[LastName/Business] & “‘”

I took out the spaces as you mentioned.

Thanks for the help!

Leesha

Hi Charlotte and Wendell

Well it worked and I’m thrilled! Thanks for the info!!

Leesha

Thank you!!! That’s what happens when one is self taught!! You don’t necessarily know all the cardinal rules. And yes, the code is is behind a form :-)!

I’ll give it a shot.

Leesha

Hi Wendell,

I have tried various things. These are the ones that gives me the read-only error I mentioned:
[NAME] = [FULL NAME LNF]
Me.NAME = Me.FULL_NAME_LNF

This one gives me a message stating “Invalid qualifier”
Me.NAME.Value = Me.FULL_NAME_LNF.Value
NAME is yellowed out in the debug screen. NAME is the name given to the unbound text box.

Thanks for you help,
Leesha

Thanks Hans. I’ll start reading!!!

Leesha

My question is how do I go about setting it up. I assumed it would work if it was listed as an alternative in Access.

Thank you,
Leesha

Hans, Pat & Wendell…..THANK YOU!! Sure enough the date input boxes weren’t formatted, and once I set the date to short date the query ran. It just about killed me to be at a nursing related training all day and having to wait to get home to see what new advice there would be. I’m on my face and will TRY to leave this project alone till tomorrow night. Unfortunately, my friend needs it back with the changes ASAP. Sorry Hans if I frustrated you. I appreciate the help and the patience. In the process I learned a great deal and from the number of people who read these posts, hopefully so did a lot of other folks.

Leesha

Morning Pat,

In answer to your question re the joins, when I run the query without “startdate” and “enddate” defined I get all the records in the database. So, I’m confident that the join works. It’s only when I enter in the nonbound input boxes ‘startdate” and “enddate” on the form frmAccountsReceivable, and then enter them into the query that I loose the data.

Off to a three day nsg meeting. Ugh. Won’t be home till this evening to get this right. Probably a good thing for my eyes to not stare at a computer screen for a bit, but I’m itching to get this fixed.

Have a good one,
Leesha

<<Can you just make sure there are dates in the date range?

Yep, I'm sure.

<<What is your date range?

I've tried a variety of ranges. IE 11/1/02 – 11/31/02; 1/1/03-1/31/03 and so on. For Novemeber alone there are roughly 285 records.

<>Let’s just establish if there are any records first before we go and change the joins.

Hitting the sack. Will check in the am to see if you have any ideas. I’m blind from looking at this computer screen working on this database. Thanks so much for the help.

Leesha

First there is no such thing as a dumb question! Second, I appreciate your bearing with me!

The dates in tblTimeSheet start with 11/5/02 and go through the present. There are 1400+ records. I’ve been entering the a range of dates that are 30 days in size so as to capture data. I’m sure that there are dates for the time frame I’m trying to look at. I’ve even tried a variety of dates and still not data. We’ve made progress in that at least there are no errors! As far as right and left joins, this is really outta my league. What would I do?

Thanks,
Leesha

No errors but no data either.

PARAMETERS [Forms]![frmAccountsReceivable]![Startdate] DateTime, [Forms]![frmAccountsReceivable]![Enddate] DateTime;
SELECT tblTimeSheet.AutoNumber, tblEmployee.[Employee Name], tblTimeSheet.Date, tblClientDemographics.[Client Name], tblAccountDemographics.[Account Name]
FROM tblEmployee INNER JOIN (tblClientDemographics INNER JOIN (tblAccountDemographics INNER JOIN tblTimeSheet ON tblAccountDemographics.ID=tblTimeSheet.AccountId) ON tblClientDemographics.ID=tblTimeSheet.ClientID) ON tblEmployee.[Auto Number]=tblTimeSheet.EmployeeID
WHERE (((tblTimeSheet.Date) Between [Forms]![frmAccountsReceivable]![Startdate] And [Forms]![frmAccountsReceivable]![Enddate]));

Leesha

I just replaced frmTimesheet with frmAccountsReceivable and no longer get errors, however nothing comes up in the query. Here is the code:

PARAMETERS [Forms]![frmAccountsReceivable]![Startdate] DateTime, [Forms]![frmAccountsReceivable]![Enddate] DateTime;
SELECT tblTimeSheet.AutoNumber, tblEmployee.[Employee Name], tblTimeSheet.Date, tblClientDemographics.[Client Name], tblAccountDemographics.[Account Name]
FROM tblEmployee INNER JOIN (tblClientDemographics INNER JOIN (tblAccountDemographics INNER JOIN tblTimeSheet ON tblAccountDemographics.ID = tblTimeSheet.AccountId) ON tblClientDemographics.ID = tblTimeSheet.ClientID) ON tblEmployee.[Auto Number] = tblTimeSheet.EmployeeID
WHERE (((tblTimeSheet.Date)=[Forms]![frmAccountsReceivable]![Startdate] And (tblTimeSheet.Date)=[Forms]![frmAccountsReceivable]![Enddate]));

Thanks,
Leesha