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

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

[复制链接]
发表于 2004-1-20 21:23:15 | 显示全部楼层 |阅读模式
在VC中使用WebBrowser控件的两方法
' @) c6 k$ E$ d9 h. H2 }8 y$ l$ F: H$ x* C
  5 ]7 R( S' G4 v9 F( G9 ~
在VC中使用WebBrowser控件的两方法
8 E# S5 t. G1 e! S1 u3 u/ @0 `黄森堂(vcmfc)著
8 p' {( {; S6 L4 k( p" I8 C1 Q0 j- y( F
ClassWizard方式:
# \$ I0 ?$ Y+ }* V3 G- D7 P$ Y2 U. Q
1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK
% }5 K3 b9 x9 ^; E2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)' ]( N# `  H- t$ D" ^. ]9 B, u
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
" z$ I+ j% K( A8 P* x  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";
" o* X# L: L2 x1 Z9 g: f4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:' S4 ?* {2 d9 Y' n( X, N6 d
  m_internetexplorer.CreateDispatch();+ {' H& U4 u9 h1 f' p: @7 l' C2 A
5.在程序中指定URL地址后进行打开WEB页,如下代码:
7 b0 E, }. \. o! Z" Q" }, |  VARIANT vInfo;
  P' J, I) ^& I: W9 h  vInfo.vt=VT_EMPTY;
" N$ J* T% w7 x: g: [; h  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
5 e# |, c# I  O- [+ Y* a) t  m_internetexploret.SetVisible(TRUE);
0 C  _: F: v. i8 ?3 x
2 ]0 P9 E" i# x6 Z3 }) f  A备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:+ I, f' B+ @2 Q/ B& n
1.在VC中插入WebBrowser控件,并产生相应的包装类
' W. h: d# l! W4 [; t- Y2.声明一个类变量,可用ClassWizard的变量映射来进行。0 H. i6 s3 b3 z9 H3 _% A# o* O( r5 p* r
3.在程序中指定URL地址后进行打开WEB页,如下代码:
, L. u- G* \: h2 O  VARIANT vInfo;
6 L# n; }8 @  Y. J3 [  vInfo.vt=VT_EMPTY;
; d, p" l2 o5 \  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);, }2 u  y- a6 z% C6 c- n5 O8 G
  m_internetexploret.SetVisible(TRUE);. I* _5 C' }- r) {. B) o% a* ?
6 l) X: i' k1 f& K( b
#import方式:, D' u& B4 q7 z3 f& H' @
9 j  Q% q0 Q4 n* F2 c" ]
1.使用import导入类,在你的类的头文件加入以下代码:- r! R! a2 Y8 Z& ]' m  M
  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"8 F; Z* `- v% e9 g' a8 M
    using namespace SHDocvw;. r* l8 ?, t1 f* P' K) c2 M' ^( B
2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;
3 f4 e0 o* x; m# `3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:
# P. I* x3 y  H8 f5 b$ I; ], x% u  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";& f/ q! Q8 |  L
4.在程序中指定URL地址后进行打开WEB页,如下代码:
# p1 f( G, e- T# g  VARIANT vInfo;
" N# q0 `# m6 y% v$ ~7 X5 _  vInfo.vt=VT_EMPTY;" c" l' a1 j9 o/ C! i% ]6 p" H
  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);% w; l$ l' ~2 H  `* o
  m_internetexploret->utVisible(TRUE);
9 x0 T/ v% w3 \
' k% P1 n$ O* A: D以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-8-9 04:20 , Processed in 0.033507 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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