Perry L Harold
pharold at proftesting.com
Tue Mar 13 14:24:31 CDT 2007
LOL! Much better than most of the Friday humor.
Perry Harold
-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin
at Beach Access Software
Sent: Monday, March 12, 2007 11:09 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] FW: Combo Box Not Showing All Records
Hey good solution Rocky. You're a peach. Thanks.
Rocky
-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin
at Beach Access Software
Sent: Monday, March 12, 2007 7:12 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] FW: Combo Box Not Showing All Records
OK I'll just talk to myself - nothing new.
Hey. Here's your problem Rocky. You accidentally changed the number of
columns on the combo box from 7 to 8. The underlying queries have only
seven fields.
When you tested it in A2K3 you didn't see the problem but when you sent
it to your client who is using A2K they did have the problem. Why it
works in
A2K3 and not in A2K I don't know. But now you have the fix.
HTH
Rocky
-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin
at Beach Access Software
Sent: Monday, March 12, 2007 3:37 PM
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] FW: Combo Box Not Showing All Records
Further to my post below. The problem is in the code where I change the
row source of the combo box. Because if I change it on the property
sheet it works OK. Here's the code:
Select Case fraFindOrderBy
Case 1
cboAgreements.RowSource = "qryAgreementsByOrderNumber"
Me.RecordSource = "qryRentalAgreementHeaderByOrderNumber"
Me.cboAgreements.ColumnWidths =
"0"";0.75"";2"";1"";1.5"";0.75"";0.5"""
Case 2
cboAgreements.RowSource = "qryAgreementsByCustomer"
Me.RecordSource = "qryRentalAgreementByCustomer"
Me.cboAgreements.ColumnWidths =
"0"";2"";0.75"";1"";1.5"";0.75"";0.5"""
Case 3
cboAgreements.RowSource = "qryAgreementsByDateOut"
Me.RecordSource = "qryRentalAgreementByDateOut"
Me.cboAgreements.ColumnWidths =
"0"";1"";2"";0.75"";1.5"";0.75"";0.5"""
Case 4
cboAgreements.RowSource = "qryAgreementsByPurchaseOrder"
Me.RecordSource = "qryRentalAGreementByPurchaseOrder"
Me.cboAgreements.ColumnWidths =
"0"";1.5"";0.75"";2"";1"";0.75"";0.5"""
Case 5
cboAgreements.RowSource = "qryAgreementsByFirstUseDate"
Me.RecordSource = "qryRentalAGreementByFirstUseDate"
Me.cboAgreements.ColumnWidths =
"0"";1"";1.5"";0.75"";2"";0.75"";0.5"""
End Select
cboAgreements.Requery
Me.Requery
TIA
Rocky
_____
From: Rocky Smolin at Beach Access Software
[mailto:rockysmolin at bchacc.com]
Sent: Monday, March 12, 2007 3:28 PM
To: 'Access Developers discussion and problem solving'
Subject: Combo Box Not Showing All Records
Dear List:
I have a combo box on a form with seven fields. There is an option
frame on the form to let the user select how the data in the combo box
is to be sorted. The options are Order Number, Customer, P.O., Date
Out, and First Use Date.
In the after update event of the option frame I set the row source of
the combo box, adjust the widths of the columns, and requery the box. I
have five separate queries.
Problem is that not all the records show up in the box although they all
show up in the query.
Order Number works correctly. By Customer the query selects 19488
records but the combo box only displays 18242. Sort by Date Out the
query selects
19301 records but the combo box only shows 139. First Use date - the
query selects 19733 but the combo box only shows 15385. Purchase Order
- the query selects 13060 but the combo box only goes down to 13055 (so
close!)
This is an A2K data base running on SP-3.
But the A2K format mdb all works correctly in A2K3!
Any ideas what's going on here?
MTIA
Rocky
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.446 / Virus Database: 268.18.8/718 - Release Date:
3/11/2007
9:27 AM
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.446 / Virus Database: 268.18.10/720 - Release Date:
3/12/2007
7:19 PM
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com