Helpmij.nl
Helpmij.nl
Helpmij.nl
Steun Helpmij.nl! Klik hier     Computerprobleem? Klik hier!

Quote

Weergeven resultaten 1 tot 4 van 4

Onderwerp: requery een combobox op een subform op een mainform

  1. #1
    Vraag is opgelost

    requery een combobox op een subform op een mainform

    ik heb een subform OrderSubF op een mainform BestellingQF

    in de subform heb ik 3 comboboxen
    CmbCat
    CmbSubCat
    CmbProductID

    mijn code is als volgt:
    Option Compare Database

    Private Sub CmbCat_AfterUpdate()
    Me!OrderSubF.Form!CmdSubCat.Requery
    Me!OrderSubF.Form!CmbProductID.Requery
    End Sub

    Private Sub CmbSubCat_AfterUpdate()
    Me!OrderSubF.Form!CmbProductID.Requery
    End Sub


    Als ik de subform run kan ik de comboboxen invullen afhankelijk van de vorige combobox

    In het hoofdformulier krijg ik de melding:
    Enter Parameter Value
    Form!OrderSubF!CmbCat

    als ik CmbSubCat wil aanvullen

    Wat is verkeerd in mijn code?
    Laatst aangepast door dbAnnelies : 13 oktober 2017 om 09:42

  2. #2
    Tera Honourable Senior Member
    Verenigingslid
    OctaFish's avatar
    Geregistreerd
    6 februari 2009
    Locatie
    Rotterdam
    Afstand tot server
    ±151 km
    De foutmelding is heel logisch en verklaarbaar. Je verwijst op je subform hard naar het formulier en de daarop staande objecten. Dat werkt prima als je het (sub)formulier zelfstandig opent, maar zodra het formulier op een ander formulier staat, en dus niet meer zelfstandig is maar een subformulier, dan is het pad niet meer compleet. Je moet dan ook de naam van het hoofdformulier opnemen in het pad. Je krijgt dan de andere situatie: dat het subformulier niet meer als zelfstandig formulier werkt. Maar dat zal minder erg zijn neem ik aan.
    Gebruik de QUOTE knop alleen als je iets wit citeren.
    Op deze pagina kun je zien hoe je met TAGS werkt.

  3. #3
    Dank je wel!

    Dit werkt:
    Option Compare Database

    Private Sub CmbCat_AfterUpdate()
    [Forms]![BestellingQF]![OrderSubF]![CmbSubCat].Requery
    [Forms]![BestellingQF]![OrderSubF]![CmbProductID].Requery
    End Sub

    Private Sub CmbSubCat_AfterUpdate()
    [Forms]![BestellingQF]![OrderSubF]![CmbProductID].Requery
    End Sub


    Daarnaast heb ik de Row Source van cmbSubCat aangepast naar
    SELECT ProductT.SubCat FROM ProductT WHERE (((ProductT.Cat)=[Forms]![BestellingQF]![OrderSubF]![CmbCat])) GROUP BY ProductT.SubCat;

    en de Row Source van cmbProductID aangepast naar
    SELECT ProductT.ProductId, ProductT.Omschrijving FROM ProductT WHERE (((ProductT.SubCat)=[Forms]![BestellingQF]![OrderSubF]![CmbSubCat])) GROUP BY ProductT.ProductId, ProductT.Omschrijving;

  4. #4
    Tera Honourable Senior Member
    Verenigingslid
    OctaFish's avatar
    Geregistreerd
    6 februari 2009
    Locatie
    Rotterdam
    Afstand tot server
    ±151 km
    Het kan allemaal nog wel wat simpeler trouwens, maar dat ga je nog wel ontedekken denk ik . Net zoals de knop waarmee je code in TAGS kunt zetten .
    Gebruik de QUOTE knop alleen als je iets wit citeren.
    Op deze pagina kun je zien hoe je met TAGS werkt.

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren
Aanbiedingen