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

天云上人

在VC中使用WebBrowser控件的两方法
& m- u3 x  f6 W5 X2 `
　
在VC中使用WebBrowser控件的两方法
/ E* J$ D4 q, O) }, @黄森堂（vcmfc)著
/ X, o9 A8 l5 m" }- \. i8 c
2 e# i/ L! ^4 g1 ?) aClassWizard方式：
6 k' \5 r" F$ t; F* o& t" a% x/ [
1.创建包装类：View->ClassWizard->Add Class->Form a Type Library->C:\winnt\system32\shdocvw.dll->只选择IWebBrowserApp类->OK->OK
2.声明一个类变量：IWebBrowserApp m_internetexplorer;,并包含刚才的头文件(xxx.h)
6 ~2 q! }% L8 N+ U, l+ L; R% D3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数，加载服务器，如下代码：
8 k/ R* P, t& P) `  m_internetexplorer.CreateDispatch("InternetExplorer.Application.1";
1 @4 g! {3 Z& r# m4.在类的析构函数中调用COleDispathDrive::ReleaseDispatch()函数，加载服务器，如下代码：
2 V, ^7 U4 [2 x) K. u4 B2 c$ U  m_internetexplorer.CreateDispatch();
5.在程序中指定URL地址后进行打开WEB页，如下代码：
  VARIANT vInfo;
+ f% Y& V* z' ~: {  vInfo.vt=VT_EMPTY;
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
  m_internetexploret.SetVisible(TRUE);
1 Y& u* ]: b4 G8 e# |
0 }. a5 n& k9 [- f备注：还可以使用插入控件的方式来控制IE的，只需要几步就可以了，如下：
1.在VC中插入WebBrowser控件，并产生相应的包装类
2.声明一个类变量,可用ClassWizard的变量映射来进行。
3.在程序中指定URL地址后进行打开WEB页，如下代码：
  VARIANT vInfo;
6 P. Z/ m4 u) ]9 x5 Z  vInfo.vt=VT_EMPTY;
  m_internetexplorer.Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
; a- d) [* a+ O6 [/ L4 g$ b! F; L  m_internetexploret.SetVisible(TRUE);

#import方式：
6 A: B: B) |4 S+ ]1 z5 [5 K8 ?
# P* w3 ], J/ a0 A2 J1.使用import导入类，在你的类的头文件加入以下代码：
  #import "c:\winnt\system32\shdocvw.dll" rename ("tagREADYSTATE","tagIEREADYSTATE"
    using namespace SHDocvw;
2.声明一个类变量：IWebBrowserAppPtr m_internetexplorer;
4 g, F" U; L- L" t# V. y' g# M3.在类的构造函数中调用COleDispathDrive::CreateDispatch()函数，加载服务器，如下代码：
  m_internetexplorer->CreateInstance("InternetExplorer.Application.1";
4.在程序中指定URL地址后进行打开WEB页，如下代码：
- P  k. i! d5 f+ D3 Y" u8 i  VARIANT vInfo;
  vInfo.vt=VT_EMPTY;
  m_internetexplorer->Navigate("地址",&vInfo,&vInfo,&vInfo,&vInfo);
& J% Y5 `# Q9 ^  H4 M# M  m_internetexploret->utVisible(TRUE);
" n0 V( Y. L4 r( L
; m+ q1 {$ p+ ]( m8 b: H以上是从《应用Visual Studio 6.0》书上摘下来的，本人没有测试过！