利用 VB.Net 新增CS 2007.1用戶

 如果想用程式碼加入用戶或是將之前的用戶匯入,以下的程式碼就可以達成

[code language="VB.NET"]

        ' 建立一個 UserQuery
        Dim objQuery As UserQuery = New CommunityServer.UserQuery()
        objQuery.Status = UserAccountStatus.Approved
        objQuery.IncludeHiddenUsers = True

        ' 抓取 users 從 UserQuery , 並不使用快取
        Dim objUserSet As UserSet = CommunityServer.Users.GetUsers(objQuery, False)

        ' 建立一個 StringBuilder 存放資料
        Dim strTemp As New StringBuilder(1000)

        ' 用 For Each 重複 User
        For Each tempuser As User In objUserSet.Users
            ' 將資料寫到 strTemp
            strTemp.Append(String.Format("{0},{1},{2}", tempuser.UserID, tempuser.Username, tempuser.Email) & vbCrLf)
        Next

        TextBox4.Text = strTemp.ToString

        ' 如果需要抓取單一用戶
        Users.GetUser("testuser")

[/code] 

如果想看C# 版本,可以參考 Keyvan Nayyeri 寫的 CS Dev Guide: User manipulation

Published Wed, Dec 05 2007 5:19 AM 作者 dmwc

說說您的看法?

(必填) 
(必填) 
(非必要)
(必填) 
驗證碼