Replies

Thanks Wendell… but the problem I’m having is with the syntax…
This is what I have so far for the code…

Dim acApp As Object ‘ Declare variable to hold the reference.
Dim acDatabase As DAO.Database

Set acApp = GetObject(“C:Documents and SettingstreaspaDesktopdb1.mdb”)

With acApp
.Visible = True
.DoCmd.OpenForm “Form1”
.Forms(“Form1”).frmOptions = 1
.Forms(“Form1”).cmdDone.SetFocus
‘cmdDone_Click ‘this is where I don’t know how to enter the command… I’ve tried a few things but I can’t get it right…
.Quit
End With

Set acApp = Nothing

End Function

P.S. This is just a sample… Not the real thing…

This will have to be adapted… but check out this link…
http://www.granite.ab.ca/access/verifyjetsp.htm%5B/url%5D

Hopefully it’s a start for you anyway…

This will have to be adapted… but check out this link…
http://www.granite.ab.ca/access/verifyjetsp.htm%5B/url%5D

Hopefully it’s a start for you anyway…

I’m assuming you mean that you want to return the label caption property that corresponds with the option button selected?
If so, there are at least a couple of options for you… Depending on how many option buttons are in the group…

You could use an IIF statement and nest the results… For example:
fldChoice: IIf([Forms]![frmName].[optGroupName]=1,[Forms]![frmName].[lblOneName].[Caption],IIf([Forms]![frmName].[optGroupName]=2, [Forms]![frmName].[lblTwoName].[Caption], [Forms]![frmName].[lblOneName].[Caption])

Or you could try something like the Choose function…
=Choose([Forms]![frmName].[optGroupName], [Forms]![frmName].[lblOneName].[Caption], [Forms]![frmName].[lblTwoName].[Caption],[Forms]![frmName].[lblThreeName].[Caption])

(of course, you’ll have to change the names I’ve used to your own… )

The Choose looks cleaner… but I haven’t tested it… Give both a try…
HTH…

I’m assuming you mean that you want to return the label caption property that corresponds with the option button selected?
If so, there are at least a couple of options for you… Depending on how many option buttons are in the group…

You could use an IIF statement and nest the results… For example:
fldChoice: IIf([Forms]![frmName].[optGroupName]=1,[Forms]![frmName].[lblOneName].[Caption],IIf([Forms]![frmName].[optGroupName]=2, [Forms]![frmName].[lblTwoName].[Caption], [Forms]![frmName].[lblOneName].[Caption])

Or you could try something like the Choose function…
=Choose([Forms]![frmName].[optGroupName], [Forms]![frmName].[lblOneName].[Caption], [Forms]![frmName].[lblTwoName].[Caption],[Forms]![frmName].[lblThreeName].[Caption])

(of course, you’ll have to change the names I’ve used to your own… )

The Choose looks cleaner… but I haven’t tested it… Give both a try…
HTH…

I’m assuming there is already a text box control in the report design that gets it’s value from input value in tblPropertyName…
If so, just change the control source property to:
= DSum(“[RoomProration]”, “qryNCTotalTaxExempt”)

If you want to read more about this, lookup Domain Aggregate functions in Access Help…
HTH

I’m assuming there is already a text box control in the report design that gets it’s value from input value in tblPropertyName…
If so, just change the control source property to:
= DSum(“[RoomProration]”, “qryNCTotalTaxExempt”)

If you want to read more about this, lookup Domain Aggregate functions in Access Help…
HTH

This is probably to do with having other fields in your query with different values… If you do, ask yourself how you know which record with 18 in the topvalue field is the one you want?… Is there another field that answers that question… and is it string, number, date, etc data?

Post back with sample data and/or the sql if you need help figuring it out…

This is probably to do with having other fields in your query with different values… If you do, ask yourself how you know which record with 18 in the topvalue field is the one you want?… Is there another field that answers that question… and is it string, number, date, etc data?

Post back with sample data and/or the sql if you need help figuring it out…

Hi John… Great example! … Thanks…

For those who are following the thread, I got a sample of the database and fixed it up with pbrown…
We got the control and field names figured out and the code looks very similar to John’s… He did have one other problem though… The “[Parts] = Altima…” part was a mistake… The data in the Parts field was nothing like that… which meant that he got no records returned… Hence the Errors all over the report…

Hi John… Great example! … Thanks…

For those who are following the thread, I got a sample of the database and fixed it up with pbrown…
We got the control and field names figured out and the code looks very similar to John’s… He did have one other problem though… The “[Parts] = Altima…” part was a mistake… The data in the Parts field was nothing like that… which meant that he got no records returned… Hence the Errors all over the report…

Sorry it took so long for me to answer… Duty called…

Sure… I sent you a private message with my work email address…
I don’t know if I’m allowed to post it here… and while I’m at work I can’t get at my online email account anyway…
I’ll continue posting my advice and questions on here though…

Thanks for suggesting it Pat! I’m dying to get a look at this thing…

Sorry it took so long for me to answer… Duty called…

Sure… I sent you a private message with my work email address…
I don’t know if I’m allowed to post it here… and while I’m at work I can’t get at my online email account anyway…
I’ll continue posting my advice and questions on here though…

Thanks for suggesting it Pat! I’m dying to get a look at this thing…

Okee dokee… Unfortunately it doesn’t look like I’m going to get to see this thing, so let’s try this one piece at a time…

First of all… Let’s talk about the report Sort…

1) I don’t know why you would have put that SortBy field in the query… If the recordsource for the “General Info” Report contain the fields, [Project Classification] and [Y1Sum], and those are the fields you want to sort on that is all you need…

2) DoCmd.OpenReport does not have a Sorting argument so I would just use the Report object itself and the OrderBy property… For example… The following code will open the report needed and set the OrderBy property as well as turn OrderByOn property to True… This is assuming I’m understanding correctly and you have a control option group called “grpSortBy” on the form with three different Options… The user having selected 1 meaning “sort the report by Y1Sum”, 2 meaning “sort the report by Project Classification” and 3 meaning

Okee dokee… Unfortunately it doesn’t look like I’m going to get to see this thing, so let’s try this one piece at a time…

First of all… Let’s talk about the report Sort…

1) I don’t know why you would have put that SortBy field in the query… If the recordsource for the “General Info” Report contain the fields, [Project Classification] and [Y1Sum], and those are the fields you want to sort on that is all you need…

2) DoCmd.OpenReport does not have a Sorting argument so I would just use the Report object itself and the OrderBy property… For example… The following code will open the report needed and set the OrderBy property as well as turn OrderByOn property to True… This is assuming I’m understanding correctly and you have a control option group called “grpSortBy” on the form with three different Options… The user having selected 1 meaning “sort the report by Y1Sum”, 2 meaning “sort the report by Project Classification” and 3 meaning