Архив форумов ЦИТФорума

[Youri]

Вкраце, у меня есть data.mdb, используется user-level security с secured.mdw. Все отлично работает.

Хочу сделать программно апдейт следующей строкой на vba с другого незасекреченного файла, только что созданного, - update.mdb, который содержит одну форму, необходимую заменить в data.mdb:

DoCmd.TransferDatabase acExport, "Microsoft Access", path, acForm, "NewForm", "OlfForm"

При попытке произвести данную операцию, разумеется, выскакивает сообщение, что я не обладаю административными правами. Пробовал в вба заполучить их, ни в какую. Например, следующий код не помогает:

DBEngine.SystemDB = "с:\Secured.mdw"
Set wks = DBEngine.CreateWorkspace("", "admin", "password")
Set db = wks.OpenDatabase("c:\data.mdb")

Что делать? В ручную проделывать апдейт долго и запарочно, особенно не для посвященных.