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

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

[复制链接]
发表于 2004-1-20 21:23:15 | 显示全部楼层 |阅读模式
在VC中使用WebBrowser控件的两方法
. l3 |- i; s1 A* U8 V1 v# P+ k3 F! }: h9 g
  9 J$ ~5 z* g2 i# ~
在VC中使用WebBrowser控件的两方法( R* L9 u+ F" L# {  I: y
黄森堂(vcmfc)著
" G5 J' a! y& D) I+ ?9 u4 B$ [2 i( @: J4 |6 Q
ClassWizard方式:6 W4 j9 G& H  G# v8 [0 b

- T  R8 h2 w$ {- L3 c1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK1 M5 G+ ]6 g7 k6 N8 Q% W
2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)7 t$ a6 ]  h7 i3 O; \
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:* ?8 s) s0 _1 `( y* U9 w! g. E
  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";$ g% q+ A- a5 Z* K! Q* j$ P2 _
4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:
0 l0 Y- e# l! L7 W; S1 j, u5 A  m_internetexplorer.CreateDispatch();
3 R& O2 o0 c' f9 _5 q- C5.在程序中指定URL地址后进行打开WEB页,如下代码:1 I( V: h/ V  S0 L& R4 |8 G$ |
  VARIANT vInfo;
* q7 @* x: V( p2 G" |  vInfo.vt=VT_EMPTY;& q6 p/ d: W) Z( L8 D  C
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
  Q" K  v6 v$ q, j4 J  m_internetexploret.SetVisible(TRUE);
2 p0 ]/ Q2 \- y, Z) y- y# n9 O" h! t: ?, k, _' O, @
备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:
1 k6 t; R# |2 ?/ I3 @1.在VC中插入WebBrowser控件,并产生相应的包装类
1 z$ o. N) f! t$ |6 p  x2.声明一个类变量,可用ClassWizard的变量映射来进行。
5 J+ ^7 \1 O* D5 s/ W" N& ~6 N3.在程序中指定URL地址后进行打开WEB页,如下代码:5 i& `1 l2 L9 p( A' ~
  VARIANT vInfo;- j1 j- B& W0 Y+ G. a
  vInfo.vt=VT_EMPTY;
4 l- h& f8 ]: ~7 q5 O& {  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);( D+ T9 ~2 I1 ~9 a1 L1 A5 m
  m_internetexploret.SetVisible(TRUE);  c5 ]! ~4 V# M  G' r) ?

0 @$ E/ z8 Y$ p+ s0 ?8 ]2 i% C0 J#import方式:
: R  j- s6 R8 K
  r" D! b- ], u' G! _4 ?2 d% Z6 l1.使用import导入类,在你的类的头文件加入以下代码:
' R; A1 i- x' p1 m3 @  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
# z) O" E1 ]. w    using namespace SHDocvw;6 \( M7 r4 M- L: t
2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;
* b  N. J" E2 N- d+ L3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
* v6 O! P  u4 w  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";& V1 v9 c2 |0 V. O: z2 e' R
4.在程序中指定URL地址后进行打开WEB页,如下代码:3 J# _! [5 @4 {; B8 ~! Y
  VARIANT vInfo;
4 S1 o# H" z7 M% I  h  vInfo.vt=VT_EMPTY;( E! O+ |+ l0 j0 h4 Q; g$ M
  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);! x# d$ s: d9 @- W8 H  \! p
  m_internetexploret->utVisible(TRUE);
/ `0 U/ {5 u2 Y, {  |" H
" S6 q+ f& r- ]. F: m- N以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-5-5 05:08 , Processed in 0.014516 second(s), 14 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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