So I am making a SQL query in which value of combobox (cboVU) shoud be same as field in table called Vrsta uredaja in table O klima uredaju. I am making this query in Access 2016.
I am getting this:
strRowsource2 = "SELECT " & _ " Vlasnik.ID_VU, " & _ " Vlasnik.[Naziv tvrtke], " & _ " Vlasnik.[Ime korisnika], " & _ " Vlasnik.[Prezime korisnika], " & _ " Vlasnik.[Adresa korisnika], " & _ " Vlasnik.Telefon, " & _ " Vlasnik.Mail, " & _ " [O klima uredaju].[Vrsta uredaja], " & _ " Narudzba.Datum " & _ "FROM Vlasnik " & _ "INNER JOIN ([O klima uredaju] " & _ "INNER JOIN Narudzba " & _ " ON [O klima uredaju].ID_KU = Narudzba.ID_KU) " & _ " ON Vlasnik.ID_VU = Narudzba.ID_VU WHERE ([O klima uredaju].[Vrsta uredaja] = " & cboVU & ")) " List1.RowSource = strRowsource2
Advertisement
Answer
To continue on @Nathan_Sav’s comment:
Private Sub cboVU_Change() strRowsource2 = "SELECT " & _ " Vlasnik.ID_VU, " & _ " Vlasnik.[Naziv tvrtke], " & _ " Vlasnik.[Ime korisnika], " & _ " Vlasnik.[Prezime korisnika], " & _ " Vlasnik.[Adresa korisnika], " & _ " Vlasnik.Telefon, " & _ " Vlasnik.Mail, " & _ " [O klima uredaju].[Vrsta uredaja], " & _ " Narudzba.Datum " & _ "FROM Vlasnik " & _ "INNER JOIN ([O klima uredaju] " & _ "INNER JOIN Narudzba " & _ " ON [O klima uredaju].ID_KU = Narudzba.ID_KU) " & _ " ON Vlasnik.ID_VU = Narudzba.ID_VU " & _ "WHERE [O klima uredaju].[Vrsta uredaja] = " & "'" & cboVU.Value & "'" & " " Debug.Print strRowsource2 Debug.Print List1.RowSource List1.RowSource = strRowsource2 End Sub