|
|
在VC中使用WebBrowser控件的两方法
& S2 G3 X2 J& o1 a8 P8 m; f3 E- \0 R4 Y4 [" C
& B9 W, P4 l Q! d: ~5 Z2 D/ b, s在VC中使用WebBrowser控件的两方法3 q' U! N* ~: N1 v
黄森堂(vcmfc)著
8 m' B- `) V) E' f) T& k% {
; G% ? p6 N! t. a3 P: NClassWizard方式:2 `1 z4 x% E8 Y7 W+ H
: G, T5 u7 U9 i/ H. Q3 q( m1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK
$ i+ R$ }0 i. L* d2 D2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)6 R2 w3 M) T! l* }4 a. @. K2 V' P
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
7 {1 F& B8 Q" X( \" N- k6 _ A ]" I m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";1 D8 h+ B9 c9 o/ |2 G* s' b$ D
4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:
& ^+ H) S8 @3 E4 R% Q" D m_internetexplorer.CreateDispatch();8 c# H$ Y9 w0 M
5.在程序中指定URL地址后进行打开WEB页,如下代码:
& Q- Z$ Z& D4 K4 | VARIANT vInfo;
1 J% [; H, }/ m vInfo.vt=VT_EMPTY;$ N: m% T! O3 \) d! B f
m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);' V" z4 b" T, G3 }
m_internetexploret.SetVisible(TRUE);. c7 Y8 n1 ~ P- \6 {! ~
7 F5 @6 v( [8 ~6 c, t4 u7 h, B! P
备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:) p2 e0 a% {/ m" R
1.在VC中插入WebBrowser控件,并产生相应的包装类
% r; j2 o) {4 C2.声明一个类变量,可用ClassWizard的变量映射来进行。
+ Y! V+ z6 s I6 j3.在程序中指定URL地址后进行打开WEB页,如下代码:2 e6 L: S9 s/ m$ X; k) R: C5 O
VARIANT vInfo;
( f1 `# ` X2 T( E. Y" W3 a. v8 E vInfo.vt=VT_EMPTY;0 M. n7 ~9 S& X* M7 s
m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);; Z' q' N- h4 {/ G2 x, C: S8 ]9 R
m_internetexploret.SetVisible(TRUE);
4 u) A6 |# C" Y! q
5 J! `# ?$ n( m) C; A2 s#import方式:% Q6 B9 c$ \, u1 [7 p( |
; p9 v* _! G- I8 _$ X7 d
1.使用import导入类,在你的类的头文件加入以下代码:# i% T6 M4 Y+ L7 X
#import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
! k3 X2 b# |/ R using namespace SHDocvw;
1 e7 e( a T9 Q; a2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;* p( j- X7 \5 J* [0 q0 x" |
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
4 }) q; y% f4 a. j1 E6 ~% k$ S/ V m_internetexplorer->CreateInstance("InternetExplorer.Application.1";% J6 ]3 ]. h+ C4 O9 Y. n
4.在程序中指定URL地址后进行打开WEB页,如下代码:& |( j2 R- B0 b
VARIANT vInfo;
; e1 Y3 u9 l" f9 R vInfo.vt=VT_EMPTY;3 S# A% }6 W2 }/ t i! r, ]
m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);1 i0 D' L( S5 R
m_internetexploret-> utVisible(TRUE);% X; m( {* e- F) s( p
& B2 P" d: J6 O) H$ B7 q, d
以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过! |
|