ich habe Access 2003 und möchte folgendes erreichen:
Ich habe in einem Formular im Kopf die aktuelle Zeit und das Datum stehen.
Nun möchte ich in einem Eingabefeld erreichen, dass wenn die Zeit vor 14 Uhr ist automatisch Frühschicht angezeigt wird und wenn die Zeit zwischen 14 uhr und 05 Uhr liegt automatisch spätschicht angezeigt wird.
Ich habe in einem Formular im Kopf die aktuelle Zeit und das
Datum stehen.
Nun möchte ich in einem Eingabefeld erreichen, dass wenn die
Zeit vor 14 Uhr ist automatisch Frühschicht angezeigt wird und
wenn die Zeit zwischen 14 uhr und 05 Uhr liegt automatisch
spätschicht angezeigt wird.
Kann mir da einer helfen?
vermutlich…
Wenn man annimmt, daß die akt.Zeit mittels des Zeitgeber-Ereignisses eingestellt wird, dann kann in dieser Prozedur auch das Textfeld entspr. gestzt werden:
Private Sub Form_Timer()
Me.Caption = Now()
Select Case Time()
Case #2:00:00 PM# To #11:59:59 PM#
Me!txtSchicht = „Spätschicht“
Case #00:00:00 AM# To #4:59:59 AM#
Me!txtSchicht = „Spätschicht“
Case #05:00:00 AM# To #1:59:59 PM#
Me!txtSchicht = „Spätschicht“
End Select
Danke für die schnelle Antwort.
Wie oder wo muss ichd as dann eingeben?
habe ich doch gesagt…:
„Wenn man annimmt, daß die akt.Zeit mittels des Zeitgeber-Ereignisses
eingestellt wird, dann kann in dieser Prozedur auch das Textfeld
entspr. gesetzt werden“
die Ereignisprozedur muß richtig(!) angelegt werden.
Im Eigenschaftenfenster des Forms unter Ereignisse auf die rechten 3 Pünktchen beim Ereignis „Bei Zeitgeber“ klicken. Im folgenden Fenster"Code" auswählen, dadurch öffnet sich der VBA-Editor. Dort in das Prozedurgerüst den Code einkopieren (natürlich ohne das Gerüst…).
Ich weiß aber immer noch nicht, ob diese Prozedur (dieses Ereignis) auch achon für die Anzeige der akt. Uhrzeit benutzt wird.
Die Eigenschaft „Zeitintervall“ muß zusätzlich auf z. B. 1000 (1 Sekunde) eigestellt werden.
sorry aber ich bekomm das net gebacken.
Im Formular finde ich schon Ereignis in den Eigenschaften aber da steht nirgendwo ein Zeitgeber.
Kann ich dir die DB evtl. mal schicken dann siehst du was ich meine?
Sind ja keine privaten Daten drinen.
ich habe dir die Datei nochmals geschickt weil ich aufgrund dieser Änderung keine Befehlsschaltflächen mehr benutzen kann. Schau´s dir doch bitte nochmal kurz an.
Danke.