Form linked to a table

[Akchayan]

Hello everyone,



I have this table here:

And I have a dropdown list in a form that accesses the table (The table is called tblContent). The drop-down list gets the data from the column "Designation". As you can see in the first picture, it has the columns named "Untertext" and "Untertext2".


The form looks like this:

As I just said, the drop-down list is marked with the number 1.
And the "txtfield" should be filled with the "subtext" and "subtext2" after the update.
How do I do this?

[Bob Fitz]

Can you post a copy of the db

[Welshgasman]

Bring that data into the combo and just refer to the relevant columns when the combo is updated.
At the moment you appear to be using the same source for both controls?

[ArviLaanemets]

What exactly you have and want to do?

a) You have a form based on table tblContent, and you want to select a specific designation/Bezeichnung and to display matching Untertext and Untertext2 in separate text boxes? Then your design will be a single or continuous form with hidden text box linked with ID field (in case ID is autonumeric), and text boxes linked with Bezeichnubg, Untertext, and Untertext2 fields. Plus you have an unbound combo for record selection, with a query as record source (like "SELECT ID, Bezeichnung FROM tblContent ORDER BY 2"), with 2nd column visible. When any Bezeichnug is selected, the AfterUpdate event of combo activates matching record for form;

b) You have some form based on another table/query, and in this table is a field, where an ID for Bezeichnung is stored. In form, you want a combo to select Bezeichnung. You link this combo to bezeichnung ID of form source table, and have the combo's record source of combo like above (i.e. based on tblContent), with 2nd column of query displayed. To display additional info about selected Bezeichnung, have unbound text box(es) in form, with formula(s) to return Untertext/Untertext2 from tblContent matching with selected Bezeichnung ID, and create an AfterUpdate event for combo to refresh those unbound text boxes.

[Akchayan]

What exactly you have and want to do?

a) You have a form based on table tblContent, and you want to select a specific designation/Bezeichnung and to display matching Untertext and Untertext2 in separate text boxes? Then your design will be a single or continuous form with hidden text box linked with ID field (in case ID is autonumeric), and text boxes linked with Bezeichnubg, Untertext, and Untertext2 fields. Plus you have an unbound combo for record selection, with a query as record source (like "SELECT ID, Bezeichnung FROM tblContent ORDER BY 2"), with 2nd column visible. When any Bezeichnug is selected, the AfterUpdate event of combo activates matching record for form;

b) You have some form based on another table/query, and in this table is a field, where an ID for Bezeichnung is stored. In form, you want a combo to select Bezeichnung. You link this combo to bezeichnung ID of form source table, and have the combo's record source of combo like above (i.e. based on tblContent), with 2nd column of query displayed. To display additional info about selected Bezeichnung, have unbound text box(es) in form, with formula(s) to return Untertext/Untertext2 from tblContent matching with selected Bezeichnung ID, and create an AfterUpdate event for combo to refresh those unbound text boxes.

The 2nd Point.

[ArviLaanemets]

What to do is explained there. NB! When calculating Untertext/Untertext2, refer to combo control, not to ID field in table. Changes to field value doesn't happen before the record is saved.

[Akchayan]

Can you post a copy of the db

Test.zip
That's a test DB.

[Akchayan]

What to do is explained there. NB! When calculating Untertext/Untertext2, refer to combo control, not to ID field in table. Changes to field value doesn't happen before the record is saved.

I don't really understand what you mean.

[Bob Fitz]

Take a look at the attached db.

I have added 2 hiddend columns to your combo box which are referenced in the Control Source property of the textboxes to get the data from them.
Please note that the Column() property is zero based, so the first column is Column(0), the second is Column(1) etc.
Post back if you have questions. Hope this helps.

[Akchayan]

Take a look at the attached db.

I have added 2 hiddend columns to your combo box which are referenced in the Control Source property of the textboxes to get the data from them.
Please note that the Column() property is zero based, so the first column is Column(0), the second is Column(1) etc.
Post back if you have questions. Hope this helps.

Thank you very much you helped me alot, but i have one question:

Is it possible that, for example in this case, after "-Sicherheitsbestimmung / Sicherheitskultur der Huser Gebäudetechnik AG" there is one line below the next one?

[mike60smart]

Hi
It might be that your structure is slightly wrong.

If you select a "Designation" would you want to see only those "Captions" associated with the Designation selected?

[Welshgasman]

Thank you very much you helped me alot, but i have one question:

Is it possible that, for example in this case, after "-Sicherheitsbestimmung / Sicherheitskultur der Huser Gebäudetechnik AG" there is one line below the next one?

Look to see how Bob combined them, then use vbCRLF in the concatenation. I will let you work out where it should go.

[Bob Fitz]

Thank you very much you helped me alot, but i have one question:

Is it possible that, for example in this case, after "-Sicherheitsbestimmung / Sicherheitskultur der Huser Gebäudetechnik AG" there is one line below the next one?

I believe Gasman has sent you in the right direction with his advice in post #12 but please post back if you're still unable to get the desired result.

[Akchayan]

I believe Gasman has sent you in the right direction with his advice in post #12 but please post back if you're still unable to get the desired result.

I have more or less achieved the result I wanted, but is there a way that this:

is written directly into a report?


I tried it that way but it didn't work:

[Bob Fitz]

Try:
=[Kombinationsfeld0].[Column](2) & """ & vbCrLf & """ & [Kombinationsfeld0].[Column](3)