关于$oHTTP.Open的问题

kaidashi

$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET","http://kds.zj.com")
$oHTTP.Send()
$HTMLSource = $oHTTP.Responsetext
MsgBox(0,'',$HTMLSource)
这是读取我网页的源代码，但是我的网页被关闭了，这个程序也无法运行了，中间出错，请问怎么解决。

[ 本帖最后由 kaidashi 于 2008-11-2 09:54 编辑 ]

sanhen

网页窗口关闭一样可以正常读取的。

而当网站打不开的时候才会出错，而这就需要加上出错处理了。
中文资料版我发过COM错误处理的大体办法。可以参考以下代码。

$oMyError = ObjEvent("AutoIt.Error","MyErrFunc")


$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$a=$oHTTP.Open("GET","http://kds.zj.com")
$oHTTP.Send()
$HTMLSource = $oHTTP.Responsetext
MsgBox(0,'',$HTMLSource)

Func MyErrFunc() 
   $HexNumber=hex($oMyError.number,8) 
   Msgbox(0,"","We intercepted a COM Error !" & @CRLF & _
                "Number is: " & $HexNumber & @CRLF & _
                "Windescription is: " & $oMyError.windescription ) 

   $_eventerror = 1
Endfunc

gto250

sanhen 能解决乱码问题吗？

kaidashi

谢谢老大，问题解决了，

316428696

好帖，刚好解决了我的问题！

316428696

bdrdc

网页窗口关闭一样可以正常读取的。

而当网站打不开的时候才会出错，而这就需要加上出错处理了。
中文资 ...
sanhen 发表于 2008-11-2 00:04

   这个非常管用，顶一顶！！