Differences

This shows you the differences between the selected revisions of the page.

library_vb 2014-08-04 library_vb 2022-10-21 (current)
Line 1: Line 1:
====== Using WinSCP .NET Assembly from Visual Basic for Applications (VBA) ====== ====== Using WinSCP .NET Assembly from Visual Basic for Applications (VBA) ======
-===== Installing and Registering for COM =====+===== [[installing]] Installing and Registering for COM =====
First, you need to [[library_install|install the WinSCP .NET assembly and register it for COM]]. First, you need to [[library_install|install the WinSCP .NET assembly and register it for COM]].
-===== Using from VBA ===== +Check if your installation of Microsoft Office is 32-bit or 64-bit and [[library_install#registering|register]] the assembly accordingly.
-You use WinSCP .NET assembly from VBA as any other COM library.+
-In Microsoft Visual Basic editor, go to //Tools > References//, check reference to //WinSCP console interface .NET wrapper// and confirm with //OK//.+===== [[using]] Using from VBA ===== 
 +You use WinSCP .NET assembly from VBA (Microsoft Office, including Excel, Word and Access) as any other COM library. 
 + 
 +In Microsoft Visual Basic editor, go to //Tools > References//, check reference to //WinSCP scripting interface .NET wrapper// and confirm with //OK//.
There are some less known techniques that you may need to use, which are described in following sections. There are some less known techniques that you may need to use, which are described in following sections.
Line 14: Line 16:
Members of enumerations are represented as constants with name like ''<type>_<member>'', e.g. ''Protocol.Sftp'' becomes ''Protocol_Sftp''. Members of enumerations are represented as constants with name like ''<type>_<member>'', e.g. ''Protocol.Sftp'' becomes ''Protocol_Sftp''.
-==== Event Handlers ====+==== [[event_handlers]] Event Handlers ====
The ''[[library_session|Session]]'' class exposes several [[library_session#events|events]]. The ''[[library_session|Session]]'' class exposes several [[library_session#events|events]].
Line 20: Line 22:
  * Implement your interactions with WinSCP .NET assembly in a class module;   * Implement your interactions with WinSCP .NET assembly in a class module;
  * Declare private variable in your class module referring to ''[[library_session|Session]]'' class;   * Declare private variable in your class module referring to ''[[library_session|Session]]'' class;
-  * Use ''[[msdn&gt;gg251653|WithEvents]]'' keyword, when declaring the private variable;+  * Use [[https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/private-statement|''WithEvents'' keyword, when declaring the private variable]];
  * Define private function (method) with name ''<variablename>_<event>'' and two arguments (e.g. ''sender'' and ''e'') for every event you need to handle.   * Define private function (method) with name ''<variablename>_<event>'' and two arguments (e.g. ''sender'' and ''e'') for every event you need to handle.
Line 44: Line 46:
VBA does not support catching exceptions, what is a common way of handling errors in examples for most other languages. VBA does not support catching exceptions, what is a common way of handling errors in examples for most other languages.
-In case you need to use custom error handling, instead of interrupting a VB macro (the default behavior), use ''[[msdn&gt;gg251688|On Error]]'' statement.+In case you need to use custom error handling, instead of interrupting a VB macro (the default behavior), use ''[[https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/on-error-statement|On Error]]'' statement.
-Use ''On Error Resume Next'' to disable default error handling. Then you need to query ''[[msdn&gt;gg251525|Err.Number]]'' after every statement to test for errors. You can revert to default error handling (aborting the macro) using ''On Error GoTo 0''.+Use ''On Error Resume Next'' to disable default error handling. Then you need to query ''[[https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/err-object|Err.Number]]'' after every statement to test for errors. You can revert to default error handling (aborting the macro) using ''On Error GoTo 0''.
<code vb> <code vb>
Line 159: Line 161:
        .UserName = "user"         .UserName = "user"
        .Password = "mypassword"         .Password = "mypassword"
-        .SshHostKeyFingerprint = "ssh-rsa 2048 xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx"+        .SshHostKeyFingerprint = "ssh-rsa 2048 xxxxxxxxxxx..."
    End With     End With
       
Line 170: Line 172:
       
    Dim transferResult As TransferOperationResult     Dim transferResult As TransferOperationResult
-    Set transferResult = mySession.PutFiles("d:\toupload\*", "/home/user/", False, myTransferOptions)+    Set transferResult =
 +········mySession.PutFiles("d:\toupload\*", "/home/user/", False, myTransferOptions)
       
    ' Throw on any error     ' Throw on any error

Last modified: by martin