(Perl) 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.
use chilkat();
# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
$ftp = chilkat::CkFtp2->new();
$ftp->put_Hostname("ftp.example.com");
$ftp->put_Username("mylogin");
$ftp->put_Password("mypassword");
# Connect and login to the FTP server.
$success = $ftp->Connect();
if ($success != 1) {
print $ftp->lastErrorText() . "\r\n";
exit;
}
# ...
# 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 ($ftp->get_IsConnected() == 1) {
print "Connected!" . "\r\n";
}
else {
print "Not connected!" . "\r\n";
}
# ...
$success = $ftp->Disconnect();
|