Hi, when i'm trying to delete an events this is the error that i get:
The remote server returned an error: (403) Forbidden.
on row
service.Delete(dateEntry)
This is the code:
Dim service As CalendarService = New CalendarService
("FilmscoopCalendar")
service.setUserCredentials(userName, passWord)
Dim myQuery As EventQuery = New EventQuery(calendarURI)
myQuery.StartTime = eventDate
myQuery.EndTime = eventDate.AddDays(1)
Dim myResultsFeed As EventFeed = service.Query(myQuery)
If (myResultsFeed.Entries.Count > 0) Then
dim i as integer = 0
for i=0 to myResultsFeed.Entries.Count-1
Dim dateEntry As AtomEntry = myResultsFeed.Entries(i)
Response.Write("Eliminazione " & dateEntry.Title.Text & "<br>")
service.Delete(dateEntry)
next
End If
The calendarURI is
http://www.google.com/calendar/feeds/[email protected]/private/full
(principal calendar) and the share setting are right (share this
calendar)
This code was working until the last week... suggest?
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"Google Calendar Data API" group.
To post to this group, send email to
[email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/google-calendar-help-dataapi?hl=en
-~----------~----~----~----~------~----~------~--~---
