易语言 打开html文件路径,易语言取网页快捷方式文件的url地址

.版本 2

.支持库 xplib

.支持库 edroptarget

.支持库 eAPI

.程序集 窗口程序集1

.程序集变量 a, 整数型

.程序集变量 b, 整数型

.子程序 _拖放对象1_得到文件

.参数 接收到的文件路径, 文本型

编辑框1.内容 ＝ 接收到的文件路径

编辑框3.内容 ＝ 到文本 (读入文件 (编辑框1.内容))

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

XP风格 (1)

拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())

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

a ＝ 寻找文本 (编辑框3.内容, #换行符 ＋ “URL=http”, , 假)

编辑框2.内容 ＝ 取文本右边 (编辑框3.内容, 取文本长度 (编辑框3.内容) － a)

b ＝ 寻找文本 (编辑框2.内容, #换行符 ＋ “IDList=”, , 假)

编辑框4.内容 ＝ 取文本左边 (编辑框2.内容, b － 1)

编辑框4.内容 ＝ 取文本右边 (编辑框4.内容, 取文本长度 (编辑框4.内容) － 5)

打开指定网址 (编辑框4.内容)