IE编程技巧大全

天云上人

1.实现Ctrl＋C:

    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
$ ?9 ?5 r1 Y( `0 }
2.实现Ctrl＋V:

    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

, @, n! S5 h0 L: N$ o6 m3.实现查找:
) ~2 r5 F/ z* [; x9 C# @
3 \8 J8 Y3 x; K& \MSHTML::IHTMLDocument2Ptr pdoc;
3 F+ N: H' I1 v* }_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
/ D2 h1 S- W3 e6 Bpdoc=GetHtmlDocument();
. x  E& F; w( ?2 a$ Z' Xhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
2 w/ m4 [! b6 }( W{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
0 f4 X+ Y+ d6 T$ }3 A; O% ?* A}
* Z6 [, n8 l. X8 [2 [0 G
4.实现显示源程序:
+ A6 Y: [% {) Y. o
3 d3 P0 T; ]' ^; fMSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
7 S* X$ S, ?+ P1 I2 Z+ n. Z# gif(SUCCEEDED(hr))
3 U- Q+ ?' ~" `* h  w{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}

5.实现显示Internet选项:
: e2 o" Q9 o; ~. j& L
MSHTML::IHTMLDocument2Ptr pdoc;
: Q' }$ H) w. P4 k_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
3 ~1 P1 n& H* J9 p6 r: tHRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
+ k4 y! ~! e5 w% l) avarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
( C8 k1 c9 D6 y! [) S& d
6.下载事件说明：

OnDownloadBegin <--开始下载
" E+ [* ]9 I* _6 ]# a' r' n$ H: K/ {OnDownloadComplete <--下载结束
( v* G' W8 F  u# bOnDocumentComplete <--页面下载完毕

9 }% N$ Y( A7 f8 i* ^对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

1 P* l) @% G8 D4 h) U5 E9 o1 E对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件.
) M  R2 k; ]: \5 B, \* v* P4 C
/ S9 a% K! m* C# Z$ R那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
- j- `5 o: \+ m0 L* {4 ?
8 a$ d, s  s* ~# q7.点击链接产生的事件：

OnBeforeNavigate2 <--开始链接时会触发此事件
- x, b; `- h7 R  \OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)
  A, }* f0 J# `+ [! K

8.包括相关文件：
' V6 R5 R6 G+ q
#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
#import <mshtml.tlb>
0 F5 h. l8 E1 {- p; {
2 n0 c7 H/ M( ]# @6 [& U5 @/ N& u' O请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
- k1 [+ }' J# N$ c" |1 q! Z& b
, k6 R! c$ P5 K* v8 o; |9 J, I( |3 Y* Y先告一个段落，下次再来。

& f% W* g+ D5 |. D黄森堂著