尝试过各种常规方法去获取,都获取不到,到最后使用JS进行获取了.同时,也提供了一种在VC/C++/MFC下执行网页JS代码的方法.话不多说,看代码:

1 加入头文件:

 
  
  1. #import "C:\\windows\\system32\\msscript.ocx" 
  2. using namespace MSScriptControl; 
 
  
2 代码实现
 
  
 
  
  1. CString runJS(IHTMLDocument2* pDoc) 
  2. { 
  3.     //使用前已经初始化com 
  4.     ::CoInitialize(NULL); 
  5.     HRESULT hr; 
  6.     IScriptControlPtr pScriptControl(__uuidof(ScriptControl)); 
  7.     pScriptControl->Language = "JScript"; 
  8.     pScriptControl->AllowUI = TRUE; 
  9.     CString jsStr = _T("function getScroll()\ 
  10.                        {var t, l, w, h;\ 
  11.                        if (document.documentElement && document.documentElement.scrollTop)\ 
  12.                        {\ 
  13.                        t = document.documentElement.scrollTop;\ 
  14.                        l = document.documentElement.scrollLeft;\ 
  15.                        } \ 
  16.                        else if (document.body)\ 
  17.                        { \ 
  18.                        t = document.body.scrollTop;\ 
  19.                        l = document.body.scrollLeft;\ 
  20.                        } \ 
  21.                        return l+\"|\"+t;\ 
  22.                        }    "); 
  23.  
  24.     LPSAFEARRAY psa; 
  25.     SAFEARRAYBOUND rgsabound[] = { 1, 0 }; // 1 elements, 0-based 
  26.     int i; 
  27.     psa = SafeArrayCreate(VT_VARIANT, 1, rgsabound); 
  28.     if (!psa) 
  29.     { 
  30.         return NULL; 
  31.     } 
  32.     VARIANT vFlavors[1]; 
  33.     for (i = 0; i < 1; i++) 
  34.     { 
  35.         VariantInit(&vFlavors[i]); 
  36.         V_VT(&vFlavors[i]) = VT_BSTR; 
  37.     } 
  38.     V_BSTR(&vFlavors[0]) = SysAllocString(L"TC_P"); 
  39.     long lZero = 0; 
  40.     hr = SafeArrayPutElement(psa, &lZero,&vFlavors[0]); 
  41.     for(i=0;i<1;i++) 
  42.     { 
  43.         SysFreeString(vFlavors[i].bstrVal); 
  44.     } 
  45.  
  46.     _bstr_t exp = jsStr; 
  47.     pScriptControl->AddCode(exp); 
  48.     IHTMLDocument2 *objDocument1=NULL; 
  49.     IHTMLWindow2* pIHTMLWindow1 = NULL; 
  50.     objDocument1 = pDoc; 
  51.     if(objDocument1) 
  52.     { 
  53.         objDocument1->get_parentWindow(&pIHTMLWindow1); 
  54.         pScriptControl->AddObject("window", pIHTMLWindow1, VARIANT_TRUE); 
  55.     } 
  56.     _variant_t outpar = pScriptControl->Run("getScroll", &psa); 
  57.     outpar.ChangeType(VT_BSTR,NULL); 
  58.     SafeArrayDestroy(psa); 
  59.     ::CoUninitialize(); 
  60.     return outpar.bstrVal; 
  61. } 
 
  
通过这个方法,就可以滚动条的位置了.至于 IHTMLDocument2* pDoc这个对象,获取方法有很多种,下次我再发获取IHTMLDocument2* 的代码.
 
  
 
 
  
如果大家还有什么更好的方法,谢谢一起交流!