Grüß Sie,
ich stehe vor folgendem Problem:
Beim FormLoad Ereigniss sollen sechs Comboboxen mit Inhalten aus einer DB gefüllt werden. Mein Lösung war folgende:
Set cnn = DataEnv.PWD\_DB
Set cmd = New ADODB.Command
cnn.Open
Set cmd.ActiveConnection = cnn
cmd.CommandText = "BSHDaten"
cmd.CommandType = adCmdTable
Set rs = cmd.Execute()
Do While Not rs.EOF
cboname.AddItem rs!Name
cboaccname.AddItem rs!useraccount
cbopwd.AddItem rs!pwd
cboann1.AddItem rs!Annmerkung1
cboann2.AddItem rs!Annmerkung2
cboann3.AddItem rs!Annmerkung3
rs.MoveNext
Loop
rs.Close
doch es geht nicht!
Bitte um Hilfe
mfg Michael Schieferer