15. maj 2003 - 09:58Der er
7 kommentarer og 1 løsning
Angiv felt i SQL til Combobox på Form??
Jeg har følgende til at finde indholdet til en Combobox :
SELECT DISTINCTROW TBL_Udstyrsgrupper.Navn, TBL_Udstyrsgrupper.ID FROM TBL_Udstyrsgrupper WHERE (([TBL_Udstyrsgrupper].BEA)=Yes) ORDER BY TBL_Udstyrsgrupper.Navn;
Jeg har en Combobox mere længere oppe på min Form (afdeling_felt)
Det jeg gerne vil have er at den øverste combo bestemmer hvilket felt i min tabel min næste combo kikker i.. Altså skal den skifte BEA ud med det som bliver valgt i combo 1...
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
strSQL = "SELECT DISTINCTROW TBL_Udstyrsgrupper.Navn, TBL_Udstyrsgrupper.ID FROM TBL_Udstyrsgrupper WHERE (([TBL_Udstyrsgrupper]." & Me.cboYourCombo1 & " )=Yes) ORDER BY TBL_Udstyrsgrupper.Navn;"
Me.cboYourCombo2.RowSource = strSQL
Sæætes ind på cboYourCombo1 AfterUpdate eller OnChange ( test )
Dette burde kunne gøre det. ( måske er der syntaxfejl )
Nu ser den sådan her ud : strSQL = "SELECT DISTINCTROW TBL_Udstyrsgrupper.Navn, TBL_Udstyrsgrupper.ID FROM TBL_Udstyrsgrupper WHERE (([TBL_Udstyrsgrupper]." & Me.Combo55 & " )=Yes) ORDER BY TBL_Udstyrsgrupper.Navn;"
Me.Combo20.RowSource = "strSQL"
Den melder fejl og highligther første gang der står : strSQL
Private Sub Combo55_Change() Dim strSQL As String strSQL = "SELECT DISTINCTROW TBL_Udstyrsgrupper.Navn, TBL_Udstyrsgrupper.ID FROM TBL_Udstyrsgrupper WHERE (([TBL_Udstyrsgrupper]." & Me.Combo55 & " )=Yes) ORDER BY TBL_Udstyrsgrupper.Navn;"
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.
