怎么自动复制网页中的任意链接到剪切板

每天注册

各位老师想求助一个问题！

就是怎么实现，用超文本浏览框打开某网页后，点击网页中的某个链接，不打开这个链接，但是自动复制这个链接的地址到“剪切板”

谢谢了！

醉看ジ笑红颜づ

  

子程序名	返回值类型	公开	备 注
_超文本浏览框1_即将跳转	逻辑型

置剪辑板文本 (超文本浏览框1.地址)
返回 (假)

i支持库列表	支持库注释
HtmlView	超文本浏览框支持库

.版本 2<br /> .支持库 HtmlView<br /> <br /> .子程序 _超文本浏览框1_即将跳转, 逻辑型<br /> <br /> 置剪辑板文本 (超文本浏览框1.地址)<br /> 返回 (假)

试试。

笑红尘゛

我可以告诉你思路的。

直接写一个检测 如果超文本获得焦点  获取鼠标下面的元素代码
然后再寻找文本 如果 鼠标下元素代码等于 “<a href”

就取出文本中间 类似于彗星小助手里面的网页SPY  

这个源码楼主可以去百度一下的 易语言网页spy 很多源码的

zz912936678

                
置剪辑板文本 (超文本浏览框1.地址)

屎神创造者

  

变量名	类 型	静态	数组	备 注
局文本_结果	文本型

普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
普通填表.链接_取属性 (普通填表.链接_取索引 (“连接名称”, ), , 局文本_结果)
信息框 (“局文本_结果:” ＋ 局文本_结果, 0, )

.版本 2<br /> <br /> .局部变量 局文本_结果, 文本型<br /> <br /> 普通填表.初始化 (超文本浏览框1.取窗口句柄 ())<br /> 普通填表.链接_取属性 (普通填表.链接_取索引 (“连接名称”, ), , 局文本_结果)<br /> 信息框 (“局文本_结果:” ＋ 局文本_结果, 0, )

屎神创造者

  

变量名	类 型	静态	数组	备 注
局文本_结果	文本型

普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
普通填表.链接_取属性 (普通填表.链接_取索引 (“连接名称”, ), , 局文本_结果, )
置剪辑板文本 (局文本_结果)
信息框 (“局文本_结果:” ＋ 局文本_结果 ＋ “ 复制成功!”, 0, )

.版本 2<br /> <br /> .局部变量 局文本_结果, 文本型<br /> <br /> 普通填表.初始化 (超文本浏览框1.取窗口句柄 ())<br /> 普通填表.链接_取属性 (普通填表.链接_取索引 (“连接名称”, ), , 局文本_结果, )<br /> <br /> 置剪辑板文本 (局文本_结果)<br /> 信息框 (“局文本_结果:” ＋ 局文本_结果 ＋ “ 复制成功!”, 0, )

每天注册

无ye 发表于 2014-5-21 23:05
[e=0].版本 2

.局部变量 局文本_结果, 文本型

大神，能给个例子？

熊大

屎神创造者

每天注册 发表于 2014-6-3 13:50
大神，能给个例子？

例子.rar (126.11 KB, 下载次数: 13)

2014-6-3 14:45 上传

点击文件名下载附件