IE编程技巧大全

天云上人

1.实现Ctrl＋C:

    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
/ n, |& Q% O  ]8 J6 M( M- N
& [4 b' g$ w! I2.实现Ctrl＋V:
. y0 G" Z% Y7 k- \* q
    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

8 D; y& ~! Q1 r8 l- s6 g8 V! _. r3.实现查找:

+ f" d3 f* F. k7 LMSHTML::IHTMLDocument2Ptr pdoc;
! p0 S: G5 u" C8 _4 \_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
9 }7 k/ s2 u% _9 W* a  l8 d9 hHRESULT hr;
; N. I2 Z7 j" _5 o8 Y% ]. Ppdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
- x/ v" [% B2 p* B5 j' T! nif(SUCCEEDED(hr))
  ?" X& N2 e: }3 A5 S' R* f{
varinput=_T("");
# T$ U; A- m/ q; d+ d; bhr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
9 J' o# H) D" N! m* A! M1 N0 h}
7 \) t/ x% {/ j5 [$ Q. a
+ W) h; B- O  F( {, y' j% r4.实现显示源程序:
1 _$ q! l, h! J9 M! p2 ]0 _
MSHTML::IHTMLDocument2Ptr pdoc;
) j! N& v7 t  a/ @4 |: N_variant_t varinput,varoutput;
# i6 B8 s2 b! J" s" BIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
$ ^3 q) _- ?3 i{
4 V- b& i! @/ a; ]$ ~% Lvarinput=_T("");
9 ~* I+ d; p) T# T2 zhr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
7 X4 m8 ]& i2 |; ]}
; u: @% ?- M+ P
5.实现显示Internet选项:
/ G* r3 L# f0 P
* t$ t1 a9 |3 u1 k1 tMSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
6 \4 d6 l! c4 L: WIOleCommandTarget *pCmd;
( t  E7 ~/ o4 O: V7 OHRESULT hr;
4 n& M, n% L2 fpdoc=GetHtmlDocument();
/ p5 A! u5 u. m( C! h8 uhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
; Q3 i% L( \3 c% t{
varinput=_T("");
  ?) ^: P* [! j; ^hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}

; W8 M5 P9 U" L7 ^% R  \6.下载事件说明：

OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
" l& f, I$ D5 f; @9 o- ]8 dOnDocumentComplete <--页面下载完毕

+ W7 q1 n+ Q* v8 r; ^% m$ k! a0 ~对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件.

1 t5 |4 ]7 k3 Q$ J: x  n那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
6 B  q3 ]# n7 V: j  }
7.点击链接产生的事件：

OnBeforeNavigate2 <--开始链接时会触发此事件
; F" A/ G! p0 eOnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)

  h) o& j: d) Q/ e$ P/ w
8.包括相关文件：
4 D+ K- {' F/ _  S
) `) a+ e" @% i/ x0 [, ~3 A6 g( K#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
#import <mshtml.tlb>

, _. Y" r4 O. i0 d8 a* E9 T  @, l请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
9 {: ~# d9 Q/ R
; e5 g  B9 l2 X# a- R先告一个段落，下次再来。

! I0 C" P% |  Q- {黄森堂著