Datum veld in formulier

• 

  Marco

  19-01-2005 22:30

  Geachte lezers

  mijn vraag is het volgende: Ik voer in een formulier een datum van planning in. Nu moet in een ander veld deze datum maar dan -1 dag worden. Het allermooiste zou nog zijn dat wanneer die planningdatum -1 op een zondag valt dat deze dan meteen er de datum van vrijdag van maakt. Hoe krijg ik dit voor elkaar, ik ben al een beetje aan het stoeien geweest met standaard waarde maar dit lukt niet. Ik zal waarschijnlijk wel een programma code moeten schrijven denk ik…………

  Wie kan me helpen??

  Marco
• 

  RV

  20-01-2005 00:52

  Twee snelle oplossingen (qua code zijn er mooiere)

  EEN

  Zet in je andere veld dit als standaardwaarde:

  =IIF(Weekday( = 7;x-2;x-1)

  waarbij x = de naam van je tekstveld met plandatum

  Kan zijn dat je puntkomma's moet vervangen door komma's

  TWEE

  Maak een Na Bijwerken gebeurtenis op je tekstveld met je plandatum.

  Code:

  If Weekday(Me.tekstveldmetplandatum) = 7 Then

  Me.tekstveldmetanderedatum = Me.tekstveldmetplandatum - 2

  Else Me.tekstveldmetanderedatum = Me.tekstveldmetplandatum - 1

  End If

  Als je andere datum een gebonden tekstveld is (“je slaat de waarde op in je tabel”),

  moet je deze code ook in de Bij Huidige gebeurtenis van je formulier zetten.

  Ben ervan uit gegaan dat je database zo is ingericht dat de week op een maandag begint.

  RV