Tabel afhankelijk van een ander tabel

[sebb007]

Voorbeeld:

Tabel Brand: HP, DELL, IBM,..
Tabel Sort_Equipment: desktop, portable, printer,...
Tabel Type_Equipment: Latitude C610, Latitude C510, Printer E322,..
Tabel Equipment: Brand, Sort_Equipment, Type_Equipment

Nu mijn vraag is de volgende:

Bij het kiezen van HP bij "Brand" en printer bij "Sort_Equipment" wil ik als resultaat in "Type_Equipment" enkel en alleen de printers van HP te zien krijgen en niet de volledige lijst van "Type_Equipment".

Hoe krijg ik zoiets voor mekaar?

 

[ReneDirks]

Daarvoor moet je VB Code gaan gebruiken.

Laten we even zeggen dat we drie comboboxen hebben
cmbBrand, cmbSortEquipment, cmbTypeEquipment

In het _AfterUpdate event van cmbBrand plaats je de volgende code:

Private sub cmbBrand_AfterUpdate()
  UpdateTypes()
End sub

Private sub cmbSortEquipment_AfterUpdate()
  UpdateTypes()
End sub

Private Sub UpdateTypes()
  if me.cmbBrand.ListIndex <> -1 and me.cmbSortEquipment.ListIndex <> -1 then
      me.cmbTypeEquipment.RowSource = "SELECT Type_Equipment FROM Equipment WHERE Brand='" & me.cmbBrand & "' AND Sort_Equipment='" & cmbSortEquipment & "'"
     me.cmbTypeEquipment.Requery
  end if

 

[sebb007]

Al bedankt voor jouw reactie..

Wat bedoel je met "In het _AfterUpdate event van cmbBrand plaats je de volgende code:"? Hoe kom ik daaraan?

 

[ReneDirks]

Ik ga er even vanuit dat je dit op een form wilt zetten? Als je dan bij de eigenschappen kijkt van een combobox kun je events (gebeurtenissen) uitkiezen. Eén van de gebeurtenissen is het 'na bijwerken' event. Daar plaats je de code.

 

[sebb007]

Dit kan bvb niet als men enkel rapporten gebruikt?

 

[ReneDirks]

Dit kan bvb niet als men enkel rapporten gebruikt?

Ik zie niet hoe, want hoe wil je in een rapport "HP" als "Brand" kiezen?

 

[sebb007]

Ok..
ik zal morgen verder werken en zien wat ik ermee kan aanvangen

Thx..

 

[sebb007]

Formulier opgemaakt met AfterUpdate maar nog steeds geen verandering.

Zo ziet mijn database er ongeveer uit:
Tabel1: cmdBrand with no lookup
BrandID (autonumber)
Brand (text)
Tabel2: cmdSortEquipment with no lookup
IDSoort (autonumber)
Sort Equipment (text)
Brand (text)
Tabel3: cmdTypeEquipment with no lookup
IDEQType (autonumber)
Equipment (text)
Brand (text)
Tabel4: Equipment with lookup
IDEquipment (autonumber)
cmdBrand (number) - combobox (row source empty)
cmbSortEquipment (number) - combobox (row source empty)
cmbTypeEquipment (number) - combobox (row source empty)
Zijn de relaties ook van belang? (relationship)

 

[ReneDirks]

Ik heb een voorbeeldje gepost. Ik heb de structuur wat anders opgezet, dat voelde een beetje natuurlijker aan dan de extra tabel die jij had. Kijk er maar eens naar..

Succes!

 

[sebb007]

T'is inorde..
Na lang zoeken heb ik het uiteindelijk gevonden ..ni gemakkelijk

Thx
Greetz