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

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

[复制链接]
发表于 2004-1-20 21:23:15 | 显示全部楼层 |阅读模式
在VC中使用WebBrowser控件的两方法) v  H! q. _4 n* R
- C0 F; j/ [4 ]! ^0 p; H
  0 `3 e9 ~" d. H, i
在VC中使用WebBrowser控件的两方法5 M2 r* I! r; B* a
黄森堂(vcmfc)著
3 z) N2 s& T6 h9 q1 T9 _
7 F% Z- a3 O" a; m+ |ClassWizard方式:
$ X- g# ]2 [  E9 R  L. _) ~& p- L8 z. K7 M/ u: j' s# Z
1.创建包装类:View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK1 F) w3 e5 p, |. N$ T3 w" X; Z* j
2.声明一个类变量:IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)
+ V) |& ]) u) z# b4 `9 M; Z- G3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:$ n4 {& y8 W0 f* Z8 e/ S0 x
  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";) G; ]5 [" U  ^2 M( y
4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数,加载服务器,如下代码:
  Y0 c; b- e5 K7 B  F+ j  m_internetexplorer.CreateDispatch();4 u5 Y! p  M/ Q) c# t: Y9 _
5.在程序中指定URL地址后进行打开WEB页,如下代码:- o* F( t2 ^" H) X: [
  VARIANT vInfo;
" X  K1 a% U8 Q9 d3 W) N  vInfo.vt=VT_EMPTY;) T  F5 I, O- @' g/ v$ ~  b# V
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);3 H0 R4 `7 V1 X6 p0 B. D; s
  m_internetexploret.SetVisible(TRUE);  o9 n  @$ ^6 o3 P( J0 e7 @

# {- i' V+ z2 g+ B9 E备注:还可以使用插入控件的方式来控制IE的,只需要几步就可以了,如下:+ L  }0 k# o2 Q8 I
1.在VC中插入WebBrowser控件,并产生相应的包装类
0 T4 h5 A3 T$ C. M3 q2.声明一个类变量,可用ClassWizard的变量映射来进行。
9 M7 F! p% P% D, b! E/ `! P3.在程序中指定URL地址后进行打开WEB页,如下代码:' S- K; n. _% [/ V
  VARIANT vInfo;  l5 ~6 S1 E/ p% A" a6 A; M9 \9 o
  vInfo.vt=VT_EMPTY;
6 s! m+ U7 W1 [% C) t! {  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);1 n' @& |2 Z+ K
  m_internetexploret.SetVisible(TRUE);
/ c0 |1 _" `0 p6 E
7 ?  d# M0 Q4 g* i- c#import方式:5 a. n6 O% B& B& Z5 _

+ V! X% k* W0 j8 P1.使用import导入类,在你的类的头文件加入以下代码:: I. q, w" U8 F
  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
+ [5 W% O* J- d2 `    using namespace SHDocvw;9 z  x6 v3 ]! G+ W
2.声明一个类变量:IWebBrowserAppPtr m_internetexplorer;
2 o3 j5 M& [! Y8 V/ h/ {; Q# Y3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数,加载服务器,如下代码:! b* q- p8 c! y4 L
  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";2 z1 B# C4 C5 K* C/ O3 {
4.在程序中指定URL地址后进行打开WEB页,如下代码:8 K- D! }' t/ o
  VARIANT vInfo;
- [$ X5 B) e' k% p4 ^/ b  Q  vInfo.vt=VT_EMPTY;+ m5 A* V  I0 d9 m1 o: q
  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
- b: L, C* }4 |+ {: z( u% m1 r8 }  m_internetexploret->utVisible(TRUE);
" ]1 Y7 S2 s, c9 \5 a+ U  q$ ~9 [. G4 I2 H! M
以上是从《应用Visual Studio 6.0》书上摘下来的,本人没有测试过!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-6-19 08:24 , Processed in 0.013955 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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