易语言 ftp读取txt
步骤是,1连接FTP服务器进行下载你要的文本文件到本地
2再打开本地读入文件内容显示在编辑框内
具体例:
版本 2
支持库 internet
支持库 shell
子程序 __启动窗口_创建完毕
局部变量 文件号, 整数型
连接FTP服务器 (“58222184”, “j”, “0910228”, , )
FTP文件下载 (“1txt”, 取特定目录 (3) + “\1txt”, )‘因为我的E不好编辑,我把他存在桌面了!你可以自己设定位置。
文件号 = 打开文件 (取特定目录 (3) + “\1txt”, , )
编辑框1内容 = 读入文本 (文件号, )
连接FTP服务器 (“地址”, “用户名”, “密码”, 21, )
FTP文件上传 (“要上传的文件html”, “wwwroot/pc要上传的文件html )
断开FTP服务器 ()
这样就对了,你的代码比较乱,不想调试了,给你个成型的!
FTP文件上传 (“adresstxt”, FTP取现行目录 () + “/adresstxt”, )
注意1,本地路径,如果是相对路径的话,就要将文件和易语言程序放在一个目录下,如果是绝对路径的话,注意要写全文件格式比如"D:\ABC\1TXT"
注意2,FTP文件路径需要跟上文件名,不能写"/123/wwwroot/",要讲完整的路径+文件名写出来,推荐写法FTP取现行目录 () + “/1txt"
简单的写一个 窗口内需要 按钮1 通用对话框1 两个控件
版本 2
支持库 internet
子程序 _按钮1_被单击
局部变量 文件名, 文本型
如果 (连接FTP服务器 (“19216811”, “”, “”, 21, ) = 真)
如果真 (通用对话框1打开 () = 真 且 通用对话框1文件名 ≠ “”) ' 判断是否打开了文件
文件名 = 取文本右边 (通用对话框1文件名, 取文本长度 (通用对话框1文件名) - 倒找文本 (通用对话框1文件名, “\”, , 假)) ' 取出被打开的文件名
如果 (FTP文件上传 (通用对话框1文件名, 文件名, 假) = 真)
信息框 (“上传文件 ” + 文件名 + “ 成功!”, 0, )
否则
信息框 (“上传文件 ” + 文件名 + “ 失败!”, 0, )
如果结束
如果真结束
否则
信息框 (“连接失败”, 0, )
0条评论