title image


Smiley Willst du das wirklich!?
Ich hoffe, es geht nicht um die Rechnungsnummer - da wäre es nämlich fatal, sie bei jedem Ausdruck hochzuzählen...



Ansonsten halt im Bericht:



Private Sub Report_Close()

Dim RS As DAO.Recordset

Set RS = Currentdb.Openrecordset("DeineParametertabelle",dbOpendynaset)

if RS.EOF then

RS.Addnew

RS!DeinZaehler = 1

else

RS.Edit

RS!DeinZaehler = RS!DeinZaehler +1

end if

RS.Update

RS.Close

End Sub



Am besten kapselt man so etwas in einen Satz allgemein verwendbarer Routinen. Schau dir dazu mal die DBWiki-Beispiele zum Thema "Parameter" an.


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: