Whenever I fill a combo-box from a recordset (with this code):
ndCode = integerVB Code:
While Not TempRS.EOF Combo1.AddItem TempRS.Fields("sdOmsch"), TempRS.Fields("ndCode") TempRS.MoveNext Wend
sdOmsch = string
This is no problem, but whenever I (the code) try's to add the 27th item, it gives an error:
Run-time error '5':
Invalid procedure call or argument
Does anybody have a clue
Ow, yes ndCode is the primary key of that table




Reply With Quote