分享
 
 
 

FAQ: 如何动态创建并访问网页元素

王朝html/css/js·作者佚名  2006-11-20
窄屏简体版  字體: |||超大  

问========================================

你好:

在你的博客上看到了一些关于操作Internet Explorer的代码,有个问题请教

目的:在html页面中创建一个控件,程序动态创建。

我已经获得要创建页面的IHTMLDocument2指针,看msdn提示使用createElement函数调用后能够创建以及设置属性,创建为一个element我如何把它设置为一个对象或者applet对象或一个embed对象

我调用原有页面上的控件发现为一个applet对象,以下为动态创建的函数:

void InsertElement(IHTMLDocument2 * pIHTMLDocument2 )

{

HRESULT hr;

IHTMLElement *pHtmlElement = NULL;

CComBSTR bstrTitle = L"applet";

pIHTMLDocument2->createElement(bstrTitle, &pHtmlElement);

//创建后不知道如何设置成一个applet的对象或者embed对象

VARIANT vRet;

VariantInit(&vRet);

CComBSTR bstrClassID = L"classid";

vRet.bstrVal = L"clsid:75B6E755-01FB-46C0-BA16-27350A1855B1";

vRet.vt = VT_BSTR;

hr = pHtmlElement->setAttribute(bstrClassID, vRet);

if ( FAILED( hr ) )

{

cout << _T("setAttribute错误") << endl;

return;

}

CComBSTR bstrID = L"id";

vRet.bstrVal = L"myocx1";

vRet.vt = VT_BSTR;

hr = pHtmlElement-> setAttribute (bstrID, vRet);

if ( FAILED( hr ) )

{

cout << _T("setAttribute错误") << endl;

return;

}

CComBSTR bstrName = L"name";

vRet.bstrVal = L"myocx1";

hr = pHtmlElement-> setAttribute (bstrName, vRet);

if ( FAILED( hr ) )

{

cout << _T("setAttribute错误") << endl;

return;

}

//如果创建applet对象,是否需要其他的属性或者设置,其他方法????

。。。

}

答========================================

创建Element之后,应通过IHTMLDOMNode::insertBefore或IHTMLDOMNode::appendChild把元素添加到DOM树中去,所以代码本来应该是这样的:

LPDISPATCH lpDisp = GetHtmlDocument();

if (lpDisp)

...{

CComQIPtr<IHTMLDocument2, &IID_IHTMLDocument2> spDoc(lpDisp);

if ( spDoc )

...{

CComPtr<IHTMLElement> spElem;

HRESULT hr = spDoc->createElement(L"applet", &spElem);

if ( FAILED(hr) || !spElem )

return;

CComPtr<IHTMLElement> pBodyElem;

hr = spDoc->get_body(&pBodyElem);

if ( FAILED(hr) || !pBodyElem )

return;

CComPtr<IHTMLDOMNode> pBodyNode(pBodyElem);

if ( !pBodyNode )

return;

CComPtr<IHTMLDOMNode> pNewChild(pElem);

CComPtr<IHTMLDOMNode> pRefChild;

hr = pBodyNode->appendChild(pNewChild, &pRefChild);

if ( FAILED(hr) || !pRefChild )

return;

CComQIPtr<IHTMLObjectElement, &IID_IHTMLObjectElement> pObj(pRefChild);

if ( pObj )

...{

//修改属性等等

}

}

}

但试验下来最后一步总是不能成功,从pRefChild得不到pObj,尽管类似的代码用脚本实现没有什么问题:

<HTML>

<HEAD>

<SCRIPT>...

function createRadioButton()...{

// Create radio button object with value="First Choice" and then insert

// this element into the document hierarchy.

var newRadioButton = document.createElement("<INPUT TYPE='RADIO' NAME='RADIOTEST' VALUE='First Choice'>")

document.body.insertBefore(newRadioButton);

// Create radio button object with value="Second Choice" and then insert

// this element into the document hierarchy.

newRadioButton = document.createElement("<INPUT TYPE='RADIO' NAME='RADIOTEST' VALUE='Second Choice'>")

document.body.insertBefore(newRadioButton);

}

</SCRIPT>

</HEAD>

<BODY>

<INPUT TYPE="BUTTON" ONCLICK="createRadioButton()" VALUE="Create two Radio Buttons"><

BR>

<INPUT TYPE="BUTTON" ONCLICK="alert ( document.body.outerHTML )" VALUE="Click here to see HTML">

<BODY>

</HTML>

看来我们只能用另外一种办法了——insertAdjacentHTML,如下:

LPDISPATCH lpDisp = GetHtmlDocument();

if (lpDisp)

...{

CComQIPtr<IHTMLDocument2, &IID_IHTMLDocument2> spDoc(lpDisp);

if ( spDoc )

...{

CComPtr<IHTMLElement> spBodyElem;

HRESULT hr = spDoc->get_body(&spBodyElem);

if ( FAILED(hr) || !spBodyElem )

return;

//我们先创建网页元素,注意给一个ID

hr = spBodyElem->insertAdjacentHTML(L"beforeEnd", L"<applet code='RainbowText.class' ID='my applet' width='297' height='48' codebase='class/' name='rainbowText'><param name='TEXT' value='test' ></applet>");

if ( FAILED(hr) )

return;

//再通过IHTMLDocument3来访问它

CComQIPtr<IHTMLDocument3, &IID_IHTMLDocument3> spDoc3(lpDisp);

if ( !spDoc3 )

return;

CComQIPtr<IHTMLElement> spElemTemp;

hr = spDoc3->getElementById(L"my applet", &spElemTemp);

if ( FAILED(hr) || !spElemTemp)

return;

//把Applet作为IHTMLObjectElement来处理

CComQIPtr<IHTMLObjectElement, &IID_IHTMLObjectElement> pApplet(spElemTemp);

if ( pApplet )

...{

//这样就行了

}

}

}

能抓到老鼠就是好猫:)

参考文献:

MSDN createElement Method

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有