>Hi, Naomi,
>
>Thanks very much for your code! Ultimately, I think it is the RowSource = "" (Unbind first) which I needed to do. I have enclosed my code below.
>
>The object being named 'lccontrol' was an error, and should have been named locontrol.
>
>The code:
>
>
>** Naomi Nasonovski 30.10.06
>locontrol=thisform.cmbfieldval
>with loControl
> .RowSource = ""
> DO case
> case lcfield='cOpr'
> .RowSourceType = 6
> .RowSource = "Opr.op_Code"
> case lcfield='cgang'
> .RowSourceType = 6
> .RowSource = "Gang.gcode"
> ENDCASE
> .requery()
>endwith
>
>
>
>With best regards,
>
>Steve
Glad you got it working. Make sure to fix typos in my last name <g> It's Nosonovsky with an o and y at the end.
If it's not broken, fix it until it is.
My Blog