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

天云上人

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

7 k3 u* `/ K* V- d0 V! Y8 J　
1 w( c8 ]& x! T# |9 v$ Y! V/ l在VC中使用WebBrowser控件的两方法
黄森堂（vcmfc)著
& c) c7 f, W- `  r' i' ^
" h) e0 i- X1 T  rClassWizard方式：

1.创建包装类：View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK
6 G! x6 x2 X2 ^2 k3 t2.声明一个类变量：IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数，加载服务器，如下代码：
  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";
. W3 E. ~' I3 a9 q7 Y. }) k9 V; X4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数，加载服务器，如下代码：
  m_internetexplorer.CreateDispatch();
) n# @, n6 X( L9 h5.在程序中指定URL地址后进行打开WEB页，如下代码：
4 v6 g0 l7 |  K6 _  VARIANT vInfo;
  vInfo.vt=VT_EMPTY;
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
4 \, w0 N& Y' M9 e, S  m_internetexploret.SetVisible(TRUE);
4 a3 a$ x2 e) x/ p+ ^) b+ Y2 S3 A6 z
备注：还可以使用插入控件的方式来控制IE的，只需要几步就可以了，如下：
* j3 n* ~( R6 j0 P' o5 i1.在VC中插入WebBrowser控件，并产生相应的包装类
0 l* ^1 k+ s" Q2 {6 g2.声明一个类变量,可用ClassWizard的变量映射来进行。
* N8 Q" `3 J0 W+ d' ?% z9 W3 n  A3.在程序中指定URL地址后进行打开WEB页，如下代码：
' i" h" O$ |# b  e+ z% n  h5 o, R/ f. v  VARIANT vInfo;
  vInfo.vt=VT_EMPTY;
- I2 v  P7 r. ^& r: Z  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
  m_internetexploret.SetVisible(TRUE);

#import方式：

) ^/ P- @9 ~9 e& b, `# P: O0 e1.使用import导入类，在你的类的头文件加入以下代码：
  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
    using namespace SHDocvw;
2.声明一个类变量：IWebBrowserAppPtr m_internetexplorer;
3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数，加载服务器，如下代码：
+ i! {6 H- d4 i4 C9 A) d' n0 d1 m  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";
" `+ D4 I# H" ]. u0 U& ?! b4.在程序中指定URL地址后进行打开WEB页，如下代码：
! Q/ M  M" X+ n* a1 O8 U  VARIANT vInfo;
  vInfo.vt=VT_EMPTY;
: P4 o' d" f) l0 `) |! D0 ^: S  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
  m_internetexploret->utVisible(TRUE);

以上是从《应用Visual Studio 6.0》书上摘下来的，本人没有测试过！