[AccessD] FW: Combo Box Not Showing All Records

Rocky Smolin at Beach Access Software rockysmolin at bchacc.com
Mon Mar 12 21:12:28 CDT 2007


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
 




More information about the AccessD mailing list