B4X

Limit FTP DownloadTree by Modification Date

Demonstrates the Chilkat Ftp2.SetOldestDateStr method, which sets the oldest remote modification time eligible for DownloadTree. The only argument is an RFC 822 date-time string; files older than it are skipped. It is a void method.

Background: This is a date filter for the recursive download: set a cutoff and DownloadTree pulls only files modified on or after it, ignoring everything older. It is ideal for fetching just recent activity — new logs, today's uploads — from a directory that also holds a large archive you do not want to re-download. The RFC 822 string carries a timezone so the cutoff is unambiguous.

Chilkat B4X Downloads

Download Chilkat for B4X

B4X

Dim success As Boolean = False

'  Demonstrates the Ftp2.SetOldestDateStr method, which sets the oldest remote modification time
'  eligible for DownloadTree.  The only argument is an RFC 822 date-time string.  It is a void
'  method.

Dim ftp As ChilkatFtp2
ftp.Initialize("ftp")

ftp.Hostname = "ftp.example.com"
ftp.Username = "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.
ftp.Password = "myPassword"

success = ftp.Connect
If success = False Then
    Log(ftp.LastErrorText)
    Return
End If


success = ftp.ChangeRemoteDir("public_html")
If success = False Then
    Log(ftp.LastErrorText)
    Return
End If


'  Only files modified on or after this date will be considered by DownloadTree.  Files older
'  than this are skipped.
ftp.SetOldestDateStr("Wed, 01 Jul 2026 00:00:00 -0000")

'  Download only the recently-modified files in the remote tree.
success = ftp.DownloadTree("qa_output/recent")
If success = False Then
    Log(ftp.LastErrorText)
    Return
End If

Log("Downloaded recently modified files.")

success = ftp.Disconnect
If success = False Then
    Log(ftp.LastErrorText)
    Return
End If