Visual FoxPro
Visual FoxPro
Get the Entire Remote Directory Tree as XML
See more FTP Examples
Demonstrates the Chilkat Ftp2.DirTreeXml method, which returns an XML representation of the complete remote directory tree rooted at the current remote directory. It takes no arguments; the result uses a <dirTree> root with nested <dir> and <file> elements.
Tip: Code to parse the returned XML can be generated at Chilkat Tools.
Background: This walks the whole subtree in one call and hands back its structure as nested XML — a convenient way to snapshot or audit an entire remote hierarchy without writing your own recursion. Be mindful that it visits every subdirectory, so on a large or deep tree it can be slow and produce a great deal of XML; scope it by changing into the specific directory you care about first.
Chilkat Visual FoxPro Downloads
LOCAL lnSuccess
LOCAL loFtp
LOCAL lcTreeXml
lnSuccess = 0
* Demonstrates the Ftp2.DirTreeXml method, which returns an XML representation of the complete
* remote directory tree rooted at the current remote directory. It takes no arguments.
loFtp = CreateObject('Chilkat.Ftp2')
loFtp.Hostname = "ftp.example.com"
loFtp.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.
loFtp.Password = "myPassword"
lnSuccess = loFtp.Connect()
IF (lnSuccess = 0) THEN
? loFtp.LastErrorText
RELEASE loFtp
CANCEL
ENDIF
lnSuccess = loFtp.ChangeRemoteDir("public_html")
IF (lnSuccess = 0) THEN
? loFtp.LastErrorText
RELEASE loFtp
CANCEL
ENDIF
* The result uses a <dirTree> root with nested <dir> and <file> elements describing the whole
* subtree. This can be a large amount of data for a deep tree.
lcTreeXml = loFtp.DirTreeXml()
IF (loFtp.LastMethodSuccess = 0) THEN
? loFtp.LastErrorText
RELEASE loFtp
CANCEL
ENDIF
? lcTreeXml
lnSuccess = loFtp.Disconnect()
IF (lnSuccess = 0) THEN
? loFtp.LastErrorText
RELEASE loFtp
CANCEL
ENDIF
RELEASE loFtp