[anestaki]

Καλημέρα Τόλη και σε όλους
Το ζητούμενο μου έχει αλλάξει και πρέπει να καταγράψω την διαδρομή για να χρησιμοποιήσω Application.FollowHyperlink “C:\Users\Γεώργιος\Desktop\expense_admin _trialv33\expense_admin_trialv3.51.accdb”
Με τ ο κομμάτι του παρακάτω προσπαθώ ανεπιτυχώς ,για τη μου εμφανίζει error 2147217900…… αυτό στην εικόνα.

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