|
|
在VC中使用WebBrowser控件的两方法; l) `# X+ t* l* A& W
9 a; t$ c! ?2 F5 k- E$ u
6 W' V8 g; B/ p* C( l) s在VC中使用WebBrowser控件的两方法
! |6 i2 s7 j S9 K( w黄森堂(vcmfc)著
0 g; O; g$ R4 `/ U5 z
l+ ^& d3 O6 Y8 X% H( ]ClassWizard方式:
4 h W* n' Z/ ^2 D1 |. v u/ ] }
. U6 A, c. R7 z# e4 E; Q$ D1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK x6 A) n. \6 s/ n, K7 Q
2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)+ ^. M& U/ v- S9 j& G7 Y3 K7 G3 B
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
1 G- o# V# ]! H7 G7 u2 S m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";6 S3 l4 A* \+ [3 H
4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:0 u6 @. @+ C6 }: F# L
m_internetexplorer.CreateDispatch();
B4 R: m6 m8 @) q% I5.在程序中指定URL地址后进行打开WEB页,如下代码:
" U( m3 d! x: o. B VARIANT vInfo;
& x- L' p/ ?: e- w0 g# M/ | vInfo.vt=VT_EMPTY;, E! {; Y. d: N* T3 A3 o
m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);6 u: X6 x ?# v2 T. H# }
m_internetexploret.SetVisible(TRUE);; S0 a) l4 u9 w* x6 a" F
6 K# I/ [( L( |. t) g
备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:0 L* W1 M- O% A% r! k8 |! w. k
1.在VC中插入WebBrowser控件,并产生相应的包装类
4 Z$ T- u. ^+ T; @' E& q2.声明一个类变量,可用ClassWizard的变量映射来进行。
* \7 ]! L: G. N% ~3.在程序中指定URL地址后进行打开WEB页,如下代码:3 t4 g( N8 Y6 M
VARIANT vInfo;
6 T4 A& e( R( Y vInfo.vt=VT_EMPTY;! E* l; T8 \, w
m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
# I3 s0 H# u6 c8 F" z1 i( w m_internetexploret.SetVisible(TRUE);
0 I' S* P, b9 d# K, P' A
/ \0 n% ?" ~2 N3 y#import方式:. {/ h: d- L5 A' T# m |
1 u0 Z8 m5 C6 V1 N) C" _; \1.使用import导入类,在你的类的头文件加入以下代码:
+ S, \$ I; k2 P8 W" O. {/ r #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE": ^/ w; W6 L3 _# l6 w3 T" [
using namespace SHDocvw;/ s/ ^1 I4 M4 V% \3 Z& X( v/ {
2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;3 r1 Q3 _. p6 ]. F# P
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
/ t+ l7 ~, ~" K! c m_internetexplorer->CreateInstance("InternetExplorer.Application.1";
! y, i! C9 S t+ w3 c* H$ A4 G4.在程序中指定URL地址后进行打开WEB页,如下代码:
7 R: p- i+ V3 m# j4 e+ k7 v VARIANT vInfo;$ g! ]! D$ a6 e% _# h6 h K5 C" D
vInfo.vt=VT_EMPTY;
* y8 T+ Q' a- J0 B b. X9 h m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);6 a }/ g k1 \' \" N3 l" ?
m_internetexploret-> utVisible(TRUE);
" F) t! ] a$ y. L" R! Q2 ]% R4 [; G
以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过! |
|