IE编程技巧大全

天云上人

1.实现Ctrl＋C:
( i8 I' c2 ^0 m& g1 Q+ ~
1 p. U/ ?+ v/ Q( T    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
- I( U, K# N" g
2.实现Ctrl＋V:
) ?" y0 f0 t6 e4 b  J
% h! b& d* B/ ~$ y    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

+ x% l9 {! w- |3.实现查找:
+ @. `7 {9 q- @
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
4 h( u$ Q$ p# G) j: J% W1 Q. Q8 tpdoc=GetHtmlDocument();
0 {, W0 C$ i" E( p. Y- `1 j, y9 Mhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
+ ]) j  @! ^* }/ Nif(SUCCEEDED(hr))
2 u2 o, j, D9 ?# D- P{
varinput=_T("");
: h/ F' f- k) ?" T, H8 L( phr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
* v" A! {- Q8 m5 F# t1 ?% u}

! Z/ v( E8 b5 p. ?* m8 S* q# r2 ^. h4.实现显示源程序:
1 @: E! A5 _' ^2 X
: }- x2 ~( l2 f% T- kMSHTML::IHTMLDocument2Ptr pdoc;
1 f, N- x6 f7 X. ]6 d) i_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
% {7 u% |( ^& t6 J( k+ Z$ |4 B$ V; _HRESULT hr;
/ {; P* _' P0 u9 Apdoc=GetHtmlDocument();
  _2 A+ {. S0 I/ E( Ahr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
$ b7 o- w+ }9 a" q9 a' s) r3 r* Hvarinput=_T("");
' [; b' p+ J" _% K7 \hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
. b' i1 o0 H: o}

5.实现显示Internet选项:

; E& _4 I. s& X! N0 B: ~; {5 w3 j4 VMSHTML::IHTMLDocument2Ptr pdoc;
8 J8 I- _- ?' r( y, {_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
' N8 A6 z0 L$ c" Q+ q: ?1 ~/ Qpdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
- i/ j+ |' c# r& ?{
varinput=_T("");
& F% v# h  }7 yhr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}

6.下载事件说明：

OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
OnDocumentComplete <--页面下载完毕
( N! a2 w9 ]) }
对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

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

那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
5 Q; @8 k" W7 e* r
  t& V( ]. R6 v# q) V% |. o/ Q  S7.点击链接产生的事件：

0 v6 Y  T3 F2 X; t( J0 |: GOnBeforeNavigate2 <--开始链接时会触发此事件
OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)

" |! c9 ~0 P: m3 A: G! Q. f1 H5 X
/ @% ]& `  |; |/ e) p& S$ @5 i8.包括相关文件：
% T% g; r5 w" f) s2 ]6 U! V
#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
4 [3 a5 W7 N. u) _#import <mshtml.tlb>

' d+ }) {8 I) ^3 J& p请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
0 r. k- T7 o0 D0 b2 d' n2 s
先告一个段落，下次再来。
; m2 t2 Z* X$ n
黄森堂著