Hi x-perts
wie schaffe ich es, auf einem Formular ein Listenfeld (alternativ auch Kombobox) mit Daten aus einer bestimmten Tabelle zu füllen (Tabelle besteht aus
meheren Spalten, die erste Spalte soll nur angezeigt werden, zusätzlich möchte ich natürlich den selektierten Wert weiterverarbeiten (am besten soll der
Wert in einer Variablen gespeichert werden) ???
tanks
mikey
entweder du verwendest die datacombo mit datasource oder eine normale mit for-to oder ähnlichem konstrukt.
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
dim db as database, rs as recordset
'
set db=opendatabase("pfad/dbname.mdb")
set rs=db.createquerydef("","SELECT feldname FROM tabellename;").openrecordset
'
with rs
.movefirst
while not .eof
if not isnull(rs.fields("feldname").value then
combo1.additem rs.fields("feldname").value
'oder
list1.additem rs!feldname
end if
rs.movenext
wend
end with
nicht vergessen unter Project->References die Microsoft Data Objects (DAO) 3.x aktivieren!
holli