主题：请教，远程下载一个文件夹里面的所有文件的代码怎么写？

 这个，就要用到递归了，因为目录下，可能还有子目录。

 看认真看看这两个函数……应该可以解决小部分问题，全部的话有空帮你写写。

GetFileList

用于返回FTP服务器指定目录下的全部文件名，以字符串集合的形式返回，语法：

GetFileList(Path)

Path：可选参数，用于指定目录，如果省略，则返回根目录下的全部文件名。

GetDirectoryList

用于返回FTP服务器指定目录下的全部子目录，以字符串集合的形式返回，语法：

GetDirectoryList(Path)

Path：可选参数，用于指定目录，如果省略，则返回根目录下的全部子目录名。

 代码这样写……

Dim ftp1 As new ftpclient
ftp1.host="120.198.124.195"
ftp1.Account = "cnd8002"
ftp1.password = "cnd8002#!!xsa"
ftp1.UTF8 = True
ftp1.OpenManager("/")