Hi; I am working on a db with Access 2007. When a number is selected in a combo box, using that data, another data is extracted from another table, but the following error message appears (please note that since I use Access in Japanese, maybe the following translation is not very accurate). Error occurred in procedure after update with expression indicated in the event procedure. Error occurred when Microsoft Access was communicating with OLE server or Active X control. * An expression different from Macro name, user-defined function or event procedure, is indicated. * Error occurred in evaluation of functions, events or macros. So, I would like someone to help me to solve this problem. The most strange thing is that I have tried the same expressions in another database much more simple, just to try to find the problem, and it worked! The code that I put is the following. Private Sub ID_de_Ruta_AfterUpdate() Me![Millas] = DLookup(“”[Distancia]“”, ““Freight tariff””, “”[Id1] =“” & Me![ID de Ruta]) End Sub Hope above is enough info so that you can post a right solution… Thank you in advance. Ryo

Hi this is seems to be a common problem and there does not seem to be one answer.1. Check and see which languages are installed onto your computer (Control panel > Regional Settings > Language settings) sometimes having two languages installed causes a problem.
2. Check and ensure all your references are ok and that you have all the relevant references ticked, (VBA, Access Object library, OLE automation, ActiveX objects (which ever version is suitable for your version of access) and MS DAO object library.
3. Create a new form and copy controls from old form, delete old form and rename new form to old forms name.
4. Compact and repair
5. Decompile

I am having a simular problem but unfortunately none of the above are fixing the problem I hope you have better luck

Baba

ITtoolbox access-lthank you again, but this didn’t work either. I also tried with parenthesis withut “.value”, and the result was same.
Do you think there is problem in any other place?
RGRDS,

ITtoolbox access-lOne thing I noticed, “Freigt tarrif” has a space, try
adding around the field. [Freight tarrif]
The DLookup looks correct other then the problem.

Me![Millas] = DLookup(“[Distancia]”, “Freight tariff”, “[Id1] =” & Me![ID
de Ruta])

ITtoolbox access-lHi, Darrell: Thanks for your post. Efectively, “ID de Ruta” is the data that you choose with combo box. But your suggestion did not work… The same error message appears.
Do you have any other idea??
Regards,
Ryo

ITtoolbox access-lI assume this is your combobox Me![ID de Ruta])
Try changing it to Me![D de Ruta].Value)