有没有生成文本网页，我要使用易语言公告？

发布网友 发布时间：2022-04-21 09:00

我来回答

共4个回答

热心网友 时间：2023-06-30 20:11

动态公告(可修改)

.版本 2

.支持库 internet

.子程序 __启动窗口_创建完毕

.局部变量 我的博客日志网址, 文本型

' 到自己的空间写新文章.内容举例:

' #@#@软件广告1号#@#@广告内容1号#@#@

' #@#@软件广告2号#@#@广告内容2号#@#@

' 发表后的文章链接是:http://hi.baidu.com/%CB%BE%C2%ED%B3%BE%C1%B5/home

' 要更新公告只需要更改你的日志内容

' #@#@公告1号#@#@这是我的公告①!有问题欢迎提问!#@#@

' #@#@公告2号#@#@这是我的公告②!有问题欢迎提问!#@#@

' 我这里直接设置成这个百度知道问题的页面,获取上边的两个公告

我的博客日志网址 ＝ “http://zhidao.baidu.com/question/263253968.html”

标签_公告.标题 ＝ 获取公告 (我的博客日志网址, “#@#@公告2号#@#@”, “#@#@”)

信息框 (获取公告 (我的博客日志网址, “#@#@公告1号#@#@”, “#@#@”), 0, )

.子程序 获取公告, 文本型, 公开, 到自己博客日志页获取公告内容

.参数 _日志网址, 文本型

.参数 _公告左, 文本型

.参数 _公告右, 文本型

.参数 _失败提示, 文本型, 可空, 默认“获取公告失败”

.局部变量 公告, 文本型

.局部变量 日志内容, 文本型

.局部变量 a, 整数型

.局部变量 b, 整数型

.如果真 (是否为空 (_失败提示))

    _失败提示 ＝ “获取公告失败”

.如果真结束

日志内容 ＝ 到文本 (HTTP读文件 (_日志网址))

a ＝ 寻找文本 (日志内容, _公告左, , 假)

.如果真 (a ＝ -1)

    返回 (_失败提示)

.如果真结束

a ＝ a ＋ 取文本长度 (_公告左)

b ＝ 寻找文本 (日志内容, _公告右, a, 假)

.如果真 (b ＝ -1)

    返回 (_失败提示)

.如果真结束

公告 ＝ 取文本中间 (日志内容, a, b － a)

.如果真 (公告 ＝ “”)

    返回 (_失败提示)

.如果真结束

返回 (公告)

热心网友 时间：2023-06-30 20:12

http://blog.sina.com.cn/s/blog_7caebd340100r3e1.html

热心网友 时间：2023-06-30 20:12

没听明白，你说是屏幕公告栏还是右下角啊？

热心网友 时间：2023-06-30 20:13

公告栏那字 谁有源码 加分 还有就是下面那友情链接那字 源码 谢谢问题补充另外在帮你写一个鼠标停留在公告上时公告停止滚动的代码: .版本 2 .子