Hi All
I have used this code for a few years an suddenly today an error popped up on my screen type mismatch error 13 in the code below
any help would be appreciated
Thanks
Public Function InitQRCode()
Dim rsParent As DAO.Recordset2
Dim rsChild As DAO.Recordset2
Dim fld As...