![]() ![]() Private Declare Function InternetOpenA Lib "wininet.dll" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long Private Const INTERNET_FLAG_RELOAD As Long = &H80000000 Private Const FTP_TRANSFER_TYPE_UNKNOWN As Long = 0 And buttons to Upload/Download and Cancel… and you have a clean interface to do FTP under VBA.įollowing are the common API functions and constants needed: There’s only the need for 4 textboxes (userName, Password, Port, SeverHost IP address), and 2 more textboxes (linked one each to 2 listboxes/treebox) to deal with the archives both in the local drive and in the server. The code presented here is 90% the same from the original post, but tidied a bit so it can be reused on a UserForm with ease. ![]() Again, from AnalystCave blog, I’ve found an interesting post about how to perform download/upload via FTP protocol in VBA.
0 Comments
Leave a Reply. |