(PureBasic) Determine if Connected and Logged On
The IsConnected property indicates whether or not the FTP component has a valid TCP/IP connection (and is logged on) to the FTP server.
IncludeFile "CkFtp2.pb"
Procedure ChilkatExample()
; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
ftp.i = CkFtp2::ckCreate()
If ftp.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkFtp2::setCkHostname(ftp, "ftp.example.com")
CkFtp2::setCkUsername(ftp, "mylogin")
CkFtp2::setCkPassword(ftp, "mypassword")
; Connect and login to the FTP server.
success.i = CkFtp2::ckConnect(ftp)
If success <> 1
Debug CkFtp2::ckLastErrorText(ftp)
CkFtp2::ckDispose(ftp)
ProcedureReturn
EndIf
; ...
; At any point in an FTP session, the IsConnected property
; can be checked to determine if the component has remained
; connected to the FTP server.
If CkFtp2::ckIsConnected(ftp) = 1
Debug "Connected!"
Else
Debug "Not connected!"
EndIf
; ...
success = CkFtp2::ckDisconnect(ftp)
CkFtp2::ckDispose(ftp)
ProcedureReturn
EndProcedure
|