PowerBuilder

Example: Http.GetCacheRoot method

Demonstrates the GetCacheRoot method. PowerBuilder

integer li_rc
oleobject loo_Http

loo_Http = create oleobject
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
    destroy loo_Http
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Establish 2 cache root directories.
loo_Http.AddCacheRoot("c:/example/httpCacheA/")
loo_Http.AddCacheRoot("c:/example/httpCacheB/")

Write-Debug "Number of cache roots: " + string(loo_Http.NumCacheRoots)

Write-Debug "1st cache root: " + loo_Http.GetCacheRoot(0)
Write-Debug "2nd cache root: " + loo_Http.GetCacheRoot(1)

// Output:

// Number of cache roots: 2
// 1st cache root: c:/example/httpCacheA/
// 2nd cache root: c:/example/httpCacheB/


destroy loo_Http