易语言 打开网址源码

发布网友 发布时间：2022-04-28 23:57

我来回答

共5个回答

热心网友 时间：2022-06-25 22:25

其实真的很简单，只要你打好易语言基础很容易做出来！

.版本 2

.支持库 eAPI

.支持库 spec

 

.程序集 窗口程序集1

.子程序 _按钮1_被单击

.局部变量 网页地址文件, 文本型

.局部变量 网页地址, 文本型, , "0"

.局部变量 局部_计次, 整数型

 

' 网址.txt 记事本必须与这个软件程序在同一个文件夹中！

.如果真 (文件是否存在 (取运行目录 () ＋ “\网址.txt”) ＝ 假)

    信息框 (“你的 ” ＋ 取运行目录 () ＋ “ 路径中无【网址.txt】文档文本！”, #确认钮 ＋ #错误图标, “提示”)

    返回 ()

.如果真结束

网页地址文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\网址.txt”))

网页地址 ＝ 分割文本 (网页地址文件, 到文本 (#换行符), )

.计次循环首 (取数组成员数 (网页地址), 局部_计次)

    打开指定网址 (网页地址 [局部_计次])

    延迟 (10000)

.计次循环尾 ()

 

 

追问你好，非常感谢你那么认真回答我的问题，祝你新年快乐，全家安康。可能我的问题表达能力不够好，令你误解了，我的目的是打开第一个网址，隔10秒钟后，再用第二个网址替换第一个网址，如此工作到最后，也就是说只能一个页面存在，不能多个页面同时存在。你好人做到底，麻烦你再帮我修改一下，万分感激！

追答我的这个就是只存在一个打开的页面的呀！比如我打开程序时一个页面也没有打开，然后点击按钮就会自动打开一个页面进入第一个网站，等待10秒后，这个页面会自动登录为第二个网站！一直到最后一个网页！这个代码我也测试过了的，是用IE6测试的，不知道你的是IE几呢？

热心网友 时间：2022-06-25 22:26

.版本 2
.支持库 eAPI
.支持库 spec
.程序集 窗口程序集1, , , 用了子程序封装，其实还可以提取的，我就不搞了，你研究研究吧
.子程序 _按钮1_被单击
.局部变量 sz读入网址, 文本型
.局部变量 sz文本数组, 文本型, , "0"
.如果真 (取反 (文件是否存在 (“www.txt”))) ' 判断文件是否存在
信息框 (“文件不存在”, 0, )
返回 ()
.如果真结束
sz读入网址 ＝ 到文本 (读入文件 (“www.txt”)) ' 读入文件
sz文本数组 ＝ 分割文本 (sz读入网址, #换行符, ) ' 分割文本
OpenWWW (sz文本数组) ' 调用打开网页子程序
.子程序 OpenWWW, , , 打开网页子程序
.参数 网址文本数组, 文本型, 数组
.局部变量 iCount, 整数型
.如果真 (取数组成员数 (网址文本数组) ＝ 0)
返回 ()
.如果真结束
.计次循环首 (取数组成员数 (网址文本数组), iCount)
打开指定网址 (网址文本数组 [iCount])
延迟 (10000)
.计次循环尾 ()
返回 ()

热心网友 时间：2022-06-25 22:26

如果你需要早超文本浏览框内跳转把“ 打开指定网址” 改成“超文本浏览框.跳转”即可

热心网友 时间：2022-06-25 22:27

先读文本，用回车键分割成数组。然后用循环逐个打开。至于关闭嘛，消灭进程就可以了。如果是一起打开，10秒关闭其中一个就要取窗口句柄再关闭。追问你好，我不会啊，我的意思是弹出浏览器依次每隔几秒种浏览一个网址就行了，不需要关闭浏览器，但不能同时两个网页出现。你能给我源码吗？谢谢你，我用的是IE浏览器。

来自：求助得到的回答

热心网友 时间：2022-06-25 22:27

用这条命令:打开指定网址()
不过首先你得分割文本追问你好，能帮我写个源码发到我邮箱吗，谢谢你335700306@qq.com

追答是不是打开这个记事本里面的网址？如果是我就帮不了你了，因为我也不会怎么读取那里面的内容，如果是填写编辑框里倒挺容易的！