sharepoint 2010 如何给讨论板(Discussion)话题添加回复（Reply）信息(Message)

记录一下给动态给讨论版话题添加一个回复信息

SPSecurity.RunWithElevatedPrivileges(delegate()

            {

                SPWeb web = SPContext.Current.Web;

                SPList list = web.Lists["工作组讨论"];

                web.AllowUnsafeUpdates = true;

                SPListItem item = list.GetItemById(1);//根据话题的id，获取到话题的Item

                SPListItem r = Microsoft.SharePoint.Utilities.SPUtility.CreateNewDiscussionReply(item);//创建新的讨论板回复Item

                r[SPBuiltInFieldId.Body] = "new reply";//Body是回复信息

                r.SystemUpdate();

            });

创建一个话题的方法

SPList list = web.Lists["Team Discussion"];

SPListItem t = Microsoft.SharePoint.Utilities.SPUtility.CreateNewDiscussion(list, "NewDiscussion");

t[SPBuiltInFieldId.Body] = "NewDiscussion";

t.Update();