X
xli711
Unregistered / Unconfirmed
GUEST, unregistred user!
我想用该函数判断一个网址是否有效,代码如下:
if InternetCheckConnection('http://www.163.com/', 1, 0) then
showmessage('ok')
else
showmessage('no');
end;
当填入的网址有效时,程序出错,提示了Kernel32.dll和Wininet.dll这两个系统文件;
当填入的网址无效时,如上面的网址改成'ldsfjlsjjslj'这种乱字符串,能显示出no对话框。
这样看来,该函数应该是“工作”了才对啊,可为什么输入的网址有效时程序却出错呢?!
(可参考我的另一贴,但情况可能更复杂,所以也可以不参考)
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1500755
这问题真烦人!!!请高手一定帮我忙!!!!!!!!!!
if InternetCheckConnection('http://www.163.com/', 1, 0) then
showmessage('ok')
else
showmessage('no');
end;
当填入的网址有效时,程序出错,提示了Kernel32.dll和Wininet.dll这两个系统文件;
当填入的网址无效时,如上面的网址改成'ldsfjlsjjslj'这种乱字符串,能显示出no对话框。
这样看来,该函数应该是“工作”了才对啊,可为什么输入的网址有效时程序却出错呢?!
(可参考我的另一贴,但情况可能更复杂,所以也可以不参考)
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1500755
这问题真烦人!!!请高手一定帮我忙!!!!!!!!!!