Hallo zusammen
Ich habe ein riesen Problem ein DBCombo zur Laufzeit an eine Tabelle anzubinden.
Ausgangslage:
Ich arbeite mit einer Connection, die wie folgt aufgemacht wird und auch funktioniert:
Set conn = New Connection
conn.CursorLocation = adUseServer
conn.ConnectionString = gcConnectionString
conn.ConnectionTimeout = 0
conn.Open
Set rsAdr = New Recordset
Set rsAdr.ActiveConnection = conn
rsAdr.CursorType = adOpenKeyset
rsAdr.Open "SELECT \* FROM Adr"
Ich möchte nun zur Laufzeit das Recordset rsAdr an die DBCombo anbinden und zwar möchte ich die AdrID als BoundColumn haben und AdrName als ListField.
Kann mir jemand sagen, wie ich das machen kann?
Folgender Versuch hat leider nicht funktioniert:
Set Me.dbcmbTown.DataSource = rsTowns
Me.dbcmbTown.BoundColumn = rsTowns("TownID")
Me.dbcmbTown.ListField = rsTowns("Town")
Danke für eine schnelle Antwort.
Martin
