找回密码
 注册
搜索
查看: 4459|回复: 0

在VC中使用WebBrowser控件的两方法

[复制链接]
发表于 2004-1-20 21:23:15 | 显示全部楼层 |阅读模式
在VC中使用WebBrowser控件的两方法/ C$ l8 F% ]/ o1 B) o
# f* ?0 {. q& u8 p
 
) \+ z3 D! D1 ~在VC中使用WebBrowser控件的两方法4 q) _3 H  s5 g1 u  K, y/ V0 G
黄森堂(vcmfc)著: s: h: h0 N( V- a6 \  H* h* C+ ^

  Z( v( Q- i5 ~4 uClassWizard方式:
1 E! R  s" J, O* k: t& q2 p+ O! D# u- U9 h$ Z" `+ M' S/ ~
1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK* T1 A; z0 Q: Z4 w. `( A  o" `
2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)1 x$ z, d$ V$ H: Z7 O/ A. Y: J) Q* a
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
( C! E9 }( F' ~  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";+ f6 _0 ?+ j& v# j2 W3 t9 y. _' q
4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:1 x, K1 \/ C5 k0 q7 e/ y
  m_internetexplorer.CreateDispatch();9 F3 a4 ?# a* M5 }/ V+ t
5.在程序中指定URL地址后进行打开WEB页,如下代码:# p! |& V8 Y6 b7 l2 A( c/ H
  VARIANT vInfo;
7 o) t9 D- L& s9 @% [3 ]9 z  vInfo.vt=VT_EMPTY;
6 E9 Y; q! J. t# d: Z  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);0 e, x/ e  |6 x4 @
  m_internetexploret.SetVisible(TRUE);: l8 |* u) W; ]/ a/ X  o- r$ _; \( W
2 ]9 p/ p/ K% H
备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:; ]& g. E$ ^: \2 q
1.在VC中插入WebBrowser控件,并产生相应的包装类: K+ w2 T7 F+ k5 x. ^3 v1 e
2.声明一个类变量,可用ClassWizard的变量映射来进行。
( a: d# W7 o# `6 _3.在程序中指定URL地址后进行打开WEB页,如下代码:
  L. P  i4 I* {$ B) u, {( C/ @  VARIANT vInfo;
) P$ n, s0 ^) n* b% d+ T  vInfo.vt=VT_EMPTY;
( _2 V5 ^* b3 O0 @  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
7 h! V, Z) |/ C3 q6 e0 n  m_internetexploret.SetVisible(TRUE);  d8 t! A3 |5 {9 m! F2 i' u  L
7 E/ J% {! D; |& G3 J$ {& `
#import方式:
0 Z& b6 @) }# j6 r( Z& @: B& r5 V+ I0 y% c* W2 I; u
1.使用import导入类,在你的类的头文件加入以下代码:
* x9 H0 Y" W% @3 q; ?+ e4 I  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE") X1 M2 d. N$ A% k4 C3 @. N" n
    using namespace SHDocvw;
/ K/ r- z" L4 {3 s8 t  L5 F2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;: B2 B, t- `! k3 q! }  q  j" E9 W
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:. W9 q8 ]4 Z3 P2 |* o% L
  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";  l" t- C) p1 Y
4.在程序中指定URL地址后进行打开WEB页,如下代码:3 x- N5 |; o, I" r6 ~2 R
  VARIANT vInfo;* J4 U. F5 D% ^9 U& [" O& {5 H4 n8 h
  vInfo.vt=VT_EMPTY;
4 `+ f6 d% g4 n+ Q" M  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
2 V. ?0 \- O5 F  M+ {. H  m_internetexploret->utVisible(TRUE);! p7 w( p! q2 v9 ]* t) i. r
' Q3 \) }9 |2 ~5 `1 Q4 F$ M5 o
以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|宁德市腾云网络科技有限公司 ( 闽ICP备2022007940号-5|闽公网安备 35092202000206号 )

GMT+8, 2026-6-18 09:18 , Processed in 0.016979 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表