Xojo Plugin

Filter Files and Directories in an FTP Sync

Demonstrates the synchronization filter properties SyncMustMatch, SyncMustNotMatch, SyncMustMatchDir, SyncMustNotMatchDir, and SyncCreateAllLocalDirs.

Note: The local paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: A real sync rarely wants every file. These semicolon-separated wildcard filters shape the set: the MustMatch pairs include only matching files/directories, while the MustNotMatch pairs exclude them — letting you, say, publish only web assets while skipping build artifacts and caches. Directory filters also prune traversal, avoiding wasted time descending into folders you do not need. They apply to the tree-sync methods such as SyncLocalTree and SyncRemoteTree.

Chilkat Xojo Plugin Downloads

Download Chilkat for Xojo Plugin

Xojo Plugin

Dim success As Boolean
success = False

Dim ftp As New Chilkat.Ftp2

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
    System.DebugLog(ftp.LastErrorText)
    Return
End If

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

//  Include only files matching these semicolon-separated, case-insensitive wildcard patterns.
ftp.SyncMustMatch = "*.html;*.css;*.js"

//  Exclude files matching these patterns, even if they matched SyncMustMatch.
ftp.SyncMustNotMatch = "*.tmp;*.bak"

//  Restrict which directories are traversed (and which are skipped) during a tree sync.
ftp.SyncMustMatchDir = "assets;pages"
ftp.SyncMustNotMatchDir = "cache;node_modules"

//  For a download sync, create empty remote directories on the local side too.
ftp.SyncCreateAllLocalDirs = True

//  The filters apply to the tree sync operations, such as SyncLocalTree.
Dim mode As Int32
mode = 6
success = ftp.SyncLocalTree("qa_output/site",mode)
If (success = False) Then
    System.DebugLog(ftp.LastErrorText)
    Return
End If

System.DebugLog("Filtered sync complete.")

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