G
Guest
I want to modify the details (like subject, description, st. date, end date
etc.) of a particular appointment from SQL Server 2005 on the basis of ID. As
now I am writing this code but this would update first appointment in Outlook
2007.
Code:
Dim sQuery As String
oXMLHttp.open("PROPPATCH", stURI, False, Me.UserNameAlias,
Me.Password)
sQuery = "<?xml version='1.0'?>" & _
"<aropertyupdate xmlns:a='DAV:'
xmlns:m='urn:schemas:mailheader:' xmlns:cal=""urn:schemas:calendar:"" " & _
"xmlns:dt='urn:uuid:c2f41010-65b3-11d1-a29f-00aa00c14882/' " & _
"xmlns:mail='urn:schemas:httpmail:'> " & _
"<a:set>" & _
"<arop>" & _
"<mail:subject>Appointment with PM regarding
dismissal of Atul </mail:subject>" & _
"</arop>" & _
"</a:set>" & _
"</aropertyupdate>"
oXMLHttp.setRequestHeader("Content-Type", "text/xml")
oXMLHttp.setRequestHeader("Brief", "t")
' Send the query.
oXMLHttp.send(sQuery)
thanks in advance.
Atul Saxena
etc.) of a particular appointment from SQL Server 2005 on the basis of ID. As
now I am writing this code but this would update first appointment in Outlook
2007.
Code:
Dim sQuery As String
oXMLHttp.open("PROPPATCH", stURI, False, Me.UserNameAlias,
Me.Password)
sQuery = "<?xml version='1.0'?>" & _
"<aropertyupdate xmlns:a='DAV:'
xmlns:m='urn:schemas:mailheader:' xmlns:cal=""urn:schemas:calendar:"" " & _
"xmlns:dt='urn:uuid:c2f41010-65b3-11d1-a29f-00aa00c14882/' " & _
"xmlns:mail='urn:schemas:httpmail:'> " & _
"<a:set>" & _
"<arop>" & _
"<mail:subject>Appointment with PM regarding
dismissal of Atul </mail:subject>" & _
"</arop>" & _
"</a:set>" & _
"</aropertyupdate>"
oXMLHttp.setRequestHeader("Content-Type", "text/xml")
oXMLHttp.setRequestHeader("Brief", "t")
' Send the query.
oXMLHttp.send(sQuery)
thanks in advance.
Atul Saxena