|
|
在VC中使用WebBrowser控件的两方法
- I: t* `) t$ \' u% |, ~8 x* B* W
3 ~' `2 F$ K1 u- M1 j+ j, J % m; N) j' G3 Q4 f: _8 _- K
在VC中使用WebBrowser控件的两方法
' b, _. V/ C% ?3 M# P黄森堂(vcmfc)著
2 a0 `9 x( u4 z& x5 ?1 c4 L) ~* f! c( y2 J1 u! {
ClassWizard方式:
2 G0 S6 o8 ? d# [3 Z1 F: x$ ?3 A5 F4 j7 U* w- ^- B
1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK, q" U3 \1 w" M' V
2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)8 k/ a4 n7 w. R' E, d6 {
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码: x. O s: B' c7 @& C
m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";9 a7 r& H: R8 u0 ~6 S
4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:
' e: h4 v) O7 W& S m_internetexplorer.CreateDispatch();! }) \# H6 h% U1 C
5.在程序中指定URL地址后进行打开WEB页,如下代码:
! D6 H: V! R5 z# [1 t VARIANT vInfo;0 U: v- e/ B4 ]+ B1 u. x
vInfo.vt=VT_EMPTY;
" A4 s' R& w4 A% M: y0 R, i% N m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
_( M/ g9 N6 F+ b I' K m_internetexploret.SetVisible(TRUE);
9 w$ s$ M: v: l* j
6 a4 I6 h7 I; J8 J, C9 ^备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:. r* k# ?# W( O/ ~9 ~& E
1.在VC中插入WebBrowser控件,并产生相应的包装类7 \& F, x# t% `9 {2 e
2.声明一个类变量,可用ClassWizard的变量映射来进行。( c+ x" l! n, l- |
3.在程序中指定URL地址后进行打开WEB页,如下代码:
0 c% R% {( f+ \8 h& u VARIANT vInfo;6 A6 J" S% H. L! N( s4 G
vInfo.vt=VT_EMPTY;& h/ e* N9 x5 C5 t' p, z- `, Z
m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
' A( H4 n0 ]5 J% i m_internetexploret.SetVisible(TRUE);
. [; n/ h* U' d3 M4 A: G. _2 R5 f0 A* O" Q) G
#import方式:2 @8 C5 |* F6 Z2 F0 _6 G
: ^, A; [$ K1 d+ d' U
1.使用import导入类,在你的类的头文件加入以下代码:8 u3 X, D& J4 u0 E, @: ]( u
#import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
5 K& M& w8 P& _ using namespace SHDocvw;
' _+ a1 H% U- o) s0 G8 T2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;2 V, T, ~2 d1 q7 g% g9 c; C0 v
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:5 i, U, O5 {4 x( s: O/ t0 X
m_internetexplorer->CreateInstance("InternetExplorer.Application.1";: E$ Y. ], F: L! p7 J/ w3 |, | P
4.在程序中指定URL地址后进行打开WEB页,如下代码:+ B% J( P' W; x7 X
VARIANT vInfo; ]% e2 I7 F! b3 {/ `9 s, z! `
vInfo.vt=VT_EMPTY;
: m& ^+ S. N0 h: |8 h: S m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
: l) H) Z5 w1 D2 C j2 _7 A$ p9 w m_internetexploret-> utVisible(TRUE);
( ]: ]/ O, ]5 z& d# n* @1 F* n6 s* Z+ b: D- b; x5 w
以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过! |
|