form opent niet

Status
Niet open voor verdere reacties.
J

JEPEDEWE

Terugkerende gebruiker
Lid geworden
14 jun 2006
Berichten
1.682
Hallo,
Ik heb volgende code:

Code: 
If knop = "fiche" Then
    Set g = Forms![Hoofdmenu]
    g!var = invoer
    If IsNull(g!var) = False Then
        DoCmd.Echo False
        DoCmd.OpenForm ("weergave patiënt")
        Set f = Forms![weergave patiënt]
        f.RecordSource = "SELECT FICHE.* FROM FICHE WHERE FICHE.NAAM= '" & Replace(g!var, "'", "''") & "' ;"
        f!Menubalk.SourceObject = "menubalk8"
        f.Refresh
        f!Menubalk.SetFocus
    End If
    DoCmd.Echo True
End If

dit werkt in 90% van de gevallen maar, om welke reden wordt zo nu en dan de form "weergave patiënt" niet geopend ook al is de waarde van g!var NIET leeg
Iemand die een reden kan vinden?
JP
 
Zonder voorbeeld DB waarin dit optreedt is dat een beetje moeilijk en ik vind het trouwens een niet alledaagse (ingewikkelde) manier om een formulier te openen. Doe je dat bv na drukken op een knop dat je een deel van de naam moet intikken? Gebruik je niet gewoon een keuzelijst daarvoor? Dan ben je zeker dat de naam die je selecteert ook echt bestaat. Zou het kunnen dat het formulier zich niet opent omdat je een naam hebt ingetikt die niet bestaat in je tabel?
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan