ik ben bezig met een database voor contactpersonen en adressen. ik heb een zoek form gemaakt maar deze geeft iedere keer een fout melding
ik heb bij de querry het volgende staan:
als [forms]![searchform].[qbedrijf1]" & "*"
als [forms]![searchform].[qplaats1]" & "*"
als [forms]![searchform].[qpostcode1]" & "*"
(ik heb een nederlandse versie van access)
verder staat er bij dit bij het zoek form.
Option Compare Database
Private Sub Knop10_Click()
Me.qbedrijf1.Value = ""
Me.qpostcode1.Value = ""
Me.qplaats1.Value = ""
End Sub
Private Sub Knop11_Click()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
Private Sub qbedrijf1_AfterUpdate()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
Private Sub qplaats1_AfterUpdate()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
Private Sub qpostcode1_AfterUpdate()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
miss ziet iemand wat ik fout doe?
ik heb bij de querry het volgende staan:
als [forms]![searchform].[qbedrijf1]" & "*"
als [forms]![searchform].[qplaats1]" & "*"
als [forms]![searchform].[qpostcode1]" & "*"
(ik heb een nederlandse versie van access)
verder staat er bij dit bij het zoek form.
Option Compare Database
Private Sub Knop10_Click()
Me.qbedrijf1.Value = ""
Me.qpostcode1.Value = ""
Me.qplaats1.Value = ""
End Sub
Private Sub Knop11_Click()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
Private Sub qbedrijf1_AfterUpdate()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
Private Sub qplaats1_AfterUpdate()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
Private Sub qpostcode1_AfterUpdate()
DoCmd.OpenForm "adressenlijst", acViewNormal
End Sub
miss ziet iemand wat ik fout doe?