[Access/VBA] gegevens uit query andere DB in combobox

[Verwijderd]

( ff offtopic: ik ben echt al 2 hele dagen bezig geweest met op internet zoeken en
uitproberen, zonder resultaat. Ook bij GOT heb ik flink zitten zoeken, maar ik heb geen vergelijkbare probleem gevonden, als jullie die wel kunnen vinden hoor ik het graag... alvast bedankt)

Ik heb een combobox in access 2000 die uit een andere database gegevens uit een query moet halen.
Het gaat om een namenlijst. Ze gebruiken hier een centrale adressenlijst.

In Word 2000 is het me WEL geluk om een koppeling te maken, maar met acces lukt het niet goed.

code:

' Link naar DATABASE
' ==================

Dim dbs As DAO.Database
Dim rst As DAO.Recordset

'locatie database
Set dbs = OpenDatabase("K:\Ruhi\Ziekmeldingen.mdb")

'records wat je IN combobox te zien krijgt = NAAM van QRYTOTAAL
Set rst = dbs.OpenRecordset("Select Naam FROM qryTotaal;")
Do While Not rst.EOF
comboDolfijn.AddItem rst("Naam")
rst.MoveNext
Loop
---------------------------------------------------

Het gaat hier dus om combobox "comboDolfijn"
die de waardes uit veld "Naam" van query "qryTotaal"
van DB Ziekmeldingen.mdb moet halen.

PROBLEEM:

ik heb gemerkt en later ook gelezen dat de functie ".additem" NIET werkt met
acces 2000.


Toen heb ik het ZO geprobeerd:

' Link naar DATABASE
' ==================

Dim dbs As DAO.Database
Dim rst As DAO.Recordset

'locatie database
Set dbs = OpenDatabase("K:\Ruhi\Ziekmeldingen.mdb")

'records wat je IN combobox te zien krijgt = NAAM van QRYTOTAAL
Set rst = dbs.OpenRecordset("Select Naam FROM qryTotaal;")
Do While Not rst.EOF
Me.comboDolfijn.RowSourceType = "Value List"
Me.comboDolfijn = rst("Naam")
rst.MoveNext
Loop

------------------------------------------

Dit werkt zonder foutmeldingen, MAAR... ik krijg maar 1 waarde ( 1 naam dus) te zien
in comboDolfijn, terwijl er in query zeker 50 namen zijn.

Ik heb dit nog kunnen vinden:

http://office.webforums.n...?t=5589&highlight=additem

maar ik heb het niet om kunnen vormen naar mijn situatie.

Ik hoop dat jullie mij verder kunnen helpen...


( sorry voor verkeerde topic, zie k nu pas, is me eerste topic )

[ Voor 7% gewijzigd door Verwijderd op 20-07-2004 13:14 ]

[Verwijderd]

Totaal verkeerd topic, hoort in P&W thuis, en met behulp van de help van Access 2000 kon je dit probleem heel simpel oplossen.
De combobox van Access kan nl. rechtstreeks aan een recordset, tabel of text gekoppeld worden. Je moet je waardes scheiden door een ;.

[nescafe]

Verwijderd schreef op 20 juli 2004 @ 12:31:
Totaal verkeerd topicforum, hoort in P&W thuis, en met behulp van de help van Access 2000 kon je dit probleem heel simpel oplossen.
De combobox van Access kan nl. rechtstreeks aan een recordset, tabel of text gekoppeld worden. Je moet je waardes scheiden door een ;.

Dit is correct, maar ik wil nog wel één toevoeging maken:

Verwijderd schreef op 20 juli 2004 @ 12:08:
Ik heb een combobox in access 2000 die uit een andere database gegevens uit een query moet halen.
Het gaat om een namenlijst. Ze gebruiken hier een centrale adressenlijst.

Je zult deze table moeten linken in/aan je huidige database.

[Verwijderd]

Sorry idd... is verkeerde topic...

Is me eerste topic... zal volgende keer beter kijken.

Dat koppelen heb ik geprobeerd... maar dat is geen optie omdat ik de gegevens uit een query haal die de gegevens weer van gekoppelde tabellen haalt van bedrijfsDATABASE, namelijk dolfijn... en daar mag ik absoluut NIET mee kloten. vandaar dat ik het uit die query moet halen.

edit: bedankt intoxicated...

[ Voor 5% gewijzigd door Verwijderd op 20-07-2004 13:19 ]

[intoxicated]

I&T -> P&W

[Verwijderd]

Verwijderd schreef op 20 juli 2004 @ 12:31:
....en met behulp van de help van Access 2000 kon je dit probleem heel simpel oplossen.
De combobox van Access kan nl. rechtstreeks aan een recordset, tabel of text gekoppeld worden. Je moet je waardes scheiden door een ;.

Ik was al zover....

Het gaat hier om naam gegevens uit een bestaande ( altijd up to date centrale ) database. En daar is er speciaal voor deze DB een query voor gemaakt. En uit die query moet ik mijn gegevens halen.

[Lustucru]

Volgens mij mag dit nóg een schopje hebben richting SA.
Vier mogelijkheden:
a: koppel de bronquery aan je db als gekoppelde tabel
b: repliceer de query/tabel
c: maak een accesquery met een in component (alleen jet-sql)

code:

select * from tabel In [brondatabase]

d: Vul de combobox met het handje, of met een eigenfunctie, of helemaal met code door de listwaarde op te bouwen met ':'


A is de makkelijkste manier

Dat .additem nietwerkt heeft niet zoveel met de accessversie te maken maar met het soort combobox watje gebruikt. je kunt dus ook een andere comboboxcontrol nemen (bv uit forms, of de ms bibliotheek) en dan werkt additem wel. Het werkt alleen niet met de standaardcombobox.

[ Voor 35% gewijzigd door Lustucru op 20-07-2004 14:08 ]

[Verwijderd]

Dat .additem nietwerkt heeft niet zoveel met de accessversie te maken maar met het soort combobox watje gebruikt. je kunt dus ook een andere comboboxcontrol nemen (bv uit forms, of de ms bibliotheek) en dan werkt additem wel. Het werkt alleen niet met de standaardcombobox.

jaaa... dat was m Niesje... heel erg bedankt

Ik had al zo'n vermoeden, maar had verkeerd gekeken, ik had bij de code naar de verwijzingen gekeken voor de forms 2.0 library.

Ik heb een forms 2.0 activeX combobox ingevoegd en daar werkte ADDitem dus wel. Scheelt me een hoop gekloot.

ps: Query koppelen werkte idd ok, MAAR... dan krijg ik die gekoppelde tabellen ook in mijn tabel en dat is niet ten bate als je direct toegang hebt tot alle personeelsgegevens straks.