VC 关于Web Browser控件操作IE，网页缩放功能实现。。

WebBrowser.ExecWB参数列表及简要说明

第一个参数的所有取值
typedef enum
{
OLECMDID_OPEN=1,打开
OLECMDID_NEW=2,新建文档
OLECMDID_SAVE=3, 保存
OLECMDID_SAVEAS=4, 另存为
OLECMDID_SAVECOPYAS=5,
OLECMDID_PRINT =6,打印
OLECMDID_PRINTPREVIEW=7,打印预览
OLECMDID_PAGESETUP=8,页面设置
OLECMDID_SPELL=9,拼写检查
OLECMDID_PROPERTIES=10,属性
OLECMDID_CUT=11,剪切
OLECMDID_COPY=12,复制
OLECMDID_PASTE =13,粘贴
OLECMDID_PASTESPECIAL=14,特殊粘贴
OLECMDID_UNDO=15,撤销
OLECMDID_REDO=16,重复
OLECMDID_SELECTALL=17,全选
OLECMDID_CLEARSELECTION=18,清除选择
OLECMDID_ZOOM=19,缩放
OLECMDID_GETZOOMRANGE=20,取得缩放方位
OLECMDID_UPDATECOMMANDS =21,更新命令
OLECMDID_REFRESH=22,刷新
OLECMDID_STOP=23,停止
OLECMDID_HIDETOOLBARS=24,隐藏工具条
OLECMDID_SETPROGRESSMAX =25,设置进度条最大值
OLECMDID_SETPROGRESSPOS =26,设置进度条位置
OLECMDID_SETPROGRESSTEXT=27,设置进度条文本
OLECMDID_SETTITLE =28,设置标题
OLECMDID_SETDOWNLOADSTATE=29,设置下载状态
OLECMDID_STOPDOWNLOAD=30,停止下载
OLECMDID_ONTOOLBARACTIVATED=31,
OLECMDID_FIND=32,查找
OLECMDID_DELETE=33,删除
OLECMDID_HTTPEQUIV=34,
OLECMDID_HTTPEQUIV_DONE =35,
OLECMDID_ENABLE_INTERACTION=36,允许交互
OLECMDID_ONUNLOAD =37,当卸载时
OLECMDID_PROPERTYBAG2=38,
OLECMDID_PREREFRESH=39,
OLECMDID_SHOWSCRIPTERROR=40,
OLECMDID_SHOWMESSAGE =41,显示消息
OLECMDID_SHOWFIND =42,显示查找
OLECMDID_SHOWPAGESETUP=43,显示页面设置
OLECMDID_SHOWPRINT=44,显示打印
OLECMDID_CLOSE =45,关闭
OLECMDID_ALLOWUILESSSAVEAS =46,
OLECMDID_DONTDOWNLOADCSS=47,
OLECMDID_UPDATEPAGESTATUS=48,
OLECMDID_PRINT2=49,打印2
OLECMDID_PRINTPREVIEW2=50,打印预览
OLECMDID_SETPRINTTEMPLATE=51,设置打印模板
OLECMDID_GETPRINTTEMPLATE=52,取得打印模板
OLECMDID_PAGEACTIONBLOCKED =55,
OLECMDID_PAGEACTIONUIQUERY =56,
OLECMDID_FOCUSVIEWCONTROLS =57,
OLECMDID_FOCUSVIEWCONTROLSQUERY=58,
OLECMDID_SHOWPAGEACTIONMENU=59,
}OLECMDID;

 

 

ms-help://MS.MSDNQTR.v80.en/MS.MSDN.v80/MS.WIN32COM.v10.en/com/html/ae1592b6-2afd-4379-a18e-d46b226bc9e2.htm

 

这个具体的操作大家可以去。。MSDN 这个地址去查看。。。

 

m_Web 是WEB控件关联的变量。。。

 

CComVariant varRange;
 m_Web.ExecWB(OLECMDID_GETZOOMRANGE, OLECMDEXECOPT_DODEFAULT, NULL, &varRange);
 ASSERT(V_VT(&varRange) == VT_I4);
 WORD wMinZoom = LOWORD(V_I4(&varRange)); // 最小缩放比例
 WORD wMaxZoom = HIWORD(V_I4(&varRange)); // 最大缩放比例

 

CComVariant varZoom;
 m_Web.ExecWB(OLECMDID_ZOOM, OLECMDEXECOPT_DODEFAULT, NULL, &varZoom);
 ASSERT(V_VT(&varZoom) == VT_I4);
 ULONG ulZoom = V_I4(&varZoom);    // 当前缩放比例

 

varZoom = ((int)m_nSetZoom);   //设置缩放比例。。。这个要根据web控件的最大最小来进行设置。。。
 m_Web.ExecWB(OLECMDID_ZOOM, OLECMDEXECOPT_DODEFAULT, &varZoom, NULL);