运用COM技术—实现HTML对话框

《运用COM技术—实现HTML对话框》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、COM技术是现在时下最热门的技术2—，经常被使用在网络编程中。它可以被用户Server端，也可以被下载到用户端。下面介绍一种方法，可以在用户端打开一个HTML对话框。读者可以通过下而的例子学习COM的使用。在安装了IE4或IE5后,将会系统目录(windowssystem)T安装一个叫MSHTML.DLL的文件。这个动态链接库的引出函数中ShowHTMLDialog来显示一个HT也对话框。但是这个函数需要一些COM要索。下面这个类是对幣个功能的封装。(如果读者冇兴趣的话，可以使用VisualStudio6.0中带的Depend来观

2、察MSHTML的引入函数，其中还有模式和非模式的区别，可以尝试使用。)classCIItmlDialog{public:voidSetDlgOptions(LPCTSTRIpszOptions);voidSetSize(intx,inty);LPCVARIANTGetReturnVariant();CStringGetReturnString();voidSetParam(LPCTSTRIpszArgs);voidSetParam(VARIANT*pvarArgs);virtualintDoModal();CHtmlDialog(L

3、PCTSTRIpszURL,BOOLbRes=FALSE,CWnd*pParent=NULL);CHtmlDialog(UINTnResID,CWnd*pParent二NULL);CHtmlDialog();virtual~CIItmlDialog();privabzinlinevoidResourceToURL(LPCTSTRIpszURLvoidcomnlonconstruct?protected-HWNDm—hwndpdrenucsqingIn—stropbions【COleVariantmvarArgymvarReturrn

4、CStringmstrUR匚HINSTANCEshlnstMSHTMrr二C于mlDialog淋3將曙卅丰.c=tmlDialog二c=(-t-mlDialog()亠TRACEO(、、warning-Initializationmaynorbedone-NonFunctionalconbructor)c--tE-)ialog二〜C一-bEDiaogo-TlnN-OPUMHcaps一09〈l4u0Jpdd(>•-u畧^ddnPUOJmdpuMq—E(、*TmN2>u①Idd关PUMOQIS①=uJAIew)OI.22E=o二MOI.2

5、SEW-CIWJLHSWSUIq—lu)A・IeIq22£dHHP.IEqsw^诞、、二HBzsdl)9口o■①pulos龙(S售).H-TmN-()pumhc2es409〈i】u①.wddo---lKU£dHAUOJPdpuMq—w(、*nnNH*>u£pdd关PUM。"S①壬、ooq"、2_」zsdl三匕0士)"01.2(二§二工弘01.2(二§一0亠-()lonjpsuoouossoo-(dE①乜玄」8」0■①OJnos①工二CIISgcLP’r二EUUO匚dwtselsemstrURL二IpszURL;CommonConst

6、ruct();}intCHtmlDialog::DoModal(){//FirstgettheprocShowllTMLDialogSHOWIITMLDIALOGFN*pfnShowIITMLDialog;pfnShowHTMLDialog=(SHOWHTMLDIALOGFN*)GetProcAddress(m_hInstMSHTML,TEXT(，zShowHTMLDialog，z));if(!pfnShowHTMLDialog)return-1;//NowcreateaURLMonikerIMoniker*pmk=NULL;BST

7、RbstrURL=m_strURL.AllocSysStringO;CreateURLMoniker(NULL,bstrURL,&pmk);if(!pmk)return-1;TCHAR*pchOptions二m_strOptions.IsEmptyO?NULL:m_strOptions.GetBuffer(O);//NowshowtheHTMLDialogpchOptions,HRESULThr二(*pfnShowlITMLDialog)(mhWndParent,pmk,mvarArgs,mvarReturn);if(FAILED(

8、hr))0return-1;return0;}voidCIItmlDialog::CommonConstruct(){m_hInstMSHTML=::LoadLibrary(TEXT(Z/MSHTML.DLL"))；}inlinevo