如果隐藏调用IE,打开指定的网址,  注,是隐藏的,在后台工作, 294分! ( 积分: 294 )

  • 主题发起人 delphi_vip
  • 开始时间
D

delphi_vip

Unregistered / Unconfirmed
GUEST, unregistred user!
请给出完整代码,谢谢大家
 
请给出完整代码,谢谢大家
 
procedure TForm1.btn1Click(Sender: TObject);
procedure OpenInIE(aURL: string);
//need uses ComObj;
var
IE : Variant;
begin
IE := CreateOleObject('InternetExplorer.Application');
IE.Visible := false;
IE.Navigate(aURL);
end;
begin
OpenInIE('www.delphibbs.com');
end;
 
这样就可以了吗
 
调用上面这个方法 页面的访问次数会增加吗?
 
会的,不过这个和可见的窗口一样费内存,开不了太多。你如果想刷计数器,点广告之类的,还是idhttp合适
 
idhttp合适? 请给个例子号码 ?
to satanmonkey
好象你也在昆明呀
 
indy自己带的例子改改,我是昆明的。呵呵。
 
分数这么多啊可惜别人己经答了.
 
我刷新 无效
我的QQ:15524227
 
好象不可以使用呀
我的QQ:15524227
 
如何能做到每1小时刷新一次呢,我是个新手,谢谢!!
注:不用定时器控件的情况下,因为我的软件没有窗口的!
 
没窗口,这不是不用定时器的理由
我可以用一个简单HTML页面实现,不过也是通过脚本实现的
 
怎么联系 朋友
我的QQ:15524227
 
我不是用上HTML,要在程序上实现啊!
 
你ip不变当然没效果了,如果计数器使用了ip识别,同一个ip多少时间刷新无效。现在的计数器基本有这个功能。
 
怎么 更换这个的代理服务器IP呀
 
[Error] Unit1.pas(33): Undeclared identifier: 'CreateOleObject'
不行啊,报错了
 
uses activex
 
procedure TForm1.btn1Click(Sender: TObject);
procedure OpenInIE(aURL: string);
//need uses ComObj;
var
IE : Variant;
begin
IE := CreateOleObject('InternetExplorer.Application');
IE.Visible := false;
IE.Navigate(aURL);
end;
begin
OpenInIE('www.delphibbs.com');
end;
 
顶部