请问两个webbrowser控件的有关问题

请教两个webbrowser控件的问题
主要是如何判断网页加载完成的

1、有一个DocumentComplet事件
该事件在文档完全装载并已初始化时激发。
?语法
PROCEDURE DocumentComplet
  LPARAMETERS pDisp,URL
ENDPROC 
?
请问参数pDisp使何使用，书上说是webbrowser控件本身，但pDisp=webbrowser1不行

2、我用上面的DocumentComplet事件来判断网页加载完成
加载网页的程序一直在循环等待，DocumentComplet事件就一直响应不了，这种情况一般怎样解决。

谢谢各位

[解决办法]
当文档完全装载并已初始化时

DocumentComplet事件发生是对。在此事件加代码
?pdisp,url

当文档完全装载并已初始化时，显示
(Object) url(如果打开的是文档，显示文件路径+文件名)

[解决办法]

VBScript code

判断是否加载完成，这样就可以了：一个按钮的Click事件：Thisform.Tag=""Thisform.Olecontrol1.Navigate("www.126.com")Do While .T.    If !Empty(Thisform.Tag)        Exit    Endif    Inkey(0.1,"H")  &&防止程序失去响应EnddoMessagebox("加载完成",64,"信息提示")表单的Load事件加代码：_vfp.AutoYield=.F.  &&当表单包含 ActiveX 控件时，应将 AutoYield 属性设置为假(.F.),不处理未决的 Windows 事件表单的Unload事件加代码：_vfp.AutoYield=.T.Webbrowse控件（我这里为Olecontrol1）的DocumentComplet事件加代码：*** ActiveX Control Event ***Lparameters pdisp, urlThisform.Tag=url