PDA

Vollständige Version anzeigen : [Bericht] Überprüfen ob Daten vorhanden


Beat Gurtner
04.10.2002, 09:17
Ich habe ein bericht der auf einer Abfrage basiert.

Mann muss eine Nummer eingeben und danach kommt nur dieser Datensatz.

Wenn ich aber eine Nummer eingebe die nicht vorhanden ist, öffnet sich der bericht und zeigt nicht an.

Ist ja eigentlich nicht so schlimm, aber ich habe noch mehr zeugs (visible usw) eingebaut und nun kommt eine Fehlermeldung, es sei kein Wert vorhanden.

Also wie kann ich überprüfen ob ein Wert vorhanden ist?

Danke

Lordyeti
04.10.2002, 09:24
Hallo


Private Sub Report_NoData(Cancel As Integer)
Dim strMldg As String, strEingabe As String


strMsg = "Keine Daten vorhanden"
strTitle = "Kundenklassen-Umsätze"
intStyle = vbOKOnly
intStyle = vbInformation
MsgBox strMsg, intStyle, strTitle
Cancel = True
End Sub


-> Wird der Bericht ohne Daten geöffnet, erscheint eine Fehlermeldung.

Gruss