IE编程技巧大全

天云上人

1.实现Ctrl＋C:
! L0 g9 Z" X; ~3 i
9 b+ P0 b4 p6 U9 x8 B/ V    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
) N) H2 Z  N- j. S2 V$ J* z7 z
2.实现Ctrl＋V:

    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
. k9 J3 L0 O" @) f
3.实现查找:
0 W+ X) e. M0 R! Q/ G. N# C) E
MSHTML::IHTMLDocument2Ptr pdoc;
! J3 t" {6 ]( ^: Y% `) b! R, r0 F_variant_t varinput,varoutput;
( G4 S5 @$ z: b+ J* L! L7 RIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
: H' @2 x, S0 r7 d& G; d0 t- z6 i, yhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
: n" E7 Z  L6 z- K; C6 |' _8 Cvarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
; h( O/ r! N* {% @: Z  v& A0 E( P}

4.实现显示源程序:

MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
/ H+ y% q" Z2 k1 H1 kIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
5 V# O* L! x" a0 _7 s: t2 Dif(SUCCEEDED(hr))
3 `" N6 @3 y4 v; h$ s8 w$ C{
; F( u" ?* _* evarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}

5.实现显示Internet选项:
1 ]! v" M, i! {0 r9 ^' ?
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
2 `$ w% `) w2 ?2 tIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
$ H8 v: Z) {2 G' h1 B, W! c, vhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
4 [' h- v9 Y* |3 l% iif(SUCCEEDED(hr))
+ Q. ~# I7 G6 d$ v  r. G{
; @2 A9 ]) o; S9 ovarinput=_T("");
0 r3 T: G7 F% g% \$ Z0 p  Chr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
2 r# q, X: ]. ^& r+ O% ~) B! h( Z}

6.下载事件说明：
5 z3 \5 p. f/ r0 Z) i7 A8 e
OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
: k! P+ i, Q9 j1 C3 wOnDocumentComplete <--页面下载完毕

- o, H; o7 n( L6 x! x对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件.
) ~; V% `' Y% ?8 e2 l: E4 D2 t) U8 i8 k
那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?

1 q! {  o. {; x" u4 T4 c7.点击链接产生的事件：

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

5 D0 v( N7 M3 r, N
4 n' g3 c$ Q" T7 o" X8.包括相关文件：
* Q2 C) Q% D0 [! F
#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
/ U; ~" I; d$ P. ]- v#import <mshtml.tlb>

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

先告一个段落，下次再来。
0 H/ g9 f" h: H7 H9 J
* I, K2 A- L% ?+ O! q" _1 `1 f黄森堂著