21. juni 2004 - 11:30Der er
12 kommentarer og 1 løsning
Undgå at åbne en form hvis der ikke er data
Jeg har en form der stater automatisk når man åbner databasen. Den indeholder de ting sælgerne skal følge op på, men når der ikke er noget de skal følge op på kommer den op blank....og så brokker de sig over at de skal lukke den selv...... :o)
Hvordan undgår jeg at den åbner, hvis der alligevel ikke er data i den?
eller på formens VedÅbning (On Open) lægge denne kodé:
Private Sub Form_Open(Cancel As Integer) If Me.RecordsetClone.RecordCount = 0 Then MsgBox "Ingen data!", vbExclamation DoCmd.CancelEvent End If End Sub
If th eform contains data for a specific sælger then it must be filtered in some way. The ID is just an example, but ""ID = " & Me.ID" is the same as a WHERE clause in SQL but with "WHERE"
So
if your SQL for the form is "SELECT * from sælgerne WHERE salesRep = 123"
Helt uden point ;o), hvis det nu er en subform, som ikke skal åbnes/vises:
Private Sub Form_Current() With Me![SubformName].Form .Visible = (.RecordsetClone.RecordCount > 0) End With End Sub
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.