delphi中如何用控件运行javascript脚本呀! ( 积分: 50 )

  • 主题发起人 主题发起人 qingtz
  • 开始时间 开始时间
Q

qingtz

Unregistered / Unconfirmed
GUEST, unregistred user!
网页中有下面这段随机生成的banner脚本,我现在只想运行这个脚本,在delphi中如何实现呀,有没有这样的控件呀!
<script language="JavaScript" type="text/JavaScript" src="http://union.3721.com/v2/img.js?a=2093&b=1001&p=1008&iu=p1008/120-60.swf&it=1&ih=60&iw=120&m=315296"></script>
 
网页中有下面这段随机生成的banner脚本,我现在只想运行这个脚本,在delphi中如何实现呀,有没有这样的控件呀!
<script language="JavaScript" type="text/JavaScript" src="http://union.3721.com/v2/img.js?a=2093&b=1001&p=1008&iu=p1008/120-60.swf&it=1&ih=60&iw=120&m=315296"></script>
 
应该可以用WEBbrowse控件来做。。先把代码写入HTML文件,再用它来打开文件
 
可是我不想用WEBbrowse呀,我需要多个代理循环点击这样的banner,要是用WEBbrowse就没法用代理了
 
不用Delphi,另外做一个网页,与你要连接的网页(带Banner)放在同一个Frame中显示。
新网页中加上javascript代码,去控制与他同一个Frame下的网页(带Banner)里面的对象。

比如Frame也分为名字为 LeftFrame 和 RightFrame的两个子Frame,LeftFrame放着你自己做的网页,RightFrame放着你要连接的网页(带Banner)

比如 连接的网页的Banner链接是所在网页的第一个Link,则
你自己写的网页里面有如下JavaScript代码,如果循环执行以下代码则相当于多次点击Banner:

self.top.RightFrame.document.links[0].click()

即:当前.顶级.RightFrame.文档.第一个Link.模拟点击()
 
用WEBsnap 可以啊 用透明标志就可以了
 
to: wbf810207
你好,能不能给点代码呀,我不太懂WEBsnap,谢谢了
 
后退
顶部