|
.版本 2
.支持库 spec
.支持库 internet
循环次数 = 取数组成员数 (载入内容)
.计次循环首 (循环次数, i)
搜索进度条.位置 = i
正搜标签.标题 = 到文本 (i)
行内容 = 取文本 (载入内容 [i], )
分割内容 = 分割文本 (行内容, 字符 (#Tab键), )
变量1 = 取文本 (分割内容 [1], )
变量2 = 取文本 (分割内容 [2], )
搜网址 = 搜索网址框.内容 + 编码_URL编码 (变量1)
网页内容 = 到文本 (HTTP读文件 (搜网址))
.如果 (网页内容 = “”)
搜失败数 = 搜失败数 + 1
.否则
.如果结束
网页内容 = 编码_utf8到gb2312 (网页内容)
网页内容 = 子文本替换 (网页内容, 字符 (#空格键), , , , 真)
网页内容 = 子文本替换 (网页内容, #换行符, , , , 真)
网页内容 = 子文本替换 (网页内容, 字符 (#Tab键), , , , 真)
调试输出 (变量1)
.如果 (写到文件 (取运行目录 () + “\test\” + 变量1 + “.txt”, 到字节集 (网页内容)) = 真)
信息框 (“成功” + 变量1, 0, , )
.否则
信息框 (“失败” + 变量1 + 搜网址, 0, , )
.如果结束
延迟 (1000)
.计次循环尾 ()
=================================================================
“载入内容”是我 载入内容 = 分割文本 (搜索内容, 字符 (#回车键), )
“搜索内容”是我 读取的TXT文本内容 一行两个内容 用的Tab键分割 后面赋值给 变量1 和 变量2
目前情况:
循环第二次和以后的时候保存文件就失败了
但是调试输出“变量1” 结果正常
尝试保存时将“变量1”换成取当前时间保存就没问题
新手请高手帮忙看看到底怎么了 |
|