filling text field from dbgrid

[ageurtse]

Hello,

i'm trying to build a form with several text fields.
these text fields should populated by a record selected from a dbgrid.
is this possible and how can this be done.



the dbgrid could be used for several different text fields

i hope you guys get it, don't now how to explain it better.

[June7]

What do you mean by 'dbgrid'? What exactly is this? Are you coding in VB6 as UI? https://msdn.microsoft.com/en-us/lib...(v=vs.60).aspx

According to that link, values can be 'grabbed' from the control.

[ageurtse]

sorry i mean a grid, in the early days i used delphi and there it was called a dbgrid.


below are some textfields and a grid.
let's take this as an example.


in my database i have an owner, user and inspection company.
all these three text fields should be filled from the grid, which reprecent's all company names, adresses etc. etc.

all type of adresses are put into one tabel, because a owner could also be a user and maybe is also the company name.
In most cases those are different.

now i want to select the right adres from the grid and point it to the right textfield. how can i do this.

[June7]

That 'grid' is just a subform in Datasheet view.

You want to select city in the subform and show its detail data on the main form? Might consider the intrinsic Split form.

However, if the main form is bound to table of Countries and subform is bound to another table of Cities, what you want is not conventional. Normally subform only displays records related to main form record. In such an arrangement subform (child) does not dictate to main form (parent). Conventional approach is combobox on main form to select desired country and use that value to search or filter the main form. So could have UNBOUND multi-column combobox that lists ALL cities and a column could have the associated country.

[ageurtse]

i figured that out my self, but how do i if a record in the subform is selected be placed in on off the selected text boxes.

[June7]

I got this to work in the subform's OnClick event:

Private Sub Form_Click()
DoCmd.SearchForRecord acDataForm, "Countries", acFirst, "Country='" & Me!Country & "'"
End Sub

The textboxes are bound to fields of Countries table.

[ageurtse]

oke this is bound to one textfield, what if i select a different textfield to bound to, how do i program that.

so i somehow need to select 2 things, the textbox to fill and the record from the subform to use in the selected textbox

[June7]

Don't understand. There is no need to select 'textbox to fill'. Just need to move focus on main form to the desired country record. ALL of the textboxes will display data from the fields they are bound to.

[ageurtse]

no you mis understooth my question.

i'm trying to explain it better.

Table1:
ID
CustomerID
OwnerID
InspectionID

Table2: (Adres)
ID
Sirname
Adres
zipcode


Table2 is on the subform

on the mainform i have 3 text fields: customer, owner and inspection. each of them could have a different id-field from table2

[June7]

Why did you show countries and cities image as example, why not your real situation? Whichever, concept still applies.

You want to show the address associated with CustomerID, OwnerID, InspectionID? Build a query that includes Table2 3 times, 1 each link to each of the 3 fields in Table1. Use that as the RecordSource for main form.

DoCmd.SearchForRecord acDataForm, "main form name", acFirst, "CustomerID = " & Me!ID & " OR OwnerID = " & Me!ID & " OR InspectionID = " & Me!ID

That should find the first record that has Table2 ID in any of the 3 fields.

If you want to allow user to specify which field to search then need UNBOUND combobox on the main form with those 3 choices and reference the combobox:

DoCmd.SearchForRecord acDataForm, "main form name", acFirst, Me.Parent.cbxField & " = " & Me!ID

I just really don't understand the usefulness of this arrangement. So you find the first occurrence of the ID on the main form, what will be done with that record?

Instead of search for first occurrence could apply a filter to the main form. Usefulness of that also escapes me.