IE编程技巧大全

天云上人

1.实现Ctrl＋C:
/ t1 i6 A6 I6 b, t0 j+ U4 n
    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

2.实现Ctrl＋V:

8 w5 A: w, T$ s5 S    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
8 Y0 k% N9 g6 U2 i* g
3.实现查找:
5 f5 |! o' f7 V- U: f& T$ e! x$ |
* J, T. h! A3 G5 C6 m6 |MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
/ `7 G+ W2 ]& M; r, K: RIOleCommandTarget *pCmd;
. V' K* b3 i( bHRESULT hr;
* P; L, @& P# {$ o/ i5 E+ |) Spdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
1 U. E+ C2 p- [+ _4 L4 [if(SUCCEEDED(hr))
{
; ?' Z/ g0 J8 k5 ovarinput=_T("");
* f# f( h1 j3 Y9 o, S7 j' shr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
3 {" L/ U% G  d}

4.实现显示源程序:
* Q+ a5 K# {0 t1 R
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
2 D7 m* y9 L5 K5 r" C; t6 MHRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
$ O$ Z4 R, {5 sif(SUCCEEDED(hr))
$ B# s; O: }& h; g, }{
* @9 L8 w6 |1 U* t1 F+ ?varinput=_T("");
2 p% a1 |* x( O0 M0 J( Xhr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
' O+ ^9 C7 v/ H0 c0 [2 y$ E+ @}

$ ^6 l: r. X! K- ^5 F- s- {5.实现显示Internet选项:
" v2 G5 [0 a+ {% Z* @* M
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
IOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
8 F$ S6 e& z% ]4 B) E# Bif(SUCCEEDED(hr))
{
, ]' H# q1 Y9 H" u/ L" R' h. ]varinput=_T("");
" z' S$ {4 |+ q& o$ \7 ?3 d, Ehr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
( V9 M' n, B1 u
! B& R' z2 [1 z: \6.下载事件说明：

OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
2 w2 i$ U! ^) }& s7 I. ]$ D2 L# WOnDocumentComplete <--页面下载完毕

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

  _: |, X. g. |对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件.
2 w( U  V: S) ~+ {5 g# _
那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
- p5 f3 h# t5 D6 P7 E0 p" z
7.点击链接产生的事件：

0 H) {( E5 u% P0 h3 }OnBeforeNavigate2 <--开始链接时会触发此事件
OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)

2 p6 Q2 {9 m1 L
9 b8 w) O; `/ l2 S9 W8.包括相关文件：

0 d2 s: _4 s" L4 W$ H#include <mshtmhst.h>
#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
9 L7 C  N# J& b% U" n#import <mshtml.tlb>

' _( `0 K- Y0 [7 I请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！

+ @! Y2 u0 z  T" n; v' T$ Z先告一个段落，下次再来。

: G2 h3 r3 c/ k黄森堂著