禁止ie彈出alert視窗

void CXXXDlg::OnNavigateComplete2ExplorerIe(LPDISPATCH pDisp, VARIANT FAR* URL)
{
 CComQIPtr< IHTMLDocument2 > spDocument2;
 spDocument2 = m_ie.GetDocument();
 
 IHTMLWindow2   *pw;  
 spDocument2->get_parentWindow(&pw);
 if( pw == NULL )
  return;

 CComBSTR   bs1(L"window.alert=myalert;   function   myalert(u1){}");  
 CComBSTR   bs2(L"JScript");  
 VARIANT   v; 
 VariantInit(&v);  

 pw->execScript(bs1,   bs2,   &v);  
 VariantClear(&v);  

 ::SysFreeString(bs2);  
 ::SysFreeString(bs1);  
 pw->Release();
 
}