title image


Smiley Wobei man normalerweise...
die Sortierung gleich in der SQL angibt:



Dim DB As DAO.Database, RSE As DAO.Recordset

Set DB = CurrentDb

Set RSE = DB.OpenRecordset("SELECT * FROM MTX ORDER BY release", dbOpenDynaset)

'RSE.MoveFirst redundant!

Do Until RSE.EOF ' <= True redundant!

Debug.Print RSE![release], RSE![Part_Number], RSE![Tool Type]

RSE.MoveNext

Loop



Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: