IE编程技巧大全

天云上人

1.实现Ctrl＋C:

4 `- i' z# ?# x+ I1 E) ^' C% b    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
5 a* [1 {: ?1 T, L
& D' M$ y" i1 A5 h5 q  E0 J! a5 ]. P2.实现Ctrl＋V:

- q9 ]% N7 L5 ?5 O    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
1 P4 C* N7 s5 y, m; o
3 v' D+ r8 W2 {4 N% A3.实现查找:
* y+ k( B- ?. S* ?! }: y
3 u7 o/ [7 {- L+ x' _" ~MSHTML::IHTMLDocument2Ptr pdoc;
$ `" R9 F( z' B_variant_t varinput,varoutput;
( d- N0 x+ K$ D8 J" qIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
9 a! a$ G' n) `hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
" x! b) N" w* |  K( B% |- yif(SUCCEEDED(hr))
+ z, n. I- Z* ?: O; B{
0 x) f' E1 U5 K, Uvarinput=_T("");
; j! |! Q5 {7 z4 L6 Thr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}

4.实现显示源程序:

' V4 M: E+ w) i% p  GMSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
. n, u% o6 u" u6 H" GIOleCommandTarget *pCmd;
; w1 @; a) U  o* F$ {& w' RHRESULT hr;
pdoc=GetHtmlDocument();
. k1 L1 D* G6 m0 E2 _hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
' S! y2 h* O$ Z; l1 z" ]. _if(SUCCEEDED(hr))
{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
! b+ h7 H- X( B. r, a
5.实现显示Internet选项:
4 u6 \2 Q! i* s7 e  ], k2 \
- @* _% A: L/ L1 K) ?5 {MSHTML::IHTMLDocument2Ptr pdoc;
$ O8 c5 l" g  R) v  X_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
+ E  c' E* Z0 @2 B0 [  x! b* S  R( UHRESULT hr;
pdoc=GetHtmlDocument();
" ^: d5 u( J/ j: e9 G, Vhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
9 b& f) f1 ]0 C5 e& w' X{
5 s2 g; {5 W/ R1 L, tvarinput=_T("");
: w% B+ W" \. T& }hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
3 ~# s% N7 k4 P
6.下载事件说明：

OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
  S  O& i  J3 n1 r! s* gOnDocumentComplete <--页面下载完毕
6 F8 V* w0 \" e8 c& J, ^
+ S( @- Y, m6 Q0 H6 R5 o& Y# H! Q* c- B& `对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

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

那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
" l( b3 s  e3 I# o/ Y( o! A
7.点击链接产生的事件：

5 ?7 G; U$ K6 ^% b2 TOnBeforeNavigate2 <--开始链接时会触发此事件
OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)
: L7 o, N! U1 a2 I+ _
. ?* C$ |# {4 w1 J, d- a2 N
% O7 W" X3 f; [, E" S3 j9 t8.包括相关文件：
& ?# W- x( R- I. ?
: x3 C# y2 [. p5 {#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
#import <mshtml.tlb>

6 P% j" _! S3 t% H请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
" h1 G- m0 C3 [; B
$ r9 ^$ L( u5 _* z" g先告一个段落，下次再来。
5 `) P: o5 P3 B5 \' n- w1 Y8 `
% H9 y" o3 N, W# ~  `黄森堂著