formulier openen maar alleen wanneer id van huidig formulier gelijk is gegevens tonen

[j.snijder]

Als ik goed begrijp is het dit:

Keuzemenu = Metallic

Keuzemenu (KoiSubvariëteit) mag alleen zoals Yamabuki Ogon (type metalic Koi soorten)

Als dat zo is dan moet je in tabel een kolom bijvoegen en daar bijvoorbeeld: metalic Koi en ander naam ofwel 1 voor metalic Koi en 2 voor andere.

Dan moet ik voor u programmeren zodat zodat keuzemenu1 metalic Koi en keuzemenu2 metalic Koi true of false zetten.

Je zal ook met 2 qeury moeten werken en 2 keuzemenu

Ik denk mijn fout (denkfout gevonden te hebben. In mijn oude prutsel heb ik de eerste kolom (Id) gebruikt als koppelwaarde maar u raadt mij aan daar een extra kolom voor te nemen en die te gebruiken om te koppelen. ?

[j.snijder]

Ach ik maak het u wel erg moeilijk door mijn uitlegpogingen, wat u op het voorbeeld laat zien is dus waar mijn denkfout zat inderdaad, een extra kolom om te bepalen tot welke "voorsoort" de "subsoort" behoort.

Zal ik de kolommen aanmaken in de tabellen en u volgen op uw weg naar de oplossing of wilt u de oplossing aanmaken in mijn werkstuk003 bestand ?

Zegt u maar wat uw voorkeuze heeft.

[stegisoft]

Het is moeilijk uit te leggen maar ik ga proberen:

Je voeg een kolom bij.

Je maakt een query op basis van de kolom en dus enkel 1

Je maakt een twee kolom en dan voor 2

Dan keuzemenu dubbel maken en op elkaar zetten.

Door middel van programma code kan je keuzemenu 1 onzichtbaar maken en keuzemenu 2 zichtbaar maken.

Zodra je dan non-metalic klik dan verandert de zichtbaar naar onderzichtbaar en onzichtbaar naar zichtbaar.

Zoals dit voorbeeld:

Dim Finanfactnr_Gotfocus As Integer

'als de klant ons betaald

If Forms!frmFinance!frmFinancieelDetails!groep = "1" Then

Forms!frmFinance!frmFinancieelDetails!FrmKlantschulden.Visible = True

Forms!frmFinance!frmFinancieelDetails!FrmOudKlantenschuld.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmOudLeveranciersschuld.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmLeveranciersschuld.Visible = False

End If

'als de leveranciers wordt betaald

If Forms!frmFinance!frmFinancieelDetails!groep = "2" Then

Forms!frmFinance!frmFinancieelDetails!FrmKlantschulden.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmOudKlantenschuld.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmOudLeveranciersschuld.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmLeveranciersschuld.Visible = True

End If

'als het om oude leveranciersschulden gaat

If Forms!frmFinance!frmFinancieelDetails!groep = "4" Then

Forms!frmFinance!frmFinancieelDetails!FrmKlantschulden.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmOudKlantenschuld.Visible = False

Forms!frmFinance!frmFinancieelDetails!FrmOudLeveranciersschuld.Visible = True

Forms!frmFinance!frmFinancieelDetails!FrmLeveranciersschuld.Visible = False

End If

[j.snijder]

Ah u benaderd het wel op een heel erg vreemde manier voor mij, keuzevak zichtbaar of onzichtbaar maken.

[j.snijder]

Ik ga intussen uw raad opvolgen en een kolom toevoegen (kolom 4) aan de tabellen waarop we later kunnen bepalen wat wat is en meld me weer met een geupdate versie van de dB.

Lijkt u dat een goed idee ?

[stegisoft]

Het is geen vreemde manier maar juist een eenvoudige manier.

Je kan een kolom bijvoegen en dat uploaden en dan zal ik morgen het aanpassen.

[j.snijder]

Ik heb iets gevonden op het web waarmee het zou moeten kunnen denk ik, zou u daar eerst naar willen kijken ?

Voorbeelden

Ik heb een heel kleine dB bijgevoegd en de veld en tabel fabrikant toegevoegd en de relatie aangemaakt, alleen is er geloof ik code nodig om het te laten werken, als u dat zou willen doen dan kan ik kijken of ik dat kan doorgronden en snap hoe dat met meerdere afhankelijkheden werkt, ik ben er wel erg nieuwsgierig naar.

GekoppeldeKeuzelijsten.mdb downloaden

Tot morgen ?

[stegisoft]

Zoals ik reeds zei doe ik geen SQL

Dus ben ik ook niet van plan om de code te wijzigen.

Van mij mag je het doen.

[j.snijder]

Oh sorry, dan begreep ik u verkeerd, ik dacht dat je bedoelde dat u dat niet eerder had gedaan maar goed ik wil u niet op uw tenen trappen dus wacht uw voorstel morgen wel af.

welterusten

[stegisoft]

Ik ken wel niks van Koi hoor.

Wat moet ik van metalic koppelen bij varieteit

Ik moet een kolom toevoegen maar kan het niet onderscheiden op basis van de tekst om te kunnen sorteren.

Is dat vlekken en zonder vlekken Koi?

Net zoals bij subvarieteit ook moet sorteren in nieuwe kolom.