易语言 ftp的操作

.版本 2

.支持库 iext

.支持库 internet.局部变量 项目类型, 整数型

.局部变量 选中项, 整数型

.局部变量 当前目录, 文本型

.局部变量 容器1, 整数型选中项 ＝ 远程文件框.现行选中项

.如果真 (选中项 ＝ -1)

返回 ()

.如果真结束

项目类型 ＝ 远程文件框.取表项数值 (选中项)当前目录 ＝ FTP取现行目录 ()

.判断开始 (项目类型 ＝ 0) ' 是否为到上目录

容器1 ＝ 倒找文本 (当前目录, “/”, , 真)

.如果真 (容器1 ≠ -1)

当前目录 ＝ 取文本左边 (当前目录, 容器1)

.如果真 (当前目录 ≠ “/”)

当前目录 ＝ 取文本左边 (当前目录, 容器1 － 1)

.如果真结束

FTP置现行目录 (当前目录)

填充远程框 ()

.如果真结束.判断 (项目类型 ＝ 1) ' 是否到子目录

.如果真 (取文本右边 (当前目录, 1) ≠ “/”)

当前目录 ＝ 当前目录 ＋ “/”

.如果真结束

FTP置现行目录 (当前目录 ＋ 远程文件框.取标题 (选中项, ))

填充远程框 ()

.默认.版本 2

.支持库 iext

.支持库 internet.子程序 填充远程框

.局部变量 文件名, 文本型, , "0"

.局部变量 文件尺寸, 整数型, , "0"

.局部变量 文件属性, 整数型, , "0"

.局部变量 文件时间, 日期时间型, , "0"

.局部变量 数目, 整数型

.局部变量 容器1, 整数型

.局部变量 名称, 文本型

.局部变量 索引, 整数型

.局部变量 现行目录, 文本型远程文件框.全部删除 ()状态标签.标题 ＝ “正在获取目录列表,请稍候...”

状态标签.刷新显示 () ' 立即显示改变后的标题

数目 ＝ FTP目录列表 (“*.*”, , 文件名, 文件属性, 文件尺寸, 文件时间)

' 填充目录

现行目录 ＝ FTP取现行目录 ()

.如果真 (现行目录 ≠ “/”)

远程文件框.插入表项 (, , 0, , , 0) ' 如果不是根目录,则插入到父目录的特殊表项

.如果真结束.计次循环首 (数目, 容器1)

.如果真 (位与 (文件属性 [容器1], #子目录) ≠ 0)

名称 ＝ 文件名 [容器1]

.如果真 (取文本左边 (名称, 1) ≠ “.”)

索引 ＝ 远程文件框.插入表项 (, 名称, 1, , , 1)

远程文件框.置标题 (索引, 2, 到文本 (文件时间 [容器1]))

.如果真结束.如果真结束.计次循环尾 ()

' 填充文件

.计次循环首 (数目, 容器1)

.如果真 (位与 (文件属性 [容器1], #子目录) ＝ 0)

索引 ＝ 远程文件框.插入表项 (, 文件名 [容器1], 2, , , 2)

远程文件框.置标题 (索引, 1, 到文本 (文件尺寸 [容器1]))

远程文件框.置标题 (索引, 2, 到文本 (文件时间 [容器1]))

.如果真结束.计次循环尾 ()

调用格式： 〈整数型〉 对象．取目录列表 （［文本型 欲列出的文件］，［文本型变量/变量数组 存放文件名的数组变量］，［整数型变量/变量数组 存放文件属性的数组变量］，［长整数型变量/变量数组 存放文件尺寸的数组变量］，［日期时间型变量/变量数组 存放文件时间的数组变量］） - 网络传送支持库->FTP辅助对象

英文名称：FtpGetDirList

返回FTP服务器上指定目录内的所有匹配文件和子目录信息。成功返回被找到的文件和子目录的数目，失败返回 -1失败的原因有可能是FTP服务器的目录结构暂时不被支持。本命令为初级对象成员命令。

参数<1>的名称为“欲列出的文件”，类型为“文本型（text）”，可以被省略。可以包含路径，可以使用多字符 (*) 和单字符 (?) 通配符来指定多重文件及目录。

参数<2>的名称为“存放文件名的数组变量”，类型为“文本型（text）”，可以被省略，提供参数数据时只能提供变量及变量数组。提供参数数据时只能提供变量数组。在命令执行完毕后，本变量数组内被顺序填入所找到的匹配文件和子目录名称。变量数组内原有数据被全部销毁，变量数组的维数被自动调整为所找到的文件数目。

参数<3>的名称为“存放文件属性的数组变量”，类型为“整数型（int）”，可以被省略，提供参数数据时只能提供变量及变量数组。当前不被支持,留做以后扩展。

参数<4>的名称为“存放文件尺寸的数组变量”，类型为“长整数型（int64）”，可以被省略，提供参数数据时只能提供变量及变量数组。提供参数数据时只能提供变量数组。在命令执行完毕后，本变量数组内被顺序填入所找到的匹配文件的尺寸，并与文件名数组成员一一对应。

参数<5>的名称为“存放文件时间的数组变量”，类型为“日期时间型（date）”，可以被省略，提供参数数据时只能提供变量及变量数组。提供参数数据时只能提供变量数组。在命令执行完毕后，本变量数组内被顺序填入所找到的匹配文件的最后修改时间，并与文件名数组成员一一对应。变量数组内原有数据被全部销毁，变量数组的维数被自动调整为所找到的文件数目。

操作系统需求： Windows、Linux

首先，用命令:连接FTP服务器()参数有 服务器 账号 密码 端口号 （端口号默认为21,一般填21即可）然后用命令 FTP上传文件("C:\123.exe",FTP取现行目录()+"/wwwroot/123.exe")解释一下，wwwroot为FTP空间的根目录

---