Delphi DLL

Provide an FTP ACCT Account Identifier

Demonstrates the Account property, which supplies the value for the FTP ACCT command sent after USER/PASS when a server requests it.

Background: ACCT is a vestige of early FTP, where an account identifier could be required in addition to the username and password — think mainframe billing codes or storage-group selection. It is very rarely needed today; almost every modern server authenticates with USER and PASS alone. Set this only when connecting to a legacy host that explicitly asks for account information after login.

Chilkat Delphi DLL Downloads

Download Chilkat for Delphi DLL

Delphi DLL

var
success: Boolean;
ftp: HCkFtp2;

begin
success := False;

ftp := CkFtp2_Create();

CkFtp2_putHostname(ftp,'ftp.example.com');
CkFtp2_putUsername(ftp,'myFtpLogin');

//  Normally you would not hard-code the password in source.  You should instead obtain it
//  from an interactive prompt, environment variable, or a secrets vault.
CkFtp2_putPassword(ftp,'myPassword');

//  Account supplies the value for the FTP ACCT command, sent after USER/PASS when a server
//  requests it.  This is very rarely needed today -- almost all modern servers use only USER and
//  PASS -- but some legacy hosts require an additional account identifier.
CkFtp2_putAccount(ftp,'myAccountId');

success := CkFtp2_Connect(ftp);
if (success = False) then
  begin
    Memo1.Lines.Add(CkFtp2__lastErrorText(ftp));
    Exit;
  end;

Memo1.Lines.Add('Logged in (ACCT provided if the server requested it).');

success := CkFtp2_Disconnect(ftp);
if (success = False) then
  begin
    Memo1.Lines.Add(CkFtp2__lastErrorText(ftp));
    Exit;
  end;

CkFtp2_Dispose(ftp);