Office: Listbox füllen

Ola,

kann mir jemand sagen wie ich eine Listbox mit dem ergebnis eines access recordsets fülle?

derzeit benutze ich den umweg über ein array

das array liest feld für feld des Recorsets aus und wird dann mit:

listbox.list() = array übergeben

das array habe ich schon nach der größe des RS neu dimensioniert...

das ist aber alles sehr langsam....

was besseres ist mir aber nicht eingefallen

danke für Antwort

gruß woro

:)

 

Moin, woro,

mit oder ohne Verwendung von Select? Bei dem geschilderten Vorgehen kann ich mir eigentlich nur eine sehr große Quellmenge an Daten oder eine sehr unglückliche Verwendung der Befehle vorstellen - beurteilen kann ich das nicht, weil ich eh starke Defizite in Access und darüberhinaus keinerlei Hinweise auf die Vorgehensweise habe...

 

Ola Jinx

derzeit verwende ich die jet engine, und lasse eine dort gespeicherte qry holen und übergeben. das sieht so aus:
Code:

anschließend noch: listenfeld.list() = arbeitsarray

Meine Datensatzmenge sind derzeit knapp 2000 Einträge

kann ich ein Listenfeld denn auch direkt an ein Sql string knüpfen der meine DB anspricht?

Gruß

woro

 

Hallo woro,

versuch doch mal das Recordset als Liste zu übergeben, wie du das mit deinem Array auch machst. Dann brauchst du das Array nicht mehr füllen.

Vielleicht bringt das das gewünschte Ergebnis.....

 

Das hatte ich schon probiert mit:

listenfeld.list() = rs

das führt aber zum fehler 381, Eigenschaft List konnte nicht gesetzt werden. Index des Eigenschaftenfeldes ungültig.

vielleicht muss ich die dimension des recordsets angeben? aber keine ahnung wie.

gruß woro

 

Hallo woro,

probier mal so
Code:

Du musst natürlich noch die Namen anpassen.
Vielleicht geht das.... (noch nicht probiert)

 

Moin, woro,

ich dachte eigentlich ursprünglich eher an den Befehl AddItem...

 

Hallo jinx,

kurze Zwischenfrage zu AddItem.

Ich hatte mir die OH zu dieser PRoblematik angeschaut und bin auch auf AddItem gestoßen. Allerdings dachte ich, dass man damit keine Spalten vergibt (so wie bei einer Combobox ein Eintrag eine Zeile ohne Spalten)?

Geht das doch mit AddItem?

 

Ola,

folgender Code mit additem geht schon schneller:

Code:

Fällt jemandem noch was ein wie es schneller gehen könnte?

Vielen Dank soweit

gruß

woro

 

Moin, Knee,

dafür steht das urprünglich - in Excel kann ich einen Bereich einer Tabelle per AddItem übergeben, was mir aber bei einem Recordset nicht so sonderlich viel nützt...