Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 581
  • Last Modified:

ms access cannot find the record "|"referred to in your expression

Hi I do not why am i getting this message " Ms access cnnot find the field " | " referred to in your expression , when i click the save button to save the record. And this happens only when i am about to save the first record, but this does not show up when i add 2 nd record or 3 rd record . it happens only with 1st record.
0
vihaan
Asked:
vihaan
1 Solution
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Can you show the code associated with the Save operation ?

mx
0
 
vihaanAuthor Commented:
Private Sub button_save_rec_Click()
On Error GoTo Err_button_save_rec_Click


    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
 
   
Exit_button_save_rec_Click:
    Exit Sub

Err_button_save_rec_Click:
    MsgBox Err.Description
    Resume Exit_button_save_rec_Click
   
End Sub
0
 
RickCommented:
It sounds like your csv file wasn't imported correctly to its destination table in Access.
0
Transaction-level recovery for Oracle database

Veeam Explore for Oracle delivers low RTOs and RPOs with agentless transaction log backup and transaction-level recovery of Oracle databases. You can restore the database to a precise point in time, even to a specific transaction.

 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Lets try this first.  Since the DoMenuItem commands were depricated more that 10 years ago by Microsoft ... use this to Save a record:

Private Sub button_save_rec_Click()
    Me.Dirty = False ' Save the record
End Sub

Also, do you have *any* code in the Form Before Update event ?

mx
0
 
Jim Dettman (Microsoft MVP/ EE MVE)PresidentCommented:

FWIW I've been using the DoMenuItem since A2 days as well and I've seen this pop-up from time to time as a spurious error.    The vertical pipe ( | ) is a place holder for Access to place a field name.

 Never could figure out a rhyme or reason for it popping up.  I just modified my framework code (part of which is below) to ignore it.

 No Points here please.

JimD.


On Error Resume Next
      DoCmd.DoMenuItem A_FORMBAR, A_FILE, A_SAVERECORD

      ' Check for error but skip 2001 and ones caused by Access bugs.
      If Err > 0 And Err <> 2001 And Err <> 2110 And Err <> 2501 And InStr(Error$(Err), "|") = 0 Then
        gstrMBTitle = "Error while saving record."
        gstrMBMsg = "An error occured while trying to save the record."
        gstrMBMsg = gstrMBMsg & Chr$(13) & Chr$(10)
        gstrMBMsg = gstrMBMsg & Chr$(13) & Chr$(10) & "The error was: "
        gstrMBMsg = gstrMBMsg & Chr$(13) & Chr$(10) & "    " & Err & "  " & Error$(Err)
        gstrMBMsg = gstrMBMsg & Chr$(13) & Chr$(10)
        gstrMBMsg = gstrMBMsg & Chr$(13) & Chr$(10) & "Please check all fields and try again."
        gintMBDef = vbOKOnly + vbCritical
        gintMBBeep = True
        gintMBLog = False
        Call DisplayMsgBox
        StdFormCt = False
      Else
        StdFormCt = True
      End If
      On Error GoTo StdFormCt_UnexpectedError

Open in new window

0
 
vihaanAuthor Commented:
Private Sub Form_BeforeUpdate(Cancel As Integer)

    'Captures most recent date
    Me.frm_qna_contacts_update_date = Date
   
    'Captures shortname of windows operating system
    Me.frm_qna_contacts_update_user = VBA.Environ("USERNAME")
   
   

End Sub
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Question:

Is
frm_qna_contacts_update_date
the Name of a Field in table, a Control or a Form?

Same for

Me.frm_qna_contacts_update_user

You error is most likely occurring on one of these two lines in the BU event.

mx
0
 
Helen FeddemaCommented:
The modern syntax for saving a record is

DoCmd.RunCommand acCmdSaveRecord

In my experience, getting that error message referring to a field called "|" often indicates table corruption.  If you open the table and see Chinese characters in some fields, that confirms the diagnosis <g>.
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
vihaan:
Check for any possible typos in those two names.
Because you do have code in the BU event, when you attempt to Save, errors will occur in the BU event if "something isn't right"

mx
0
 
vihaanAuthor Commented:
Hi, the field names are form field names in BU event .
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Did you check for typos?

Put a breakpoint on the beginning of the BU event ... then single step through (using F8) until the error occurs and see exactly which line it occurs on.

Another syntax you can try:

Private Sub Form_BeforeUpdate(Cancel As Integer)

    'Captures most recent date
    Me("frm_qna_contacts_update_date") = Date
   
    'Captures shortname of windows operating system
    Me("frm_qna_contacts_update_user") = VBA.Environ("USERNAME")

End Sub
0
 
vihaanAuthor Commented:
good
0

Featured Post

Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now