Работа с FTP из Lotus

[lmike]

В NotesFTPSession
Set objFTP=New NotesFTPSession
objFTP.Connect "ип", "логин", "пароль", 0
что означает параметр 0 ?

где код самих классов?

 

[seoman2]

Ссылка скрыта от гостей

' opens socket and logs into FTP host
    Sub Connect(server$, user$, password$, flags&)        
       
        ' close any connections we may already have open      
        If Me.hConnection <> 0 Then
            apiInternetCloseHandle Me.hConnection
        End If
       
        ' log into the FTP host and get a handle to the connection
        Me.hConnection = InternetConnect(Me.hLib, server$, INTERNET_INVALID_PORT_NUMBER, user$, password$, INTERNET_SERVICE_FTP, flags&, 0)
       
        ' raise error if we cannot login to the host
        If Me.hConnection = 0 Then
            Error NOTESFTP_CONNECT_FAILED, "Could not connect to host " & server$ & "."
        End If
       
    End Sub

Смотрю в нете InternetConnect

Ссылка скрыта от гостей

void InternetConnectA( HINTERNET hInternet, LPCSTR lpszServerName, INTERNET_PORT nServerPort, LPCSTR lpszUserName, LPCSTR lpszPassword, DWORD dwService, DWORD dwFlags, DWORD_PTR dwContext );


dwFlags Options specific to the service used. If
dwService is INTERNET_SERVICE_FTP,

Ссылка скрыта от гостей

causes the application to use passive FTP semantics.

но изменение 1 и 0 в "objFTP.Connect "ип", "логин", "пароль", 0 " ничего не меняет режим.

 

[lmike]

Ссылка скрыта от гостей

' opens socket and logs into FTP host
    Sub Connect(server$, user$, password$, flags&)     
    
        ' close any connections we may already have open   
        If Me.hConnection <> 0 Then
            apiInternetCloseHandle Me.hConnection
        End If
    
        ' log into the FTP host and get a handle to the connection
        Me.hConnection = InternetConnect(Me.hLib, server$, INTERNET_INVALID_PORT_NUMBER, user$, password$, INTERNET_SERVICE_FTP, flags&, 0)
    
        ' raise error if we cannot login to the host
        If Me.hConnection = 0 Then
            Error NOTESFTP_CONNECT_FAILED, "Could not connect to host " & server$ & "."
        End If
    
    End Sub

Смотрю в нете InternetConnect

Ссылка скрыта от гостей

void InternetConnectA( HINTERNET hInternet, LPCSTR lpszServerName, INTERNET_PORT nServerPort, LPCSTR lpszUserName, LPCSTR lpszPassword, DWORD dwService, DWORD dwFlags, DWORD_PTR dwContext );


dwFlags Options specific to the service used. If
dwService is INTERNET_SERVICE_FTP,

Ссылка скрыта от гостей

causes the application to use passive FTP semantics.

но изменение 1 и 0 в "objFTP.Connect "ип", "логин", "пароль", 0 " ничего не меняет режим.

зачем Си-шный код, зачем низкоуровневые вызовы? Вам траблов не хватает?
есть же java либы (выше указали), "никому" не интересно копаться в "непонятных" бинарных вызовах
Передача неправильных параметров (по длинне или содержимому) в лучшем случае - просто не отработает, в худшем - уронит сервер (или получите меморилик), оно вам надо?