Replies

John,

I tried your suggestion and didn’t get the results expected. However, I started experimenting a little bit and found that if I make the requested start time >= the current start time and the requested end time <= the current booked finish time I did get the desired results. The query now returns rooms already booked during that time frame.

Thank you for helping me over this stumbling block.
It really got the creative juices flowing.

Tom

What I’m attempting to recreate is an order form. The main form is the order details and the subform is the order items. Currently in Access I have a combobox on the subform that allows the user to select a product code. In the Before_Update event I move the information in the other columns to other fields on the item record such as description and cost. It works wonderfully in Access, but I’m trying to create an executable in VB. This is for my own benefit/education on learning VB.

I’ll look more closely at the datarepeater and see if that is going to do the job. Any other advice is always welcome.

Thank you,
Tom

Here is the line of code.
DoCmd.SendObject acSendReport, “rptBugs”, “SnapShotFormat(*.snp)”, “tfarrington@mindspring.com”, “cc”, “bcc”, “Bug Reported on: ” & Now(), “Double Click on Snapshot.”, False, “”

That worked beautifully. Thank you
Tom

Thank you.

By the way, what does the CTRL + SHIFT + ENTER do? I noticed it put { at the beginning and } at the end.

Tom

That worked.
A very big thank you.

I tried copying in the formula you suggested only changing the A1:A16 to b16:af16 to reflect the range of values. I received #VALUE error. When trying to find out what was wrong I tried to do a countif using part of the formula and this is where I encountered the error:
=countif(left(b16:af16,1),”H”) this should count both H or H3 but instead I get a #Value
When I tried this it worked:
=countif(b16:af16,”H”) this counted only the cells wih H. Is the problem using a range with the left function?

Thanks in advance

I gave it a try but I’m receiving an error on the Set rst = Me.RecordsetClone line. The Error I receive is Run-time error ’13:’ Type mismatch I think I understand the concept just bewildered on the error for the RecordsetClone method.

Thank you.

I will give it a try Monday when I get in.

You could set the visible property of the autonumber field to no. This will make the field invisible on the form. In the before_update event of the next field set the visible property to true. Assuming your autonumber field is called recid and the second field on the form is called test.

Private Sub Test_BeforeUpdate(Cancel As Integer)
recID.Visible = True

End Sub

Hope this helps

Charlotte,

Tried that. What I found was SR-1a was still applied to Office Premium Disc 2. So I uninstalled it and reinstalled Disc 2. Now they work, go figure.

Thanks

John,

The only thing I can think of is your form is set to Sizable and Max Enabled is set. Try setting Border style to Dialog.

Charlotte,

When a property is leased a total price is calculated. This is based on time and square footage and price/sqft. With a leasted property there can be one record to many records that derive the price. Once the price is calculated, this is were the commission gets broke out. Unfortunately there is no set percentage per profit center. Let me see if I can lay this out below:

Property Table
PropertyID, Property Name, ExtendedTotalPrice, ExtendedCommission <- these last two fields are derived from the records below. (main record) [One Side]

Leased Table
PurchaseID, PropertyID, MonthsLeased, SqFt, SqFtPrice, TotalPrice [Many Side]

Commission Table
CommissionID, PropertyID, ProfitCenter, Commission, PercentageofCommission [Many Side]

Once the total commission is calculated it then needs separated. Can I knowing the total commission allow the user to enter the breakdowns in a subform. If the total from those records exceeds the total commission highlight the last record entered as an error or display a msgbox stating they exceeded the total commission allowed and setfocus back to that record?

I know this is confusing, if they had set business rules i.e. 75% goes to sales person, 10% marketing, 10% department, 5% assistant. Life would be easy.

John,

I can help on the form window not the Access window. With the form in design view go into the properties of the form. You can do this by double clicking on the gray square to the left horizontal ruler on the top of your form. (It may have a black square in it when you first go into form design.)

I have attached a Word file with a picture of a form before property changes and after property changes with a list of the properties to change.

If there is anything else just post again.

John,

I think I replied too fast. Are you wanting to remove the close button on the Access Window or a Form Window?