Cracked it! For anyone interested...
It isn't a Header that needs to be interrogated but the actual Response
Text. This contains all manner of information in XML format, one of the
nodes is the Link node, the HREF value is the EditURL that needs to be
recorded somewhere safe. When you need to delete the event,
Call
DeleteCalendarEvent("http://www.google.com/calendar/event?eid=ZmdhNGJpaG03ZW5nZmk0Z3Q1czdkMmUxZmsgYTFiNG5kOXE1dHV1dGZyZmc1bWR1aXVtMmNAZw")
Function DeleteCalendarEvent(cURL)
Dim xmlhttp
Set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.Open "POST", cURL, False
xmlhttp.SetRequestHeader "Content-type", "application/atom+xml"
xmlhttp.SetRequestHeader "X-HTTP-Method-Override", "DELETE"
xmlhttp.SetRequestHeader "Authorization", "GoogleLogin auth=" & GetAuth
xmlhttp.Send ""
Response.Write "Status=" & xmlhttp.Status
Set xmlhttp = Nothing
End Function
--
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://code.google.com/apis/calendar/community/forum.html