Access To Data Denied

[Darker]

dt = Datenumber(Year(Today)+100, Month(Today), Day(Today))
reg.RegistrationServer = "workflow/KSU"
reg.CreateMailDb = False
pathCert=Inputbox("Укажите путь ID файла сертификатора","Enter")
reg.CertifierIDFile = pathCert
reg.Expiration = dt

reg.IDType = ID_HIERARCHICAL
reg.MinPasswordLength = 5 ' password strength
reg.OrgUnit = ""
reg.RegistrationLog = "log.nsf"
reg.UpdateAddressBook = True
reg.StoreIDInAddressBook = True
Call reg.RegisterNewUser(FIO(0), _
filePath, _
"", _
FIO(1), _
otch, _
"gfhjkmcthnbabrfnjhf", _
"t", _
"", _
shortName+".nsf", _
"", _
password, _
NOTES_LIMITED_CLIENT, _
words)
кусочек моего кода,
При выполнении ругается "Access to data denied". Что делать подскажите кто-нить

 

[Akupaka]

нашел одну ссылку, но врядли поможет...

Ссылка скрыта от гостей

а ты этим пользователем можешь юзера создать обычным способом?..

 

[Darker]

А все разобрался, я в пути ID файла указал только папку назначения, забыв дать имя