IE编程技巧大全

天云上人

1.实现Ctrl＋C:
) x9 F- I$ L- T7 ^% ?/ O
    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

( j. b# u7 }) j: G6 A, B6 A2 L( A  m2.实现Ctrl＋V:
* D. ~* H4 q5 G3 d5 ~: g! F
    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
! X5 o$ O  r2 z/ d. u
3.实现查找:
( r0 `1 o; D/ P7 I- q' J
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
! d4 F- T' j- F5 Z5 Fpdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
$ a+ q( `7 q+ mvarinput=_T("");
! O* h( W# T4 c5 i3 r; c: l( lhr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
0 l0 I4 H' q4 U7 |5 y1 r; p4 c9 g
/ j. v* ^* r: O2 v9 [; ^4.实现显示源程序:
5 J- d  t( `" E+ ?
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
2 W8 @8 s5 G  f7 |" w( U4 G1 s' N+ Q: ZIOleCommandTarget *pCmd;
HRESULT hr;
* W+ J: S) [4 g) |$ }" U3 Ypdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
, n6 Q) e4 U* {6 |/ Y# xvarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
* O0 x7 J8 w5 K% [+ a: f}

5.实现显示Internet选项:
8 h" z6 O1 X" H6 G
, @8 F) N+ }$ u4 ^6 J* J; rMSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
- D' X9 e2 f  sHRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
4 x0 c) J! Z" Mif(SUCCEEDED(hr))
+ h" p9 i: X" V* q  K{
  @' J3 H/ \$ d' Vvarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
5 U3 K5 U  ^2 X. {5 H8 z8 i, I
6.下载事件说明：
0 ^! {( @; M: D
2 k% A# ~9 E7 v+ h: C9 U% p7 OOnDownloadBegin <--开始下载
4 L! d/ [9 U' |' XOnDownloadComplete <--下载结束
8 ], F, J: {' f% @OnDocumentComplete <--页面下载完毕
- d/ F1 B& C2 O! [) I
对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

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

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

9 O1 ~; c! X2 E2 a  v7.点击链接产生的事件：

: m+ H7 s+ n+ A+ Z3 MOnBeforeNavigate2 <--开始链接时会触发此事件
! B: g9 k5 N% {' bOnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)

  L- ~, L  S* G# x/ a% w8 i
8.包括相关文件：
7 a; c, v4 U+ K' ^# J" N
#include <mshtmhst.h>
4 g: @& o1 w  D9 R#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
( I# u5 d  n' ~" S- {6 r* A#import <mshtml.tlb>

- B& i5 y  t$ c* ]请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
" f' J- `9 G2 R9 ]+ l" I* ?2 N
先告一个段落，下次再来。
4 t/ m: ~% [( Z6 Z
* @* a; d  v, Y: p: ~' m$ O黄森堂著