VC中利用webbrowser执行自定义JS函数

原创 2012年03月27日 11:49:08

        转载请注明文章出处与作者信息。

       最近查找了很多资料来执行自定义的JS函数,例如:function TC(){var t=document.title;return t;} 。 网上搜索的资料有蛮多,但是一直没能很快的完成。花了2天时间,终于完成了。特发博记忆与分享下。

        1、首先在源文件里 加入导入库和空间声明:

             

#import "C:\\windows\\system32\\msscript.ocx"
using namespace MSScriptControl;



        2、在程序启动时 初始化COM组件,退出时 释放COM组件:

              

//////初始化COM组件
 CoInitialize(NULL);


////释放COM
 CoUninitialize();


         3、主要的实现代码。

        HRESULT hr;
	IScriptControlPtr pScriptControl(__uuidof(ScriptControl));
	LPSAFEARRAY psa;
	SAFEARRAYBOUND rgsabound[]       = { 1, 0 }; // 1 elements, 0-based
	int i;
	psa = SafeArrayCreate(VT_VARIANT, 1, rgsabound);
	if (!psa)
	{
		return ;
	}
	VARIANT vFlavors[1];
	for (i = 0; i < 1; i++)
	{
		VariantInit(&vFlavors[i]);
		V_VT(&vFlavors[i]) = VT_BSTR;
	}
	V_BSTR(&vFlavors[0]) = SysAllocString(L"TC_P");
	long lZero = 0;
	hr = SafeArrayPutElement(psa, &lZero,&vFlavors[0]);
	for(i=0;i<1;i++)
	{
		SysFreeString(vFlavors[i].bstrVal);
	}
	pScriptControl->Language = "JScript";
	pScriptControl->AllowUI = TRUE;
	_bstr_t exp = L"function TC(){var t=document.title;return t;}";
	pScriptControl->AddCode(exp);

	IHTMLDocument2   *objDocument1=NULL;
	IHTMLWindow2* pIHTMLWindow1 = NULL;
	objDocument1=(IHTMLDocument2 *)pBrowser.get_Document();
	if(objDocument1)
	{
		objDocument1->get_parentWindow(&pIHTMLWindow1);
		pScriptControl->AddObject("window", pIHTMLWindow1, VARIANT_TRUE);  //这几句代码很重要,没有的话,执行会报错。
	}
	_variant_t outpar = pScriptControl->Run("TC", &psa);   //outpar是js函数执行后的返回值
	// DWORD err = ::GetLastError();
	_bstr_t bstrReturn = (_bstr_t)outpar.bstrVal;
	char *pResult = (char *)bstrReturn;
	SafeArrayDestroy(psa);
	return ;

上面代码是综合了网上很多盆友的思路和代码编写而成。感谢互联网与大鸟们的分享精神!

版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

WebBrowser-Javascript与C++互操作

原文链接: http://www.congci.com/item/webbrowserjavascriptcpp   WebBrowser控件是Microsoft提供的一个用于网页浏览的客户端控件...
  • dylgsy
  • dylgsy
  • 2012-04-05 11:09
  • 3195

vc++加载透明png图片方法——GDI+和CImage两种

先看看GDI+的方法 方法1: 1.GDI+画透明图层(alpha)的png图片 stdafx加入如下: #include //初始化一下com口 #include...

(转)CImage显示透明背景的PNG图片

PNG透明背景显示之路    在VC7.1中 MFC图形处理类里有一个强大的成员---CImage,这个类提供了从外部磁盘中调入一个JPEG、GIF、BMP和PNG格式的图像文件加以显示,而且这...

CImage 加载透明PNG图片

CImage m_img; void LoadImage(); void SetAlphaBits(); void CceshipngView::LoadImage() ...

VC与JavaScript交互(二) ———— 调用JS函数

VC调用无参JS函数 VC调用有参JS函数 VC传递数据给JS函数 JS函数返回一个值给VC JS函数返回多个值给VC

VC与JavaScript交互(一) ———— 如何实现

为什么要让VC与JavaScript交互? 在Windows平台上用VC开发的程序,如何与JavaScript交互? 关于WebBrowser: 关于IDispatch: 说了这么多COM对象,和VC...

VC 中使用 WebBrowser 控件时自定义 User-Agent 的方法

本文介绍了VC 中使用 WebBrowser 控件时自定义 User-Agent 的方法。

Winform WebBrowser自定义方法供js调用总结

最近在做一个Winform上的东西,作为一个大多数时间都在写Web程序的人来说,做这个肯定会想到要结合Web程序来做嘛,所以这个时候就会涉及到Winform里面的控件WebBrowser了,所以这篇B...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)