Access-Beispiele

Verhindern Sie einen Bericht öffnen, wenn keine Daten zu zeigen,

Mittwoch 20 Mai, 2009

Wir können verhindern, einen Bericht zu öffnen, wenn keine Daten zu zeigen, und dafür verwenden wir zwei Formen abhängig von der Version von Access:

1 - Alle Versionen von Access
Setzen Sie den nachfolgenden Code in den Eigenschaften des Berichts, die Veranstaltung 'Enabling'

Verwenden Sie das Ereignis Enabling (Aktivieren) Bericht:

Private Sub Report_Activate ()

Wenn DomAnzahl ("*", Me.RecordSource) = 0 Then

MsgBox "keine Aufzeichnungen angezeigt" vbDefaultButton1, "Fehler!"

AcReport DoCmd.Close, "Name des Berichts"

End If

End Sub

2 - Ab der Version 7 (Access 95) wurde das Ereignis hinzugefügt ', wenn keine Daten', dann haben wir den folgenden Code können urilizar:

Private Sub Report_NoData (Cancel As Integer)

MsgBox "Keine Daten in dem Bericht.", VbInformation, "Error!"

Cancel = True

End Sub

Um zu sehen, läuft Laden Sie das Beispiel: Verhindern Eröffnung Bericht

Posted in Allgemein | 13 Kommentare »

Wie Sie ein Formular öffnen zu verhindern, wenn keine Datensätze zu zeigen?

Samstag, 2 Mai, 2009

Manchmal ist es notwendig, ein Formular zu öffnen verhindern, wenn es Aufzeichnungen zu zeigen, zum Beispiel, wenn dabei eine Abfrage und eine Registrierung ist nicht erforderlich sind, brauchen wir nicht zu offenen Form sein, da wir keine Daten angezeigt werden müssen. Also, was wir haben, um zu überprüfen ist, ob es Aufzeichnungen zu zeigen, und wenn es keine zeigen eine Meldung an und behindern das Formular geöffnet. Wie?

Es ist leicht, einfach den folgenden Code in den Eigenschaften des Formulars für den Fall 'zu öffnen ":

= 0 Then Wenn Form.RecordsetClone.RecordCount
MsgBox "Keine Datensätze gefunden.", VbExclamation, "Fehler!"
DoCmd.Close acForm, "Daten zu finden"
Exit Sub
End If

Um ein Beispiel zu sehen, herunterladen: Verhindern Formular öffnen

Posted in Beispiele , Formulare , Module | 2 Kommentare »