IE编程技巧大全

天云上人

1.实现Ctrl＋C:

    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

2.实现Ctrl＋V:
, t$ b, ]6 @3 Y0 K% a0 Z2 z' y
" Y) j+ s* R  i( P, b$ k4 q* d8 h. {    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
) v+ k/ x+ h/ p2 I* a# R
6 w  l7 x2 p+ J8 h' a! Z3 B3.实现查找:

& x+ I! x) v3 z1 {- {MSHTML::IHTMLDocument2Ptr pdoc;
, g3 h; ~: r* I_variant_t varinput,varoutput;
$ b8 T4 X5 v2 g- x' W  D6 FIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
: b3 P$ Q% o. p' D+ }2 j3 p{
1 L+ z2 I5 x# {: \varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
8 z' Z3 R3 v" C3 Z) N8 v
6 {: z( ^" g' O4 T! j8 X4.实现显示源程序:
4 M: t1 z  b# e6 d' T  W
! {  @- }% {' j: c) ~MSHTML::IHTMLDocument2Ptr pdoc;
, v3 b- F9 B9 O" {8 V_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
; q' L) Q7 R5 p" NHRESULT hr;
pdoc=GetHtmlDocument();
, C8 z# o( G" [+ z7 k' k0 \hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
4 _3 p& @8 i+ h  Q{
3 S0 [- B* I  F# Ivarinput=_T("");
" O9 L1 Y! r4 P, _  ?% ?hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
* c7 @. y* b- Q1 d" q0 t
8 r1 _- u7 {7 u  ]: O& i5.实现显示Internet选项:
7 n" u# N1 j9 @. P, _1 Z. F( v
  W3 B' }' T5 E# v  M( x% Y# X, LMSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
: m- r  h: C9 q! b) C1 iIOleCommandTarget *pCmd;
% }5 S" t/ y6 n2 eHRESULT hr;
( w* \7 ~5 A/ B. f) T6 Zpdoc=GetHtmlDocument();
8 W7 c2 e: }2 }6 d& R0 J# U5 Fhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
& w1 c0 I9 a% o
6.下载事件说明：

0 L, j+ e1 Q! ?8 fOnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
$ [& Z- P* {8 F/ VOnDocumentComplete <--页面下载完毕

# t" \) M: S9 }9 g& X5 S# }; M8 \对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件.
" i" S% j' _$ N* L3 s0 U4 w
那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
3 P* h# H! Y5 f: ]
7.点击链接产生的事件：

OnBeforeNavigate2 <--开始链接时会触发此事件
, h( H: T/ }* ~' t/ H. O  ?OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)


+ e: o+ C4 c9 \9 B8.包括相关文件：

! J) I; ~9 O: _* I#include <mshtmhst.h>
# i" d% H6 m8 B2 r: o* J#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
. E+ l+ x; r2 X. p/ ?4 s; r  D8 [8 {#import <mshtml.tlb>

请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
9 @* j, }4 O. l' i9 V0 l# W( T6 p$ G
先告一个段落，下次再来。

4 v* }9 E, n5 H黄森堂著