IWebBrowser2 get_Document错误

第一个问题：
IDispatch * iebrowserdisp；
IWebBrowser2 * mainbrowser;
READYSTATE eReadyState;
while(TRUE)
{
   hr = mainbrowser->get_ReadyState(&eReadyState);
   if (SUCCEEDED(hr))
   {
if (eReadyState == READYSTATE_COMPLETE)
{
   break;
        }
   }
   Sleep(2);
}
hr= mainbrowser->get_Document(&iebrowserdisp);
hr返回[-2147467259]表示什么？何种原因引起，怎么解决？ 麻烦个位大神们帮帮忙
第二个问题就是IHTMLWindow2 execScript VBScript脚本时间太长，超过30秒，为何？。