Ok, ich sags Euch ;-)
Also so sieht das aus (siehe Anhang)
Im Postopen-Event der Datenbank erzeuge ich, wenn noch nicht vorhanden, eine neue View mittels
Set neueview = db.CreateView(Cstr(Year(Now)),"SELECT (...
und die entsprechende Outline dazu mit
Set outlineentry = outline.Createentry(Cstr(Year(Now)....
Genauso wollte ich das haben.
Tschau bis zum näxten mal ;-)
Gruß
Bernd