VC调用javascript的几种方法(推荐)
第一种:通过execScript调用。这种方法,虽然操作方便,但不能获取返回值。
m_spHtmlDoc->get_parentWindow(&m_pHtmlWindow); VARIANTret; ret.vt=VT_EMPTY; BSTRbstr=sScript.AllocSysString(); bRet=m_pHtmlWindow->execScript(bstr,L"javascript",&ret); ::SysFreeString(bstr); sRet=CString(ret);
第二种:先用GetIDsOfNames找到这个脚本函数名称,然后再调用。这种方法可以返回结果,有返回值。但是无法调用js的系统函数,如eval。
BOOLCDhtmlDlgWindow::CallJScript(constCStringstrFunc,constCStringArray¶mArray,CComVariant*pVarResult)
{
CComPtrspScript;
if(NULL==m_spHtmlDoc)
{
returnFALSE;
}
HRESULThr;
hr=m_spHtmlDoc->get_Script(&spScript);
if(!SUCCEEDED(hr))
{
returnFALSE;
}
CComBSTRbstrMember(strFunc);
DISPIDdispid=NULL;
hr=spScript->GetIDsOfNames(IID_NULL,&bstrMember,1,
LOCALE_SYSTEM_DEFAULT,&dispid);
if(FAILED(hr))
{
returnFALSE;
}
constintarraySize=paramArray.GetSize();
DISPPARAMSdispparams;
memset(&dispparams,0,sizeofdispparams);
dispparams.cArgs=arraySize;
dispparams.rgvarg=newVARIANT[dispparams.cArgs];
for(inti=0;i<arraySize;i++)
{
CComBSTRbstr=paramArray.GetAt(arraySize-1-i);//backreading
bstr.CopyTo(&dispparams.rgvarg[i].bstrVal);
dispparams.rgvarg[i].vt=VT_BSTR;
}
dispparams.cNamedArgs=0;
EXCEPINFOexcepInfo;
memset(&excepInfo,0,sizeofexcepInfo);
CComVariantvaResult;
UINTnArgErr=(UINT)-1;//initializetoinvalidarg
hr=spScript->Invoke(dispid,IID_NULL,0,
DISPATCH_METHOD,&dispparams,&vaResult,&excepInfo,&nArgErr);
delete[]dispparams.rgvarg;
if(FAILED(hr))
{
returnFALSE;
}
*pVarResult=vaResult;
returnTRUE;
}
实际使用时,可能是先访问(Navigate)了一个页面。然后,在VC里面对这个页面进行一些js调用,并取回结果。有可能这个js调用的函数是这个页面里面没有的。一般可以用eval(一些js语句)这样的形式来调用页面里面没有的函数,但是,现在上面两种方法都不支持eval。
第三种:通过IScriptControl获取当前文档上下文,然后调用IScriptControl::raw_Eval运算。(只能用raw_Eval,用Eval方法会提示没有权限。)
首先定义一个:IScriptControlPtr,然后在OnDocumentComplete里面调用一下m_spHtmlDoc->get_parentWindow(&m_pHtmlWindow);
IScriptControlPtr->AddObject("window",m_pHtmlWindow,VARIANT_TRUE);
第三种需要import"msscript.ocx"
以上这篇VC调用javascript的几种方法(推荐)就是小编分享给大家的全部内容了,希望能给大家一个参考,也希望大家多多支持毛票票。