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);