Compile Error: Can't find out what's wrong with the code.

[vickan240sx]

Hi,

I am new to Access. I entered the following code, but I'm getting a compile error over the ".Access_Bar_Code"

Private Sub Access_Bar_Code_BeforeUpdate(Cancel As Integer)

    Dim SID As String
    Dim stLinkCriteria As String
    Dim rsc As DAO.Recordset

    Set rsc = Me.RecordsetClone

    SID = Me.Access_Bar_Code.Value
    stLinkCriteria = "[Access Bar Code]=" & "'" & SID & "'"

    'Check Legal Files table for duplicate Access Bar Code
    If DCount("Access_Bar_Code", "Legal Files", _
              stLinkCriteria) > 0 Then
        'Undo duplicate entry
        Me.Undo
        'Message box warning of duplication
        MsgBox "WARNING: " _
             & SID & " has already been entered." _
             & vbCr & vbCr & "You will now been taken to that record.", _
               vbInformation, "Duplicate Information"
        'Go to record of original Access Bar Code
        rsc.FindFirst stLinkCriteria
        Me.Bookmark = rsc.Bookmark
    End If

    Set rsc = Nothing
End Sub

If somebody can help me, that will be great.



Thank you very much.

[pbaldy]

Given the different ways you have it there, my guess would be that the actual control has spaces rather than underscores. Spaces in object names are not worth the bother in the long run.

[June7]

Yes, when spaces or special characters or punctuation (underscore is exception) are used in names or are a reserved word, must enclose with [].

[vickan240sx]

Yes, when spaces or special characters or punctuation (underscore is exception) are used in names or are a reserved word, must enclose with [].

Oh, ok. I'll keep in mind to never use spaces for column headers. Thanks for your help.

I'll try the brackets.

[June7]

With some exceptions in VBA coding, the same goes for names of tables, queries, forms, reports, controls.