易语言如何取网页源码:
1、首先,运行“易语言”主程序,弹出“新建工程对话框”选择“Windows窗口程序”然后点击“确定”按钮,进入“Windows窗口程序设计界面”。如下图:
2、接下来,拖放标签组件一个、编辑框组件两个、按钮组件一个及分组框组件一个。将他们放置到合适的位置并将窗口的宽高设置到适当的大小。以确保窗口的简洁美观。如下图:
3、待界面调整完毕之后,将窗口标题、标签标题、分组框标题及按钮标题修改成相应内容,并且将编辑框、按钮组件规范命名。为编写程序代码做准备。
4、接下来就是编写代码了,在“_按钮_获取源码_被单击”事件子程序下,编写如下代码 编辑框_网页源码内容 = 到文本 (HTTP读文件 (编辑框_网址内容)) 如下图所示:
5、待代码编写无误后,进入调试阶段。按下“F5”快捷键运行程序,网址以百度经验的网址为例,然后点击“获取源码”按钮,等待程序执行。如图:
6、从网页源码编辑框得到的反馈结果分析,如果源码中出现乱码通常是编码方式的问题。这个时候,需要进行转码,就能看到正常的代码了。那么,代码也需要做小的改动。如图:
7、重新测试程序,从网页源码编辑框的反馈结果可以看出,这次读取的网页源码是正确的。
版本 2
支持库 edroptarget
支持库 eMMedia
程序集 窗口程序集_启动窗口
程序集变量 文件, 文本型
程序集变量 类型, 整数型
子程序 _播放按钮_被单击
播放MP3 (-1, 列表框1取项目文本 (列表框1现行选中项))
同步播放MP3 (列表框1取项目文本 (列表框1现行选中项), 0, 标签1, )
文件 = 列表框1取项目文本 (列表框1现行选中项)
类型 = _专辑_文件名取专辑类型 (文件)
_专辑_文件名取专辑_到框 (文件, 框1, 类型)
子程序 _按钮1_被单击
通用对话框1打开 ()
列表框1加入项目 (通用对话框1文件名, )
' ------------------------------------------------------------------------------------
' 打开对话框,然后在列表框中加入对话框中选择的文件
子程序 _标签1_反馈事件, 整数型
参数 参数一, 整数型
参数 参数二, 整数型
进度条1位置 = 参数一
' ------------------------------------------------------------------------------------------------------
' 参数一是MP3的播放进度,进度条的位置将实时同步参数一
' :)
子程序 _暂停按钮_被单击
暂停播放MP3 ()
子程序 _继续按钮_被单击
继续播放MP3 ()
子程序 _时钟1_周期事件
如果真 (取MP3播放状态 () = 0)
_启动窗口标题 = “等待播放”
如果真结束
如果真 (取MP3播放状态 () = -1)
_启动窗口标题 = “暂停” + “ ” + 到文本 (进度条1位置) + “%”
如果真结束
如果真 (取MP3播放状态 () = 1)
_启动窗口标题 = 到文本 (“播放中” + “ ” + 到文本 (进度条1位置) + “%”)
如果真结束
' ------------------------------------------------------------------------------------------------------------------------
' 每1毫秒都会检测上面“如果真”的代码,真的真将会执行代码
子程序 __启动窗口_位置被改变
如果真 (_启动窗口位置 = 2)
_启动窗口可视 = 假
置托盘图标 (#托盘, _启动窗口标题)
如果真结束
' -------------------------------------------------------------------------------------------------------------------------
' 如果窗口被最小化,将会看不到窗口,程序将会放到托盘里
子程序 __启动窗口_托盘事件
参数 操作类型, 整数型
如果真 (操作类型 = #单击左键)
_启动窗口位置 = 1
_启动窗口可视 = 真
如果真结束
如果真 (操作类型 = #单击右键)
弹出托盘菜单 (托盘菜单)
如果真结束
' -----------------------------------------------------------------------------------------------------------------
' 如果单击了左键,将会把窗口回复,可以看到窗口
' 如果单击了右键,将会弹出“托盘菜单”这个菜单
子程序 _播放_被选择
播放MP3 (-1, 列表框1取项目文本 (列表框1现行选中项))
子程序 _暂停_被选择
暂停播放MP3 ()
子程序 _继续_被选择
继续播放MP3 ()
子程序 _关闭_被选择
销毁 ()
子程序 _恢复_被选择
_启动窗口位置 = 2
_启动窗口可视 = 真
子程序 __启动窗口_创建完毕
局部变量 左声道, 整数型
局部变量 右声道, 整数型
拖放对象1注册拖放控件 (取窗口句柄 ())
系统音量1打开 (4)
滑块条1最小位置 = 系统音量1取最小音量 ()
滑块条1最大位置 = 系统音量1取最大音量 () ÷ 5
系统音量1取音量 (左声道, 右声道)
滑块条1位置 = 左声道 ÷ 5
' -------------------------------------------------------------------------------------------------------------------------
' 来自这里 https://jingyanbaiducom/article/0320e2c1db0a181b86507b61html
' 注册那个命令是让窗口可以把文件拖放进来
子程序 _拖放对象1_得到文件
参数 接收到的文件路径, 文本型
列表框1加入项目 (接收到的文件路径, )
' -----------------------------------------------------------------------------------------------------------------------------
' 把拖进来的文件加入到列表框里
子程序 _框1_被双击, 逻辑型
参数 横向位置, 整数型
参数 纵向位置, 整数型
参数 功能键状态, 整数型
载入 (窗口1, _启动窗口, 真)
子程序 _滑块条1_位置被改变
系统音量1置音量 (滑块条1位置 × 5, 滑块条1位置 × 5)
' -------------------------------------------------------------------------------------------------------------
' 来自这里 https://jingyanbaiducom/article/0320e2c1db0a181b86507b61html
单单要源码而已?
读http文件(网址),然后取文本中间,取出来
若这样读不出来,有可能是隐藏的,可以找一些抓包软件(httpwatch)看看是哪个地址,读出来后再取文本中间取出来
若是取出来后要做来原来这样的表格。。。那你还得自己慢慢分析再一步步写到表格中,工程量太大了(不建议)
不用计次……然后把_按钮1_被单击换成时钟就好了……
程序集 窗口程序集1程序集变量 文件号
子程序 _启动子程序, 整数型
载入 (窗口1, , 真)
返回 (-1)
子程序 _窗口1_创建完毕
通用对话框1过滤器 = "文本文档|txt"'只允许txt文件
通用对话框1初始目录 = 取运行目录 ()
通用对话框1打开 ()
如果真 (通用对话框1文件名 = 字符 (0))'是否未选择
结束 ()
如果真结束
文件号 = 打开文件 (通用对话框1文件名, , )
_按钮1_被单击 ()
子程序 _按钮1_被单击
局部变量 F, 文本型
F = 读入一行 (文件号)
如果真 (F ≠ 字符 (0))
编辑框1内容 = F
置剪辑板文本 (F)'呵呵……
返回 ()
如果真结束
信息框 ("已经到最后了,重新到最前", 0, )
移到文件首 (文件号)
_按钮1_被单击 ()'刷新
欢迎分享,转载请注明来源:表白网
评论列表(0条)