La demo è di Alex ,che stavo riadattando, e che mi aveva messo a disposizione in un precedente post
https://www.iprogrammatori.it/forum-programmazione/access/utenti-con-permessi-aggiungi-elimina-modifica-differenziati-t51654.html
a cui ho sostituito nel modulo basglobal
getConnectionString = CurrentProject.Path & "\" & DB_SERVER
con
getConnectionString = "MS Access;PWD=123;DATABASE=" & CurrentProject.Path & "\" & DB_SERVER
e proteggendo il BE con la passw 123
ringrazio tutti