IE编程技巧大全

天云上人

1.实现Ctrl＋C:

    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
0 r! o. a  g: q1 {; W* O0 n2 t
2.实现Ctrl＋V:

/ A# u3 m7 j0 Z  j; q1 u  d5 p$ c' x    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

3.实现查找:

MSHTML::IHTMLDocument2Ptr pdoc;
+ U% F( h1 W. M  F_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
  Z* F+ d! `8 ], s. B& e5 ~8 W) ahr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
9 u3 _* C! G8 K. ^: w, p5 L, x{
varinput=_T("");
2 e/ y$ \  K( m: ihr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
/ r; p& c5 k) u) Y$ r% S9 s0 \}

4.实现显示源程序:
+ b* \1 v9 P6 p/ v! |* m
- U: l8 H+ y% N3 hMSHTML::IHTMLDocument2Ptr pdoc;
" t: u0 y: y0 W  x6 A_variant_t varinput,varoutput;
1 U, u+ B1 Y7 b9 MIOleCommandTarget *pCmd;
; X# ?" W3 k& ]0 A+ K4 i) [HRESULT hr;
; g( @" V& {* f3 \5 x1 }* }5 updoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
$ w; Z: _& F% A) u% ^  _if(SUCCEEDED(hr))
2 e* O$ W3 K; S- G0 R/ L{
varinput=_T("");
5 G( J* i, ^  x: P5 Zhr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
% t' Z* I/ p( V& B}

' H9 p' [, U% u( y5 [9 x% v# L5.实现显示Internet选项:

MSHTML::IHTMLDocument2Ptr pdoc;
9 ]7 M6 ?' y) [0 l& T_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
% M' f$ C; I" A* F* }- O- n# j# M' ~hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
+ Y4 o7 r: P- K) E$ w. pif(SUCCEEDED(hr))
{
9 i* z7 t7 F* K6 L9 ]$ g1 Z3 Tvarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
* v3 X; d5 [7 k% o% N% M$ L}
4 Z" ^6 \/ t! p8 S4 g1 S0 `* _1 ?
6.下载事件说明：

OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
OnDocumentComplete <--页面下载完毕

对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.
: K. G& a6 b3 e/ J* H
! P5 y  W7 ]8 E0 M7 B! ~  T& k对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件.

那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?

7.点击链接产生的事件：

OnBeforeNavigate2 <--开始链接时会触发此事件
OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)


7 a; Y- {- ^; E8 t" C9 a5 @8.包括相关文件：

1 z1 [& i0 s6 @#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
$ m, Y6 C/ f; |. t9 p#import <mshtml.tlb>

请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！

先告一个段落，下次再来。

黄森堂著