sql mit "where" funktioniert nicht in function
Greiff
Gesendet: 23.06.14 23:07
Betreff: sql mit "where" funktioniert nicht in function


Veteran

Beiträge: 229
10010025
Ort: Badendorf
Function Aufruf mit "Kurzinfo(nr)" in Abfrage in access 2010
Die Funktion soll aus einer 60 Spalten breiten Tabelle mit ziemlich vielen Leerfeldern die Texte zusammenfassen in einen Textblock (also praktisch eine Zeile der Tabelle auswerten).
Set rst = CurrentDb.OpenRecordset("Aufnahmegruende", dbOpenDynaset)
sql = "SELECT [Aufnahmegruende].* FROM [Aufnahmegruende] WHERE [Fallnummer]=" & nr
Kurzinfo = nr & " "
For j = 1 To 60
Kurzinfo = Kurzinfo & rst(j) & " "
Next j
Das zusammenfügen funktioniert auch, aber ob mit oder ohne "where", access vba nimmt bei jedem Aufruf immer nur den ersten Datensatz der Tabelle, egal welche nr ich eingebe

Danke für Ideen
Rudolf
Top of the page Bottom of the page