It will not display all the records. It does on other systems.
It is a basic 2 column combo box, and will have a couple thousand records in
it.
It seems as if it will only display the amount of records that the listrows
value is set to, and you are not able to scroll down any farther.
Sometimes if you use the arrow keys, and your mouse it scrolls down. If you
enter data in manually, it will not.
They are using Acces 2000. I cannot figure it out,a nd installing service
packs didn't seem to help.
Thanks in advance.
Sean Henry
Never found a really good fix, except limiting the records in a combo box to
less than 1000 or so with some form of external filter - eg another combo
box to set some sort of grouping of the records.
--
Regards,
Adrian Jansen
J & K MicroSystems
Microcomputer solutions for industrial control
"Sean Henry" <ne...@mastersolutions.com> wrote in message
news:ejnRufP6...@TK2MSFTNGP10.phx.gbl...
I requery this box all the time, as it can change. I bet that is a key. I
will be able to test it tomorrow.
This may sound like a dumb question, but I always use queries as sources for
combo boxes. How do I apply a recordset to a combo box? That would probably
be a good way for me because of the nature of the data, and the way it
handles.
Sean Henry
"Adrian Jansen" <q...@noqqwhere.com> wrote in message
news:bN8ca.44$Jh2...@newsfeeds.bigpond.com...
The query is a recordset, so you can do things in code like:
dim rs as DAO.Recordset
set rs = currentdb.OpenRecordset("yourqueryname")
rs.movelast 'to fully load the recordset
me.yourcombobox.recordsource = rs
that should do it. Remember to do
rs.close
set rs = nothing
on closing the form, or you WILL eat some memory
--
Regards,
Adrian Jansen
J & K MicroSystems
Microcomputer solutions for industrial control
"Sean Henry" <ne...@mastersolutions.com> wrote in message
news:#rsPOJd6...@TK2MSFTNGP12.phx.gbl...
The only other time I saw this was on some machines running Win XP with
Acces 97 (!). I sure hope I can fix it. Thanks for the tip.
Sean
"Adrian Jansen" <q...@noqqwhere.com> wrote in message
news:sDfca.176$dE2...@newsfeeds.bigpond.com...
Dim frm As Form
Dim ctl As Control
Dim rst As DAO.Recordset
Dim str As String
Set frm = Forms("Preferences_f")
Set ctl = frm.Controls("LimitPOPartsToCrossRef")
Select Case ctl.Value
Case True
Set rst =
CurrentDb.OpenRecordset("FQ_PurchaseOrderDetails_sf_PartNumCrossRef")
Case False
Set rst =
CurrentDb.OpenRecordset("FQ_PurchaseOrderDetails_sf_PartNum_q")
End Select
rst.MoveLast
Me.InternalPartNum.RecordSource = rst
There is also this method which doesn't work either
Me.InternalPartNum.RowSource = rst
Sean
"Adrian Jansen" <q...@noqqwhere.com> wrote in message
news:sDfca.176$dE2...@newsfeeds.bigpond.com...
Me.InternalPartNum.RowSource = rst
sets the rowsource to a recordset. But I think the rowsource for a combo
box is expecting a string, like an SQL statement. Perhaps try
Me.InternalPartNum.RowSource = rst.name
Sean
"Adrian Jansen" <q...@noqqwhere.com> wrote in message
news:JRuca.646$dE2....@newsfeeds.bigpond.com...