[anestaki]

Τόλη σε ευχαριστώ για την άμεση απάντηση αλλά συνεχίζει να μου εμφανίζει το error στο UPDATE ενώ όταν το καλέσω Application.FollowHyperlink "file://" & DLookup("path", "tbl_epanergopiisi") λειτουργεί κανονικά.

Dim  path As String
 DoCmd.Echo True, "Done"
    If UnProcessed.count < 1 Then
         MsgBox "Η σύνδεση με νέο αρχείο ήταν επιτυχής"
       path = "file://" & Trim([Forms]![frmNewDatafile]![txtFilename])
       cn.Execute ("UPDATE tbl_epanergopiisi set path=('" & path & "')")
         DoCmd.OpenForm "frm_main"
        Application.FollowHyperlink "file://" & DLookup("path", "tbl_epanergopiisi")
    Else