Dim root As New CloudWebdavLib.JSON.Node
Dim client As CloudWebdavLib.IClient = New CloudWebdavLib.WClient(CloudWebdavLib.CloudDav.ProvidersNameEnum.pCloud, "user", "pass", root, Nothing)

''OR with proxy
''set proxy and connection options
Dim conn As New CloudWebdavLib.ConnectionSettings With {.CloseConnection = True, .TimeOut = TimeSpan.FromMinutes(30), .Proxy = New CloudWebdavLib.ProxyConfig With {.SetProxy = True, .ProxyIP = "127.0.0.1", .ProxyPort = 8888, .ProxyUsername = "user", .ProxyPassword = "pass"}}
Dim client2 As CloudWebdavLib.IClient = New CloudWebdavLib.WClient(CloudWebdavLib.CloudDav.ProvidersNameEnum.pCloud, "user", "pass", root, conn)

''get storage usage if available
Await client.Quota

''list files/folders in root node
Await client.List(root, 1)

''create TEMP nodes to use it in the examples
Dim fileNode As New CloudWebdavLib.JSON.Node
Dim folderNode As New CloudWebdavLib.JSON.Node

Await client.Copy(fileNode, folderNode)
Await client.Move(fileNode, folderNode, Nothing, False)
Await client.Rename(fileNode, "new_name.rar")
Await client.CreateNewFolder(folderNode, "folder name")
Await client.Delete(fileNode)
Await client.Exists(folderNode.ShortPath)

Dim cts As New Threading.CancellationTokenSource()
Dim _ReportCls As New Progress(Of CloudWebdavLib.ReportStatus)(Sub(ReportClass As CloudWebdavLib.ReportStatus) Console.WriteLine(String.Format("{0} - {1}% - {2}", String.Format("{0}/{1}", (ReportClass.BytesTransferred), (ReportClass.TotalBytes)), CInt(ReportClass.ProgressPercentage), ReportClass.TextStatus)))

Await client.Upload("c:\\VIDO.mp4", CloudWebdavLib.utilities.UploadTypes.FilePath, folderNode, "VIDO.mp4", _ReportCls, cts.Token)
Await client.DownloadFile(fileNode, "c:\\downloads\VIDO.mp4", _ReportCls, cts.Token)
Await client.DownloadFileAsStream(fileNode, _ReportCls, cts.Token)
Await client.DownloadFileAsString(fileNode, _ReportCls, cts.Token)