Using wid As System.Security.Principal.WindowsIdentity = System.Security.Principal.WindowsIdentity.GetCurrent()
  Using ImpersonationCtx As System.Security.Principal.WindowsImpersonationContext = wid.Impersonate()
    Dim oRet As AppPaths = GetMyPathsCommonCore(udt, bCreateCommonAppDataPath)
    ImpersonationCtx.Undo()
    Return oRet
  End Using
End Using

C:Users{User}AppDataLocal