Topic "How to incorporate FileTransferProgress in VBA"

Author Message
scooper77
[View user's profile]

Joined: 2016-03-05
Posts: 1
I am using the .net library via Excel VBA to connect and download/upload to my remote server using the Webdav protocol. Everything works. I just need to have the download/upload progress status in the status bar in excel. Looked through some codes in VB and powershell regarding filetransferprogress event/class but cant seem to link the FileTransferprogress into VBA. Can anyone help me on this.

my download code is similar to this and it works great but without any download progress info:

Private Sub download(ByRef mySession As Session)
' Setup session options
Dim mySessionOptions As New SessionOptions
With mySessionOptions
.Protocol = Protocol_Webdav
.HostName = "abcd.com"
.PortNumber = 443
.UserName = "username"
.Password = "password"
.WebdavSecure = True
.TlsClientCertificatePath = "path_to_key"
End With

' Connect
mySession.Open mySessionOptions
NameFile = "name_of_file"
RemotePath = "name_of_file"
Dim transferResult As TransferOperationResult
Set transferResult = mySession.GetFiles(RemotePath, NameFile, False)

' Throw on any error
transferResult.check

' Display results
Dim transfer As TransferEventArgs
For Each transfer In transferResult.Transfers
MsgBox "Downloaded"
Next
End Sub
martin
[View user's profile]
Site Admin
Joined: 2002-12-10
Posts: 24991
Location: Prague, Czechia
See https://winscp.net/eng/docs/library_vb#event_handlers
_________________
Martin Prikryl
Advertisements

You can post new topics in this forum






Search Site

What is WinSCP?

It is award-winning SFTP client, SCP client, FTPS client and FTP client integrated into one software program for file transfer to FTP server or secure SFTP server. [More]

And it's free!

Donate

About donations

$9   $19   $49   $99

About donations

Recommend

WinSCP Privacy Policy

WinSCP License