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

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

[复制链接]
发表于 2004-1-20 21:23:15 | 显示全部楼层 |阅读模式
在VC中使用WebBrowser控件的两方法3 ~" E/ X" V9 W& ?5 N: E& v( }
5 k6 Z- J0 b* w, c: |+ a6 l
 
8 D7 I) ?: N8 e6 \5 u. f1 w在VC中使用WebBrowser控件的两方法! t: u6 g7 J3 B& G4 Q3 E+ {
黄森堂(vcmfc)著' v- M5 f4 @6 {9 n2 b
) X9 y- O* e- {5 `; G
ClassWizard方式:9 n  a/ }8 X- M+ L

4 {7 t" X/ Z. r. T# ^$ I5 b& w1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK
( S0 f' x5 I6 S) T3 O8 p2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)
, H# l) m, b: a& g' ?: r3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:2 E" t) l, y* A) J, k* _7 j
  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";
7 T0 Q/ z7 y! a/ P" }4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:; b& r' n+ |- D6 V  y
  m_internetexplorer.CreateDispatch();
5 \3 t) Q# Q. Y. d& e3 u% ^- a5.在程序中指定URL地址后进行打开WEB页,如下代码:
8 _7 `7 h! n+ w. c  VARIANT vInfo;4 F4 @5 b+ N, X. j  j/ i
  vInfo.vt=VT_EMPTY;+ S: L$ R" w! }0 O# _$ A! V% X
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
: l& R4 H( t! I$ m2 W8 V9 Q  m_internetexploret.SetVisible(TRUE);
/ x" w/ C4 D5 P2 `4 |0 R8 r4 s
. z& \. u0 j* q3 C- J备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:
6 ]/ F; o% Q9 z5 _! l" Y! N1.在VC中插入WebBrowser控件,并产生相应的包装类
# m: e% n& E4 ?+ F2.声明一个类变量,可用ClassWizard的变量映射来进行。2 N: Q: N6 [; O$ ]1 w& j. r
3.在程序中指定URL地址后进行打开WEB页,如下代码:
& q; G& e2 l- r  VARIANT vInfo;, ]9 ?4 x3 I: X- F1 E3 {
  vInfo.vt=VT_EMPTY;
* n" g) J/ Q3 X0 w5 `  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);& W7 `+ e; u9 q3 ^1 E' Y
  m_internetexploret.SetVisible(TRUE);1 @3 M0 ]" j4 m
2 L7 x" [; ?# ]5 A/ F
#import方式:# a, ^) }) Z: q4 K5 t
7 h3 l7 j  b5 M0 E4 q0 P3 O+ {
1.使用import导入类,在你的类的头文件加入以下代码:5 \5 a" q/ J2 l. i
  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
. D3 k4 S' `" {. w    using namespace SHDocvw;
, t7 P2 f; @' }3 B, r! k$ h2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;
& ?8 C! j3 c; E8 m% Q/ J3 b0 U3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:  g- C0 w6 l7 C
  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";
+ `9 x. G' S& z. @4.在程序中指定URL地址后进行打开WEB页,如下代码:
+ N$ s8 b/ ]2 E- R7 C  VARIANT vInfo;
& ?- F" u2 }, n+ L. v8 v* h  vInfo.vt=VT_EMPTY;1 [* `* l# i# N1 y* C' }2 w2 s
  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
/ \" f( m. N- C5 b, s  m_internetexploret->utVisible(TRUE);8 m7 I) P- B: @5 y

7 ?4 Q% D% t5 Q以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-11-15 06:20 , Processed in 0.017598 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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