IE编程技巧大全

天云上人

1.实现Ctrl＋C:
& M: g' E# z1 j$ G; ~" ?: A- j, \
3 x' H( q1 ]3 E1 {( \    ExecWB(OLECMDID_COPY,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

. H8 C3 p! N* }* s& a* {2.实现Ctrl＋V:

    ExecWB(OLECMDID_PASTE,OLECMDEXECOPT_DONTPROMPTUSER,NULL,NULL);

' L, d% {: O9 L0 P3.实现查找:
. B- c/ B5 H9 c% E% H
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
4 I, e  |1 O! _: AIOleCommandTarget *pCmd;
% V0 e7 v1 Y% VHRESULT hr;
pdoc=GetHtmlDocument();
0 K8 {8 t4 {0 O% ihr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
3 Y4 ?- }- T" [# s" G0 ?{
5 Z, L5 g2 k6 s9 A& k8 r9 Dvarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_FIND,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
" j" J* }- M6 c2 s0 _}
# [7 [8 ]7 W; w" [
' y: Q& ~' ?: |% I4.实现显示源程序:
: F" d5 L% ?* |: P% @
MSHTML::IHTMLDocument2Ptr pdoc;
_variant_t varinput,varoutput;
* N* X' @4 J6 H( E  zIOleCommandTarget *pCmd;
HRESULT hr;
5 J. L* H: E) d- @% spdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
if(SUCCEEDED(hr))
. j/ {9 [& J2 B& d9 I{
2 A$ E% }% D, nvarinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_VIEWSOURCE,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
}

5.实现显示Internet选项:

MSHTML::IHTMLDocument2Ptr pdoc;
. b3 Z  y) T2 [/ ]2 f+ B6 H  h/ w_variant_t varinput,varoutput;
+ i1 a2 [+ _* p, F9 Q, v- VIOleCommandTarget *pCmd;
HRESULT hr;
pdoc=GetHtmlDocument();
hr=pdoc.QueryInterface(IID_IOleCommandTarget,&pCmd);
1 [) p. M8 `0 O& W$ Q+ [if(SUCCEEDED(hr))
" l8 `1 W# z* E. A0 ?* `{
varinput=_T("");
hr=pCmd->Exec(&CGID_MSHTML,IDM_OPTIONS,OLECMDEXECOPT_DODEFAULT,&varinput,&varoutput);
- W1 l/ g1 r2 y" H}
1 |$ V# w4 n2 K' V, X4 e1 N! w7 u
& k/ t2 V* f8 x7 X1 b$ Y6.下载事件说明：
2 E* s% V( [! C$ W  H" b
OnDownloadBegin <--开始下载
3 X# Q6 j9 ~, G1 R2 c& c) nOnDownloadComplete <--下载结束
) i, C! M- Q6 C! X& fOnDocumentComplete <--页面下载完毕

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

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

那我们怎么判断是否全部下载完毕呢?嘿嘿,TWebBrowser控件不是有一个Busy属性的吗?

2 W$ C6 p4 E' {2 w7 `% D3 _, E7.点击链接产生的事件：
. ^5 W5 r0 P/ c
OnBeforeNavigate2 <--开始链接时会触发此事件
* T5 N5 U$ ~5 i. ~$ l* t7 cOnNavigateComplete2 <--成功的链接到此网页(以后才会有上面的事件)


8.包括相关文件：
5 [8 {* k) i4 X+ q) i
#include <mshtmhst.h>
0 {* w, R0 F) R! E. B- [! t/ _/ A#include <mshtmcid.h>//这里面有很多实现IE功能的XXID，请看一看！
#import <mshtml.tlb>
. Y1 ~" v+ K3 O9 u
请充分发挥资料管理器的查找功能呀！，这都不会用还学VC！
- l0 c5 F: z6 h) |* [# U1 a, s
先告一个段落，下次再来。

# d% {0 l7 o# N* T; Q6 N黄森堂著