你别填 ftp端口就好了 !代码如下↓↓↓
.版本
2
.子程序
_上传_被单击
.版本
2
.支持库
internet
.如果真
(连接FTP服务器
(“ftp地址”,
“用户名”,
“密码”,
,
))
.如果
(写到文件
(“d:\1.txt”,
到字节集
(编辑框1.内容))
=
真)
.如果
(FTP文件上传
(“d:\1.txt”,
“/1.txt”,
)
=
真)
'
断开FTP服务器
()
删除文件
(“d:\1.txt”)
信息框
(“上传成功”,
0,
,
)
.否则
信息框
(“上传失败”,
0,
,
)
.子程序
_下载_被单击
.如果
(FTP文件下载
(“/1.txt”,
取运行目录
()
+
“\data\2.txt”,
)
=
真)
断开FTP服务器
()
信息框
(“下载成功”,
0,
,
)
.否则
信息框
(“下载失败”,
0,
,
)