Question

一个易语言POST 多行文本分割后提交，成功了追加30再！

第一个图片是post的前台设计窗口，我的目的是去一个栏目下的很多文章回帖的，我事先采集好了帖子的id：格式如下
45345345
43545444
34456565
46456456
76867888
这样的一行一个的在一个txt文档里存储，
我post提交数据已经写好，放到一个子程序里，可以直接调用的，如何写那个分割文本然后计次执行循环读取一个id然后发帖，然后再读取下面一个id继续发帖循环，
如果能写出来可以前台显示计数的，可以显示发了多少了，最终100分全给你啊，我就这么多了，

Answer 1

你可以尝试一下使用 打开文件、读入一行、关闭文件等函数，在使用打开文件函数时，注意将返回文件号赋值给一个变量。我这里没有易语言，很抱歉不能提供源码。

锌雨泪 想钱想疯了

刚拿来U盘给你写写：

.版本 2
.支持库 spec

.程序集 窗口程序集1
.程序集变量 Text, 文本型, , "0", 用于储存读入的帖子ID
.程序集变量 DocNum, 整数型, , , 用于储存读入的文本文档的文件号

.子程序 __启动窗口_创建完毕
.局部变量 t, 文本型, , , 用于临时储存读入的帖子ID，用于判断

DocNum ＝ 打开文件 (取运行目录 () ＋ “\Tid.txt”, #读入, ) ' 打开需要读入文本的文本文档，且将文件号赋值给DocNum。文档为目录下的Tid.txt文件。
.判断开始 (DocNum ≠ 0) ' 判断文件是否成功打开。
移到文件首 (DocNum) ' 移动到该文件的文件首，开始读入文本。
.判断循环首 (取反 (是否在文件尾 (DocNum, ))) ' 判断是否已读完，读完则跳出循环。
t ＝ 删首尾空 (读入一行 (DocNum)) ' 尽量减少空白文本的影响。
.如果真 (t ≠ 取空白文本 (0)) ' 判断是否为空文本。
加入成员 (Text, t) ' 将读入的文本加入Tid数组。
.如果真结束
移动读写位置 (DocNum, #现行位置, 1) ' 移动到下一行。
.判断循环尾 ()
.判断开始 (取数组成员数 (Text) ＝ 0) ' 判断Tid是否为空数组
信息框 (“文件无有意义内容！”, #信息图标, “信息：”) ' 提示
.默认
信息框 (“成功读入文件！”, #信息图标, “信息：”) ' 提示
.判断结束
关闭文件 (DocNum)
.默认
信息框 (“打开文件失败！”, #错误图标, “错误：”) ' 提示
.判断结束
调试输出 (Text)

追问

你好有联系方式么，可以出钱你帮我搞下。

追答

有什么事直接问吧 我是初中生

追问

你有qq么，技术不分年龄

追答

QQ466721104 不常上 毕竟初2暑假要补课了 七月十八号以后可能时间比较充裕

追问

朋友，加你了没反应哦

追答

.版本 2
.支持库 spec

.子程序 读全文本行, 逻辑型, , 成功返回真；失败返回假。
.参数 欲读入的文件名称, 文本型
.参数 全文本行, 文本型, 参考 数组, 用于接收全文本行。
.局部变量 DocNum, 整数型, , , 用于储存读入文件的文件号。
.局部变量 t, 文本型, , , 用于临时储存读入的文本行，用于判断。
.局部变量 Text, 文本型, , "0", 用于储存读入的全文本行。

DocNum ＝ 打开文件 (欲读入的文件名称, #读入, ) ' 打开需要读入文本的文本文档，且将文件号赋值给DocNum。文件为参数所指定的文件。
.判断开始 (DocNum ≠ 0) ' 判断文件是否成功打开。
移到文件首 (DocNum) ' 移动到该文件的文件首，开始读入文本。
.判断循环首 (取反 (是否在文件尾 (DocNum, ))) ' 判断是否已读完，读完则跳出循环。
t ＝ 删首尾空 (读入一行 (DocNum)) ' 尽量减少空白文本的影响。
.如果真 (t ≠ 取空白文本 (0)) ' 判断是否为空文本。
加入成员 (Text, t) ' 将读入的文本加入Text数组。
.如果真结束
移动读写位置 (DocNum, #现行位置, 1) ' 移动到下一行。
.判断循环尾 ()
.判断开始 (取数组成员数 (Text) ＝ 0) ' 判断Text是否为空数组
返回 (假)
.默认
调试输出 (Text)
全文本行 ＝ Text ' 将读入文本赋值给接收的参考参数
返回 (真)
.判断结束
关闭文件 (DocNum) ' 关闭文件
.默认
返回 (假)
.判断结束

Answer 2

在文本内容里面将ID、标题、内容、前后加入一个符号，然后在程序里面分割出这些内容，然后使用加数值来读到下一个分割后的ID，然后自动发帖，就这样了！源码就没有了，这个写出来也要时间的！100分。。。100元还差不多！

Answer 3

不懂易语言，但是很多编程语言都是可以逐行读入文本的，要不你也可以文本间用特殊符号隔开，读入的时候再分离就可以了