How to use Mid function in SQL statement, anyone can help?

I have the following codes in VBA. Can anyone tell me where goes wrong? I guess it's probably in the Mid function in the SQL statement.

With CurrentDb.OpenRecordset("SELECT tbl_A.* FROM tbl_A INNER JOIN tbl_B ON " _
& " ( Mid(tlb_A.aFieldThatContainsCaseID, 58, 5) = str(tbl_B.caseID) ) WHERE tbl_A.fld_1 IS NOT NULL")
  While Not .EOF
  existVal = Mid(.Fields("aFieldThatContainsCaseID"), 58, 5) & " " & existVal
  .MoveNext
  Wend
.Close
End With
 
Open in New Window
angie_angieAsked:
Who is Participating?
 
angie_angieConnect With a Mentor Author Commented:
Sorry. I found the error.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.