Colin,
To add to the confusion a little, I downloaded the database I referenced with DanT. Initially, as I mentioned to him, it was failing on error 13 (type mismatch). Since I know it used to work, and since I was now aware that MSoft had "fixed" a recent update related to the problems you noted above,I altered my Dim statements from DAO.Field2 to Object
Code:
Dim fld As Object ' DAO.Field2 'the name of the attachment field
Dim OrdID As Object 'DAO.Field2 'the field from the table to use a last folder/node name
and now the code is working as it used to. Seems there may be some underlying adjustment to Field2
(property/definition/usage???) and probably more.