Article Rating

  • 0 Rating(s)
  • 0
  • 0
  • 0
  • 0
  • 0

Working with WebDAV properties

webdav.UserName := 'user';   
webdav.Password := 'password';   
ns := webdav.NameSpaces.Add();   
ns.Prefix := 'Z';   
ns.NameSpace := 'mycustomnamespace';   
 
webdav.SetProperties('http://localhost/WebDAV/1.txt', ['Z:tester', 'Z:developer'], ['John Doe', 'Vasya Pupkin']);   
webdav.GetProperties('http://localhost/WebDAV/1.txt', ['Z:tester']);   
Assert(webdav.ResourceProperties.Count = 1);   
Assert(webdav.ResourceProperties[0].Value = 'John Doe');   
Assert(webdav.ResourceNameSpaces.ItemByNameSpace('mycustomnamespace') <> nil);   
webdav.RemoveProperties('http://localhost/WebDAV/1.txt', ['Z:tester']);   
webdav.GetAllProperties('http://localhost/WebDAV/');   
Assert(webdav.ResourceProperties.Count > 0);   
webdav.Reset(); 

Article ID: 45, Created On: 1/23/2010, Modified: 1/23/2010