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

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

[复制链接]
发表于 2004-1-20 21:23:15 | 显示全部楼层 |阅读模式
在VC中使用WebBrowser控件的两方法. N/ R" r7 ~4 e8 Q0 m  X# K8 V3 K! q  K
% w( g- D( w* H5 Q, o: x; Q6 ]
  2 B" X% O( H! ^0 H. k
在VC中使用WebBrowser控件的两方法
2 L9 c1 s" Y* U* A) s  d( F3 `黄森堂(vcmfc)著
: N0 S' E% T4 P4 M( O0 l" v/ C  D. |
ClassWizard方式:
9 C# C: L% d: b; n: s8 B4 Y5 I5 D. G, z) s7 f
1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK" r, J8 s2 B6 ]+ }) z
2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)
8 r9 W% Y; g" q# Z% ?) O" C3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:+ s# Q8 ]. h9 J
  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";
7 e6 n" w$ F. n( U7 D0 d, ?* y4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:6 ^5 D" B5 u8 ]
  m_internetexplorer.CreateDispatch();
: \: M; E7 G6 {7 ]3 D( r5.在程序中指定URL地址后进行打开WEB页,如下代码:7 d( b- L& z2 |) G) H. j
  VARIANT vInfo;
2 p5 J- G: N+ @* i  vInfo.vt=VT_EMPTY;$ c# w- O5 R- S$ q1 T& `
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);  v. f2 r- o) T( P( Q* Y
  m_internetexploret.SetVisible(TRUE);  I: u2 g7 s9 H- ?" m1 c8 t5 [

5 E9 P3 G( h, Z7 q& e备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:
+ v$ @$ P' }$ R- w1.在VC中插入WebBrowser控件,并产生相应的包装类7 g$ Y5 ], t0 I- X
2.声明一个类变量,可用ClassWizard的变量映射来进行。
7 k) E) w+ v% o; Y. H0 m3.在程序中指定URL地址后进行打开WEB页,如下代码:
. D/ M* S  M6 w$ p" ?3 M- L  VARIANT vInfo;
' M9 I3 M: @) p" \  vInfo.vt=VT_EMPTY;
6 |, I9 k4 b4 w1 S" |5 I  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
  ?- ]4 r. W8 y) B% y: [- q" a- T  m_internetexploret.SetVisible(TRUE);
. m! l7 T* s2 R4 E3 _/ e$ s  e! c# S1 W# J& z
#import方式:
$ K5 I' J2 s/ ?- @  W! A" R; u+ p. Y$ W
1.使用import导入类,在你的类的头文件加入以下代码:( C+ c2 Y' P- ?$ s3 E" J! `
  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE", S$ o( N4 h! _* A1 t
    using namespace SHDocvw;
" t  s5 m, K0 |' K- V2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;& H: U$ w# i" H& Q
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:) z. u! t9 `. o$ `  G
  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";+ a5 T  v/ e: @; _2 x4 i$ v
4.在程序中指定URL地址后进行打开WEB页,如下代码:
8 y3 f! n/ J. {5 X+ |0 M2 y8 S, f  VARIANT vInfo;
) x) f8 |7 t3 T  vInfo.vt=VT_EMPTY;
) F2 ]* P; H: ~  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
7 h% e$ Z+ V" ?) f3 t2 m  m_internetexploret->utVisible(TRUE);* [, v4 W5 H% R# E" l/ P

2 \4 Q# N  p4 P6 Q3 e; a8 P, }以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-6-18 06:54 , Processed in 0.020124 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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