Option Explicit Public Declare Function InternetOpen Lib " wininet.dll " Alias " InternetOpenA " _(ByVal sAgent As String , ByVal LAccessType As Long , ByVal sProxyName As String , _ByVal SProxyBypass As String , ByVal lFlags As Long ) As Long Public Declare Function InternetConnect Lib " wininet.dll " Alias " InternetConnectA " _(ByVal hInternetSession As Long , ByVal sServerName As String , _ByVal nServerPort As Integer , ByVal sUsername As String , _ByVal sPassword As String , ByVal lService As Long , _ByVal lFlags As Long , ByVal lContext As Long ) As Long Public Declare Function FtpGetFile Lib " wininet.dll " Alias " FtpGetFileA " _(ByVal hFtpSession As Long , ByVal lpszRemoteFile As String , _ByVal lpszNewFile As String , ByVal fFailIfExists As Boolean , _ByVal dwFlagsAndAttributes As Long , ByVal dwFlags As Long , _ByVal dwContext As Long ) As Boolean Public Declare Function FtpPutFile Lib " wininet.dll " Alias " FtpPutFileA " _(ByVal hFtpSession As Long , ByVal lpszLocalFile As String , _ByVal lpszRemoteFile As String