IE编程技巧大全

天云上人

1.实现Ctrl＋C:

( q$ m7 e  O2 h# m    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);
. W1 G- Y# y  ~' z$ m" Z
5 h3 h  `, T1 L* l2 H* i0 ~2.实现Ctrl＋V:

    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

3.实现查找:
/ O, ^1 v5 t- j' i( r4 u6 h7 m
0 T* W* j8 H, \MSHTML::IHTMLDocument2Ptr pdoc;
- j9 `/ M: S# k* j_variant_t varinput,varoutput;
/ S$ Q2 U4 W% w; @5 u/ r- I6 XIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
3 y9 r4 ^9 x1 z/ bif(SUCCEEDED(hr))
4 I0 I! v$ v0 Q- A: ?$ r2 |5 I{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
& r/ N1 Z+ k& J! `' s
% g' E% u+ y/ [) @7 Q! k4.实现显示源程序:

MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
! s5 ?8 ~) p, K7 \IOleCommandTarget *pCmd;
6 p" \8 U/ ?* B9 h( ~2 [& ~HRESULT hr;
pdoc=GetHtmlDocument();
2 l. O7 F, @1 [+ S% B  K6 K# c* rhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
; ~/ W+ D* ^- r{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
: x. S" U( j% y
" N* Y; l& t& `, U5.实现显示Internet选项:

MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
: F( E3 N% g: ^+ r; B$ D/ f) U2 HIOleCommandTarget *pCmd;
HRESULT hr;
$ C% Z! N! o; J" _' m$ \pdoc=GetHtmlDocument();
2 _( h' f" c0 |8 T& f1 }6 A- Qhr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
{
varinput=_T("");
8 h$ H7 K& x: }- V0 jhr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}
+ v$ J4 z* {  ^
6.下载事件说明：
' C6 _$ R) _9 J6 e' x
3 q/ x6 h8 r, H6 U& z+ JOnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
0 n: Z. b/ Z$ y8 FOnDocumentComplete <--页面下载完毕
6 z8 i; l$ w" e( Y
0 s0 z) x7 Z! Y" m* x对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

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

那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?
& V$ R4 c, w. H1 V+ K& W5 J
* z: }. M3 Y8 d- f. P7.点击链接产生的事件：

. i/ l$ A  u# j% @' L% O0 tOnBeforeNavigate2 <--开始链接时会触发此事件
OnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)


* ^! o: L: j; _9 G0 N8.包括相关文件：

# X9 i. u9 P% E! ]* u( l#include <mshtmhst.h>
6 ?. A7 e$ H3 n( D5 |#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
' R- `7 l& K7 J, u9 }#import <mshtml.tlb>
+ W+ c8 K7 Q1 R4 L2 B4 V
0 X1 ~1 b& Q3 x  v; R" ?请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
$ Y/ f6 A$ T3 b; a; A, `4 t
先告一个段落，下次再来。

黄森堂著