Avatar billede nhoff Nybegynder
27. september 2004 - 17:23 Der er 3 kommentarer og
1 løsning

Opdater komboboks rowsource i fortløbende frm

Hejsa

Jeg er ved at lave et arrangementssystem. Hvert arrangement kan have en række workshops, som hver for sig bestyres af en oplægsholder.
Til det formål har jeg lavet en subform (frmWorkshop) til min frmArrangement. Ambitionen er, at når der i subformen er valgt en oplægsholder i comboboks1 skal comboboks2's rowsource opdateres, således at comboboks2 kun indeholder de workshopmuligheder, der er for den valgte oplægsholder.

Problemet er, at når jeg opdaterer rowsourcen for comboboks2 opdateres den for alle posterne i subformen og ikke kun den aktuelle post.

Er der nogen der har et bud på hvordan jeg løser dette problem uden at skulle konvertere subformen til den mindre overskuelige enkeltformular?

Min kode på comboboks1_afterupdate:

Dim strRow As String

strRow = "SELECT tblWorkshop.fldWorkshopID, tblWorkshop.fldWorkshopNavn, " & _
"tblWorkshop.fldWorkshopBeskrivelse, tblWorkshop.fldAktiv, tblWorkshopAnsat.fldAnsatID " & _
"FROM tblWorkshop INNER JOIN tblWorkshopAnsat ON tblWorkshop.fldWorkshopID = tblWorkshopAnsat.fldWorkshopID " & _
"WHERE tblWorkshop.fldAktiv = -1 AND tblWorkshopAnsat.fldAnsatID = " & Me.cboAnsatID

cboWorkshopID.RowSource = strRow

'cboAnsatID = comboboks1
'cboWorkshopID = comboboks2
Avatar billede mugs Novice
27. september 2004 - 17:28 #1
Jeg vil vove det ene øje og hævde, at du ikke kan det i en fortløbende form. det er et tilbagevendende spørgsmål, og jeg mindes ikke at have set nogen løsning. Årsagen er jom, at det er den samme combo der anvendes til alle poster, og et datafelt kan nu engang kun have een postkilde.
Avatar billede nhoff Nybegynder
27. september 2004 - 18:09 #2
For en god ordens skyld, er det jo ikke postkilden, men rækkekilden jeg vil lave om på.
Bortset fra det bekræfter du mine anelser. Hvis der ikke er nogen, der har løst problematikken vha. kodning, er der så nogen der er kommet om det af andre veje?
27. september 2004 - 20:02 #3
Hej Nikolaj,

Mugs har selvfølgelig ret!

Men du kan komme langt ved at lægge din kode på Form_Current tillige.
Derved vil du altid få den rigtige rowsource, når du hopper fra post til post i subformen.

Men problemet ved at skifte rowsource for alle kombobokse, er at alle kombobokse i poster, som ikke benytter samme rowsource, vil blive blanke. Dette er dog kun tilfældet, når den viste kolonne er forskellig fra den bundne kolonne (som i dit tilfælde).

Hvis du på en eller anden måde kan omskrive din subform til at benytte fldWorkshopNavn som bundet kolonne, så burde koden kunne virke. (Jeg går ud fra, at "bundet kolonne" = 1 og "Kolonnebredde" er sat til noget á la dette: 0cm;3cm;....)

Du skal således prøve at ændre det bundne bindeled fra fldWorkshopID til fldWorkshopNavn.

/Thomas
Avatar billede nhoff Nybegynder
13. oktober 2004 - 18:58 #4
Hej

Først og fremmest tak for inputs'ene. Jeg har prøvet med flere andre fremgangsmåder, men der lader ikke rigtig til at være nogen vej uden om.

Til dem der måtte have interesse har jeg dog lavet følgende 'høker-løsning':
1. Bredden af comboboxen sættes så kun pilen er synlig
2. ID-feltet (i mit tilfælde "fldWorkshopID") sættes ind igen.
3. Ved opdatering af comboboxen sættes værdien af det nye felt, men i stedet for at vise ID-feltet vises i stedet en dlookup-værdi.

Jeg medgiver at løsningen ikke er elegant, men brugerne lader til at kunne leve med det.

Hilsen
Nikolaj
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB

Netcompany A/S

IT Consultant

IT-Universitetet i København

CIO

AL Sydbank A/S (tidligere Arbejdernes Landsbank)

Teamleder til AL Sydbanks GDPR & Tech Regulation i Aabenraa