sharepoint 中的用户特定主题

Question

我有一个要求，在我的共享点网站中我想根据用户设置主题。

例如，假设用户 a 将其主题设置为 theme1，而用户 b 登录并将主题设置为 theme2。因此，当用户下次登录时，他必须看到他设置的主题。即主题a。

谁能告诉我最好的方法是什么？

提前致谢。

萨钦

Answer 1

我曾经有过类似的需求。就我而言，他们希望用户能够更改 MOSS 门户的“颜色布局”（因此布局和字体相同，但每个主题的背景颜色和图像颜色不同）。我创建了一个“基本主题”，其中包含作为单个 CSS 文件的完整布局（提供的主题之一）。然后我创建了其他主题，例如“blue.css”、“red.css”、“green.css”等，并将所有这些文件放入 portal/ourthemes/ 中。

我们希望用户能够选择他们的主题，因此我们创建了一个新的用户配置文件属性“CurrentTheme”（Sharepoint 中央管理 -> 共享服务 -> 用户配置文件和属性 -> 添加配置文件属性），其定义为带有预定义选项列表的字符串。

然后我创建了一个简单的 ASP.Net 控件，其呈现为

Protected Overrides Sub Render(ByVal writer As System.Web.UI.HtmlTextWriter)
  Dim oProf As Microsoft.Office.Server.UserProfiles.UserProfile = Microsoft.Office.Server.UserProfiles.ProfileLoader.GetProfileLoader.GetUserProfile()
  Dim UserTheme As String
  Try
    If oProf.Item("CurrentTheme") IsNot Nothing Then
      UserTheme = oProf.Item("CurrentTheme").Value.ToString()
    Else
      UserTheme = "blue"
    End If
  Catch ex As Exception
    'shouldn't fail if we don't know the value
    UserTheme = "blue" 'a default value for users who dont have a theme yet
  End Try

  writer.WriteLine("<link rel='stylesheet' type='text/css' href='/portal/ourthemess" & Trim(UserTheme) & ".css' />")
End Sub

（免责声明：实际代码有点长，因为我们使用每个用户缓存来避免每次用户加载页面时从 UserProfile 读取属性）

然后我将此控件放入为该门户创建的母版页中。

编辑：为了进行缓存，我们创建了一个包含用户名并将生成的文本存储在其中的缓存键。结果是这样的：

Dim KeyName As String = Page.User.Identity.Name & "_CurrentTheme"
If (Not Me.Page.Cache.Item(KeyName) Is Nothing) Then 
   writer.Write(Page.Cache.Item(KeyName).ToString)
Else 
  '...code posted previously goes in here

  'at the end
  Me.Page.Cache.Add(KeyName, _
              AllContentRenderedInPreviousCodeAsString, _
              Nothing, _
              Caching.Cache.NoAbsoluteExpiration, _
              Caching.Cache.NoSlidingExpiration, _
              Caching.CacheItemPriority.Low, Nothing)
End If