非常に奇妙なエラーが発生しています。これを修正するために過去数時間作業を行いました
"GET 要求での更新は現在許可されていません。GET での更新を許可するには、SPWeb で 'AllowUnsafeUpdates' プロパティを設定してください。"
Public Shared Sub DeleteListItem(ByVal listname As SPList, ByVal intItemID As Integer)
Using MySite As New SPSite(SPContext.GetContext(System.Web.HttpContext.Current).Web.Url)
Using MyWeb As SPWeb = MySite.OpenWeb()
MyWeb.AllowUnsafeUpdates = True
Dim itemColforGivenList As SPListItemCollection
Dim query As New SPQuery()
query.Query = "<Where><Eq><FieldRef Name='ID'/><Value Type='Counter'>" &
intItemID & "</Value></Eq></Where>"
MyWeb.AllowUnsafeUpdates = True
itemColforGivenList = listname.GetItems(query)
If itemColforGivenList.Count > 0 Then
For i As Integer = listname.Items.Count - 1 To 0 Step -1
If listname.Items(i).ID = intItemID Then
MyWeb.AllowUnsafeUpdates = True
listname.Items.Delete(i)
listname.Update()
MyWeb.AllowUnsafeUpdates = False
End If
Next
End If
End Using
End Using
私を助けてください