For Each Next - Schleife

16/02/2009 - 09:19 von M.H | Report spam
Hallo,

ich habe eine Abfrage mit Datensàtzen, die im Wesentlichen aus zwei Spalten
besteht: NAME und PARAMETER

Jetzt möchte ich in einer For Each Next Schleife alle Zeilen einer Funktion
übergeben, wofür ich das Feld NAME benötige.

Pseudocode:
For Each Element In Abfrage
xNAME = Element.NAME
Funktion ( xNAME)
NEXT

Also besser wüsste ich es nicht und ich finde erstaunlicher Weise nicht in
Google...was ich dann zum funktionieren bekomme.

Danke!
 

Lesen sie die antworten

#1 Stefan Hoffmann
16/02/2009 - 09:43 | Warnen spam
hallo,

M.H schrieb:
ich habe eine Abfrage mit Datensàtzen, die im Wesentlichen aus zwei Spalten
besteht: NAME und PARAMETER
Jetzt möchte ich in einer For Each Next Schleife alle Zeilen einer Funktion
übergeben, wofür ich das Feld NAME benötige.


For Each gibt es nur für bestimmte Collectionsarten. Hier handelt es
sich um folgenden Klassiker:

Dim rs As DAO.Recordset

Set rs = CurrentDb.OpenRecordset("yourTableOrQuery", dbOpenSnapshot)
If Not rs.Bof And Not rs.Eof Then
Do While Not rs.Eof
yourFunction rs![yourFieldname]
Loop
End If
rs.Close
Set rs = Nothing


mfG

Access-FAQ http://www.donkarl.com/
KnowHow.mdb http://www.freeaccess.de
Newbie-Info http://www.doerbandt.de/Access/Newbie.htm

Ähnliche fragen