从集合中删除具有指定 GUID 的警报。
命名空间: Microsoft.SharePoint
程序集: Microsoft.SharePoint(位于 Microsoft.SharePoint.dll 中)
语法
声明
Public Sub Delete ( _
idAlert As Guid _
)
用法
Dim instance As SPAlertCollection
Dim idAlert As Guid
instance.Delete(idAlert)
public void Delete(
Guid idAlert
)
参数
idAlert
类型:System.Guid要删除的报警。
异常
| 异常 | 条件 |
|---|---|
| SPException | 警报不存在或已被删除。 |
备注
此方法从数据库中删除指定的警告。
示例
下面的代码示例循环访问当前网站集中的所有网站,并将删除指定用户的警报。
Private Sub Button1_Click(sender As Object, e As System.EventArgs)
Dim siteCollection As SPSite = SPControl.GetContextSite(Context)
Dim sites As SPWebCollection = siteCollection.AllWebs
Dim site As SPWeb
For Each site In sites
DeleteAlerts(site)
Next web
End Sub 'Button1_Click
Public Sub DeleteAlerts(site As SPWeb)
Dim users As SPUserCollection = site.Users
Dim user As SPUser
For Each user In users
If user.LoginName = TextBox1.Text Then
Dim alerts As SPAlertCollection = user.Alerts
Dim i As Integer
For i = alerts.Count - 1 To 0 Step -1
Dim guid As System.Guid = alerts(i).ID
alerts.Delete(guid)
Next i
End If
Next user
Dim subsite As SPWeb
For Each subsite In web.Webs
DeleteAlerts(subsite)
Next subsite
End Sub 'DeleteAlerts
private void Button1_Click(object sender, System.EventArgs e)
{
SPSite oSiteCollection = SPContext.Current.Site;
SPWebCollection collWebsites = oSiteCollection.AllWebs;
foreach (SPWeb oWebsite in collWebsites)
{
DeleteAlerts(oWebsite);
oWebsite.Dispose();
}
}
public void DeleteAlerts(SPWeb oWebsite)
{
SPUserCollection collUsers = oWebsite.Users;
foreach (SPUser oUser in collUsers)
{
if (oUser.LoginName == TextBox1.Text)
{
SPAlertCollection collAlerts = oUser.Alerts;
for (int i = collAlerts.Count - 1; i > -1; i--)
{
System.Guid guid = collAlerts[i].ID;
collAlerts.Delete(guid);
}
}
}
备注
某些对象实现IDisposable接口,并必须避免后不再需要保留这些对象在内存中。好的编码做法有关的信息,请参阅Disposing Objects。