Dansk Access Forum
  Hjælp Hjælp  Søg i forum   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketFormular med advisering om ændrede poster
 Besvar Besvar
Forfatter
  Emne Søg Emne Søg  Emne funktioner Emne funktioner
tosv Se dropdown
Forum Begynder
Forum Begynder
Avatar

Medlem: 16-11-2017
Land: DK
Status: Offline
Point: 1 		Direkte link til dette indlæg Emne: Formular med advisering om ændrede poster
    Sendt: 16-11-2017 kl. 11:31
Jeg har en MS ACCESS 2013 formular, som viser antallet af ændrede poster i tabellen "forplejning".
Med DCOUNT optælles records, hvor feltet "Noteropdateret" er hakket af og antallet vises sammen med en besked i en ubundet celle.
 
I mit IF statement tester jeg på om antallet af opdateringer er større end 0. Jeg vil gerne tilføje en betingelse (AND) der tester på om feltet sted er = 1 eller 2.
 
Jeg mangler hjælp til at syntaxen.
 
 
 
Private Sub Form_Load()
Dim NoterOpdateret As Integer

NoterOpdateret = DCount("ID", "Forplejning", "[NoterOpdateret] = True")
If NoterOpdateret > 0 Then
Me.lblOpdateret = "Du har " & NoterOpdateret & " Arrangementsændring(er). Husk at udskrive nye køkkenlister."
Me.lblOpdateret.ForeColor = vbRed
ElseIf NoterOpdateret = 0 Then
Me.lblOpdateret = "Ingen ændringer!"
Me.lblOpdateret.ForeColor = vbBlack
End If

End Sub
 
Til top



Til top
hkh Se dropdown
Sølv bruger
Sølv bruger


Medlem: 15-08-2012
Status: Offline
Point: 320 		Direkte link til dette indlæg Sendt: 16-11-2017 kl. 14:18
Du bør nok ændre hændelse til aktuel post frem for form load, ellers vil du kun få optalt dine ændringer når formularen åbnes.

Hvor vil du teste på sted?
Hvad ønsker du der skal ske hvis sted er 1/2?

If NoterOpdateret > 0 and (sted=1 or sted=2)Then

Hvis det kun er en betingelse, kan ovenstående måske gøre jobbet
Hans
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2013 - 2024 Dansk Access Forum - en del af Excel-regneark.dk