Op het moment van het laden van een formulier wil ik controleren of er wel waarden in een tabel zitten. Als dat namelijk niet het geval is mag het formulier dicht en eventueel een MsgBox popup.
Thanks
Visual Basic:
Voor mijn gevoel gaat het fout in CurrentDb.Execute, maar aangezien ik niet zo thuis ben ik VB weet ik de juiste syntax niet. Weet iemand die wel? Op dit moment werk hij niet, er zit een syntax error in de bovenstaande code.1
2
3
4
5
| Private Sub Form_Load() Dim Query As String Query = CurrentDb.Execute("SELECT * FROM TableName") If (Query = Null) Then DoCmd.Close End Sub |
Thanks
Goochem