webbrower问题. ( 积分: 50 )

  • 主题发起人 主题发起人 lx378
  • 开始时间 开始时间
L

lx378

Unregistered / Unconfirmed
GUEST, unregistred user!
用webbrower,如何判断网页是否存在
 
用webbrower,如何判断网页是否存在
 
把这个网页放在主程序同一目录下,直接用fileexists(网页文件名)就行了,如果在返回true,不在返回false.
 
我指的是internet 上的网页
 
try
webbrower1.avigate(网址);
except
showmessage('该页不存在')
 
cainiaowang:应该是webbrower1.navigate(网址)吧 ,没有用.
 
你得返回值不得了?

webbrower1.navigate(网址)吧,这个怎么会没有用呢?
得到网页返回值后,就可以看是不是有没有啊。如果没有的话。IIS会有相关的提示的。
403好象是没有找到吧。
 
问题我自己解决了
用indy
function TForm1.webexists(s:string):boolean;
begin
result:=false;
try
IdHTTP1.Head(s);
if pos('200 OK', IdHTTP1.Response.ResponseText)<> -1
then result:=true;
except
end;
end;
 
lx378这个方法是不错。^^
 
好像有个internetconnection的函数判断
 
光判断200不够, 还要判断206(好象)~~~, 这个也是正确的
 
多人接受答案了。
 
后退
顶部