Hallo mede Access gebruikers , ik heb een vraagje waar ik niet meer uitkom.
Ik probeer een klant nummer over te kopieren naar een ander formulier om in het volgende scherm aanvullende informatie te verwerken
Dit is de code die ik gebruik
Private Sub ga_naar_behandeling_kaart_Click()
On Error GoTo Err_ga_naar_behandeling_kaart_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "fm klant_behandeling"
stLinkCriteria = "[fm klantenkaart.klant_nummer]=" & Me![klant_nummer]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_ga_naar_behandeling_kaart_Click:
Exit Sub
Err_ga_naar_behandeling_kaart_Click:
MsgBox Err.Description
Resume Exit_ga_naar_behandeling_kaart_Click
End Sub
Ik krijg een error welke aangeeft dat de haakjes rond [fm klantenkaart.klant_nummer] niet geldig zijn. Ik heb van alles geprobeerd maar krijg het niet werkend.
Wat doe ik verkeerd.
Ben nu in de 2016 versie aan het werk
Ik hoop dat iemand mij op het juiste spoor kan zetten
Alvast bedank
Jan
Ik probeer een klant nummer over te kopieren naar een ander formulier om in het volgende scherm aanvullende informatie te verwerken
Dit is de code die ik gebruik
Private Sub ga_naar_behandeling_kaart_Click()
On Error GoTo Err_ga_naar_behandeling_kaart_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "fm klant_behandeling"
stLinkCriteria = "[fm klantenkaart.klant_nummer]=" & Me![klant_nummer]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_ga_naar_behandeling_kaart_Click:
Exit Sub
Err_ga_naar_behandeling_kaart_Click:
MsgBox Err.Description
Resume Exit_ga_naar_behandeling_kaart_Click
End Sub
Ik krijg een error welke aangeeft dat de haakjes rond [fm klantenkaart.klant_nummer] niet geldig zijn. Ik heb van alles geprobeerd maar krijg het niet werkend.
Wat doe ik verkeerd.
Ben nu in de 2016 versie aan het werk
Ik hoop dat iemand mij op het juiste spoor kan zetten
Alvast bedank
Jan