The application is a Tree Inventory for a major city. The main form is a continuous form listing the trees thoughout the city that the Forestry division must trim on a rotating basis.
Each day the crew foreman prints a list of addresses that the crew is to trim that day. When they return to the office at the end of the day they must enter the maintenance records for the trees that they were able to trim that day.
When they select the group of trees to create a "Route List" each morning, there are numerous considerations that must be taken into account for the sites that will be listed on the Route List. Such that it is best done by a knowledgable, experienced person rather than the computer simply selecting the next 50 trees in sequence. This is where the use of the record selections buttons comes into play.
The record selection buttons provide the most efficient and logical means for the foreman to select the appropriate sites for the list. Because he will be selectings something like 10 sites in a row, skip 2, select 8 more, skip 1, select 22, etc.
And when it comes to various other types of reports, the selection process can incompass as many as 600 records that are selected in mish-mash groups as indicated above.
Needless to say, clicking check boxes, or even using the space-bar just isn't going to cut it as far as the user is concerned (I would probably be taken hostage!). Yet, the check box works best for the computer/programmer to deal with.
Thus the burning need to find a way to set/clear a check box in the table based on the record selections buttons that the user presses.
And in a related post (posted in the VB Code forum)... in an attempt to utilize the SelTop / SelHeight properties I incountered a curious problem with the SelHeight property. The SelTop property is set properly (to the 1st record selected), but the SelHeight property returns a zero. The following is a copy of the post:
Thanks again,
Dan
I have a continuous form (not a subform) with a table as the record source. The record selector buttons are turned on. And even though the Access Help file says "The SelHeight property. A Long Integer value between 0 and the number of records in the datasheet or continuous form.", the following code fails.
In debug I have verified that the reason it fails is because the SelHeight property is zero in spite of the fact that numerous records are selected. The SelTop property is indeed set to the first record selected as you would expect.
Any suggestions as to why the SelHeight property is zero?
==============================
Private Sub SelectButton_Click()
Dim rst As Recordset, i As Integer
If Me.SelTop > 0 Then
Set rst = Me.RecordsetClone
rst.MoveFirst
rst.Move Me.SelTop
i = 0
Do While i < Me.SelHeight
rst.Edit
rst!X = True
rst.Update
rst.MoveNext
i = i + 1
Loop
rst.Close
End If
End Sub
==============================