VB устанавливает разрешения на машине разработчика, но не на машине клиента

Question

Я использую следующий код (который я нашел в другом посте), чтобы добавить права на "запись" для учетной записи "пользователя" в папке, и он отлично работает на моей машине разработчика. Однако при развертывании его на клиентской машине ничего не происходит. Я не получаю ошибку любого типа, она просто не меняет права доступа к папке..

Sub SetAllPermissions()
    Dim sFolderPath As String = Environment.GetFolderPath(Environment.SpecialFolder.CommonApplicationData) & "\LTi"
    Dim sUserAccount As String = "Users"

    Dim oFolderInfo As IO.DirectoryInfo = New IO.DirectoryInfo(sFolderPath)
    Dim oFolderAcl As New DirectorySecurity(sFolderPath, System.Security.AccessControl.AccessControlSections.Access)

    oFolderAcl.AddAccessRule(New FileSystemAccessRule(sUserAccount,
                                                      FileSystemRights.Write,
                                                      InheritanceFlags.ContainerInherit Or InheritanceFlags.ObjectInherit, PropagationFlags.InheritOnly,
                                                      AccessControlType.Allow))

    oFolderInfo.SetAccessControl(oFolderAcl)

    oFolderAcl = Nothing
    oFolderInfo = Nothing

    MsgBox("Done")
End Sub