void IEView::scrollToBottom() { /* IHTMLDocument2 *document = getDocument(); if (document != NULL) { wchar_t *p = NULL; if (SUCCEEDED(document->get_readyState(&p))) { int licznik = 0; do { if (FAILED(document->get_readyState(&p))) { break; } licznik++; if (licznik == 1) break; Sleep(10); } while (!wcscmp(p, L"loading")); } IHTMLWindow2* pWindow = NULL; if (SUCCEEDED(document->get_parentWindow( &pWindow )) && pWindow != NULL) { pWindow->scrollBy( 0, 0x01FFFFFF ); } document->Release(); }*/ IHTMLDocument2 *document = getDocument(); if (document != NULL) { IHTMLElementCollection *collection; IHTMLElement *element; IDispatch *dispatch; if (SUCCEEDED(document->get_all(&collection)) && (collection != NULL)) { long len; if (SUCCEEDED(collection->get_length(&len))) { VARIANT variant; variant.vt = VT_I4; variant.lVal = len-1; if (SUCCEEDED(collection->item(variant, variant, &dispatch)) && (dispatch != NULL)) { if (SUCCEEDED(dispatch->QueryInterface(IID_IHTMLElement,(void**)&element)) && (element != NULL)) { variant.vt = VT_BOOL; variant.boolVal = VARIANT_FALSE; if (SUCCEEDED(element->scrollIntoView(variant))) { } element->Release(); } dispatch->Release(); } } collection->Release(); } IHTMLWindow2* pWindow = NULL; if (SUCCEEDED(document->get_parentWindow( &pWindow )) && (pWindow != NULL)) { pWindow->scrollBy( -0x01FFFFFF, 0x01FFFFFF ); pWindow->Release(); } document->Release(); } }
void CNetRadioDlg::OnBnClickedTest() { CString strValue; IHTMLDocument2* pDoc = (IHTMLDocument2*)m_Browser.GetHtmlDocument(); HRESULT hr = S_FALSE; IHTMLElementCollection* pAllElem = NULL; IHTMLElementCollection* pAllScript = NULL; IHTMLElement* pElem = NULL; hr = pDoc->get_scripts(&pAllScript); if(SUCCEEDED(hr) && pAllScript != NULL) { IDispatchPtr pElemDisp = NULL; _variant_t varID(1); _variant_t varIdx(0); hr = pAllScript->item(varID, varIdx, &pElemDisp); if(SUCCEEDED(hr) && pElemDisp != NULL) { hr = pElemDisp->QueryInterface(IID_IHTMLElement,(void**)&pElem); if(SUCCEEDED(hr) && pElem != NULL) { BSTR bstrTagName; hr = pElem->get_outerHTML(&bstrTagName); hr = pElem->get_outerHTML(&bstrTagName); if(SUCCEEDED(hr)) { CString strTagName(bstrTagName); SysFreeString(bstrTagName); MessageBox(strTagName); } } } } hr = pDoc->get_all(&pAllElem); if(SUCCEEDED(hr) && pAllElem != NULL) { IDispatchPtr pElemDisp = NULL; _variant_t varID(_T("body")); _variant_t varIdx(0); hr = pAllElem->item(varID, varIdx, &pElemDisp); if(SUCCEEDED(hr) && pElemDisp != NULL) { MessageBox(_T("OK")); } } }
//taken from http://www.wischik.com/lu/programmer/webform.html IHTMLElement* TextRenderBrain::GetElementFromId(string id_str, const GUID *iid) { const char* id = NULL; IHTMLElement *ret=0; IHTMLElementCollection* doc_all = NULL; IHTMLDocument2 *doc = NULL; HRESULT hr; if (id_str.size() == 0) return 0; id = id_str.c_str(); doc = GetDoc(); if (doc==0) return 0; hr = doc->get_all(&doc_all); // this is like doing document.all if (hr == S_OK) { IDispatch* disp = NULL; VARIANT vid; VARIANT v0; unsigned int len; wchar_t* ws = NULL; VariantInit(&v0); len=strlen(id); vid.vt=VT_BSTR; ws = new wchar_t[len+1]; MultiByteToWideChar(CP_ACP,MB_PRECOMPOSED, id, -1, ws, len+1); vid.bstrVal=ws; hr = doc_all->item(vid,v0,&disp); // this is like doing document.all["messages"] delete[] ws; //We may be leaking a small amount of memory here because this crashes: //SysFreeString(vid.bstrVal); if (hr == S_OK && disp != 0) { IHTMLElement* element = NULL; if (iid == 0) hr = disp->QueryInterface(IID_IHTMLElement,(void **)&element); else hr = disp->QueryInterface(*iid,(void**)&element); if (hr == S_OK) ret = element; // it's the caller's responsibility to release it disp->Release(); } doc_all->Release(); } doc->Release(); return ret; }
bool CMyInternetExplorer::FindElement (bool bExactMatch, bool bWildcardMatch, bool bCaseSensitive, bool bClick, bool bTagName, bool bOuterHTML, bool bInnerHTML, bool bTooltip, LPCTSTR sTagNameOrg, LPCTSTR sOuterHTMLOrg, LPCTSTR sInnerHTMLOrg, LPCTSTR sTooltipOrg, CString & sRetTagName, CString & sRetOuterHTML, CString & sRetInnerHTML, CString & sRetTooltip) { ASSERT (m_pWebBrowser != NULL); if (m_pWebBrowser == NULL) return false; HRESULT hr; IDispatch* pHtmlDocDispatch = NULL; IHTMLDocument2 * pHtmlDoc = NULL; bool bSearch = true; // Retrieve the document object. hr = m_pWebBrowser->get_Document (&pHtmlDocDispatch); if (SUCCEEDED (hr) && (pHtmlDocDispatch != NULL)) { hr = pHtmlDocDispatch->QueryInterface (IID_IHTMLDocument2, (void**)&pHtmlDoc); if (SUCCEEDED (hr) && (pHtmlDoc != NULL)) { IHTMLElementCollection* pColl = NULL; hr = pHtmlDoc->get_all (&pColl); if (SUCCEEDED (hr) && (pColl != NULL)) { CString sTagName (sTagNameOrg), sOuterHTML (sOuterHTMLOrg), sInnerHTML (sInnerHTMLOrg), sTooltip (sTooltipOrg); if (!bCaseSensitive) { sTagName.MakeLower (); sOuterHTML.MakeLower (); sInnerHTML.MakeLower (); sTooltip.MakeLower (); } // Obtained the Anchor Collection... long nLength = 0; pColl->get_length (&nLength); for (int i = 0; i < nLength && bSearch; i++) { COleVariant vIdx ((long)i, VT_I4); IDispatch* pElemDispatch = NULL; IHTMLElement * pElem = NULL; hr = pColl->item (vIdx, vIdx, &pElemDispatch); if (SUCCEEDED (hr) && (pElemDispatch != NULL)) { hr = pElemDispatch->QueryInterface(IID_IHTMLElement, (void**)&pElem); if (SUCCEEDED (hr) && (pElem != NULL)) { BSTR bstrTagName, bstrOuterHTML, bstrInnerHTML, bstrTooltip; CString sTempTagName, sTempOuterHTML, sTempInnerHTML, sTempTooltip; if (!FAILED (pElem->get_tagName (&bstrTagName))) { sTempTagName = bstrTagName; SysFreeString (bstrTagName); } if (!FAILED (pElem->get_outerHTML (&bstrOuterHTML))) { sTempOuterHTML = bstrOuterHTML; SysFreeString (bstrOuterHTML); } if (!FAILED (pElem->get_innerHTML (&bstrInnerHTML))) { sTempInnerHTML = bstrInnerHTML; SysFreeString (bstrInnerHTML); } if (!FAILED (pElem->get_title (&bstrTooltip))) { sTempTooltip = bstrTooltip; SysFreeString (bstrTooltip); } sRetTagName = sTempTagName; sRetOuterHTML = sTempOuterHTML; sRetInnerHTML = sTempInnerHTML; sRetTooltip = sTempTooltip; if (!bCaseSensitive) { sTempTagName.MakeLower (); sTempOuterHTML.MakeLower (); sTempInnerHTML.MakeLower (); sTempTooltip.MakeLower (); } // Do the comparison here! bool bMatches = true; if (bMatches && bTagName) { if (bExactMatch) { if (sTempTagName != sTagName) bMatches = false; } else if (bWildcardMatch) { if (bCaseSensitive) { if (!StringHelper::WildcardCompareNoCase (sTagName, sTempTagName)) bMatches = false; } else { if (!StringHelper::WildcardCompare (sTagName, sTempTagName)) bMatches = false; } } // Just locate the text inside! else { if (sTempTagName.Find (sTagName) == -1) bMatches = false; } } if (bMatches && bOuterHTML) { if (bExactMatch) { if (sTempOuterHTML != sOuterHTML) bMatches = false; } else if (bWildcardMatch) { if (bCaseSensitive) { if (!StringHelper::WildcardCompareNoCase (sOuterHTML, sTempOuterHTML)) bMatches = false; } else { if (!StringHelper::WildcardCompare (sOuterHTML, sTempOuterHTML)) bMatches = false; } } // Just locate the text inside! else { if (sTempOuterHTML.Find (sOuterHTML) == -1) bMatches = false; } } if (bMatches && bInnerHTML) { if (bExactMatch) { if (sTempInnerHTML != sInnerHTML) bMatches = false; } else if (bWildcardMatch) { if (bCaseSensitive) { if (!StringHelper::WildcardCompareNoCase (sInnerHTML, sTempInnerHTML)) bMatches = false; } else { if (!StringHelper::WildcardCompare (sInnerHTML, sTempInnerHTML)) bMatches = false; } } // Just locate the text inside! else { if (sTempInnerHTML.Find (sInnerHTML) == -1) bMatches = false; } } if (bMatches && bTooltip) { if (bExactMatch) { if (sTempTooltip != sTooltip) bMatches = false; } else if (bWildcardMatch) { if (bCaseSensitive) { if (!StringHelper::WildcardCompareNoCase (sTooltip, sTempTooltip)) bMatches = false; } else { if (!StringHelper::WildcardCompare (sTooltip, sTempTooltip)) bMatches = false; } } // Just locate the text inside! else { if (sTempTooltip.Find (sTooltip) == -1) bMatches = false; } } // Done with the comparisons! if (bMatches) { //if (IDCANCEL == AfxMessageBox (_T ("Tag: ") + sTempTagName + _T ("\r\nOuter: ") + sTempOuterHTML + _T ("\r\nInner: ") + sTempInnerHTML + _T ("\r\nTooltip: ") + sTempTooltip, MB_OKCANCEL)) // bSearch = false; // No need to search more! bSearch = false; if (bClick) pElem->click (); } pElem->Release (); } pElemDispatch->Release (); } } pColl->Release (); } pHtmlDoc->Release(); } pHtmlDocDispatch->Release (); } sRetTagName.Empty (); sRetOuterHTML.Empty (); sRetInnerHTML.Empty (); sRetTooltip.Empty (); if (bSearch == false) return true; return false; }
bool CMyInternetExplorer::FindOption (bool bClick, bool bValue, bool bText, LPCTSTR sValue, LPCTSTR sText) { ASSERT (m_pWebBrowser != NULL); if (m_pWebBrowser == NULL) return false; HRESULT hr; IDispatch* pHtmlDocDispatch = NULL; IHTMLDocument2 * pHtmlDoc = NULL; bool bSearch = true; // Retrieve the document object. hr = m_pWebBrowser->get_Document (&pHtmlDocDispatch); if (SUCCEEDED (hr) && (pHtmlDocDispatch != NULL)) { hr = pHtmlDocDispatch->QueryInterface (IID_IHTMLDocument2, (void**)&pHtmlDoc); if (SUCCEEDED (hr) && (pHtmlDoc != NULL)) { IHTMLElementCollection* pColl = NULL; hr = pHtmlDoc->get_all (&pColl); if (SUCCEEDED (hr) && (pColl != NULL)) { // Obtained the Anchor Collection... long nLength = 0; pColl->get_length (&nLength); for (int i = 0; i < nLength && bSearch; i++) { COleVariant vIdx ((long)i, VT_I4); IDispatch* pElemDispatch = NULL; IHTMLElement * pElem = NULL; hr = pColl->item (vIdx, vIdx, &pElemDispatch); if (SUCCEEDED (hr) && (pElemDispatch != NULL)) { hr = pElemDispatch->QueryInterface(IID_IHTMLElement, (void**)&pElem); if (SUCCEEDED (hr) && (pElem != NULL)) { BSTR bstrTagName; CString sTempTagName; if (!FAILED (pElem->get_tagName (&bstrTagName))) { sTempTagName = bstrTagName; sTempTagName.MakeLower (); SysFreeString (bstrTagName); } if (sTempTagName == _T ("option")) { IHTMLOptionElement * pOption = NULL; hr = pElemDispatch->QueryInterface (IID_IHTMLOptionElement, (void**)&pOption); if (SUCCEEDED (hr) && (pOption != NULL)) { BSTR bstrValue, bstrText; CString sTempValue, sTempText; if (!FAILED (pOption->get_value (&bstrValue))) { sTempValue = bstrValue; SysFreeString (bstrValue); } if (!FAILED (pOption->get_text (&bstrText))) { sTempText = bstrText; SysFreeString (bstrText); } //if (IDCANCEL == AfxMessageBox (_T ("Value: ") + sTempValue + _T ("\r\nText: ") + sTempText, MB_OKCANCEL)) // bSearch = false; // Do the comparison here! bool bMatches = true; if (bMatches && bValue) { if (!StringHelper::WildcardCompareNoCase (sValue, sTempValue)) bMatches = false; } if (bMatches && bText) { if (!StringHelper::WildcardCompareNoCase (sText, sTempText)) bMatches = false; } if (bMatches) { // No need to search more! bSearch = false; pOption->put_selected (VARIANT_TRUE); if (bClick) pElem->click (); } pOption->Release (); } } pElem->Release (); } pElemDispatch->Release (); } } pColl->Release (); } pHtmlDoc->Release(); } pHtmlDocDispatch->Release (); } if (bSearch == false) return true; return false; }
bool CMyInternetExplorer::GetInput (IDispatch* pHtmlDocDispatch,bool bClick, bool bSelect, bool bChangeValue, bool bSetCheck, bool bType, bool bName, bool bValue, LPCTSTR sTypeToLook, LPCTSTR sNameToLook, LPCTSTR sValueToLook, bool bNewCheckValue, LPCTSTR sNewValue,LPTSTR szValue) { // ASSERT (m_pWebBrowser != NULL); // if (m_pWebBrowser == NULL) // return false; HRESULT hr; // IDispatch* pHtmlDocDispatch = NULL; IHTMLDocument2 * pHtmlDoc = NULL; bool bSearch = true; // Retrieve the document object. // hr = m_pWebBrowser->get_Document (&pHtmlDocDispatch); if (true && (pHtmlDocDispatch != NULL)) { hr = pHtmlDocDispatch->QueryInterface (IID_IHTMLDocument2, (void**)&pHtmlDoc); if (SUCCEEDED (hr) && (pHtmlDoc != NULL)) { IHTMLElementCollection* pColl = NULL; hr = pHtmlDoc->get_all (&pColl); if (SUCCEEDED (hr) && (pColl != NULL)) { // Obtained the Anchor Collection... long nLength = 0; pColl->get_length (&nLength); for (int i = 0; i < nLength && bSearch; i++) { COleVariant vIdx ((long)i, VT_I4); IDispatch* pElemDispatch = NULL; IHTMLElement * pElem = NULL; hr = pColl->item (vIdx, vIdx, &pElemDispatch); if (SUCCEEDED (hr) && (pElemDispatch != NULL)) { hr = pElemDispatch->QueryInterface (IID_IHTMLElement, (void**)&pElem); if (SUCCEEDED (hr) && (pElem != NULL)) { BSTR bstrTagName; CString sTempTagName; if (!FAILED (pElem->get_tagName (&bstrTagName))) { sTempTagName = bstrTagName; sTempTagName.MakeLower (); //AfxMessageBox (sTempTagName); SysFreeString (bstrTagName); } if (sTempTagName == _T ("input")) { IHTMLInputElement * pInputElem = NULL; hr = pElemDispatch->QueryInterface (IID_IHTMLInputElement, (void**)&pInputElem); if (SUCCEEDED (hr) && (pInputElem != NULL)) { BSTR bstrType, bstrName, bstrValue; CString sTempType, sTempName, sTempValue; if (!FAILED (pInputElem->get_type (&bstrType))) { sTempType = bstrType; SysFreeString (bstrType); } if (!FAILED (pInputElem->get_name (&bstrName))) { sTempName = bstrName; SysFreeString (bstrName); } if (!FAILED (pInputElem->get_value (&bstrValue))) { sTempValue = bstrValue; SysFreeString (bstrValue); } //AfxMessageBox (_T ("Name: ") + sTempName + _T ("\r\nType: ") + sTempType + _T ("\r\nValue: ") + sTempValue); // Do the comparison here! lstrcpy(szValue,sTempValue); bool bMatches = true; if (bMatches && bType) { if (!StringHelper::WildcardCompareNoCase (sTypeToLook, sTempType)) bMatches = false; } if (bMatches && bName) { if (!StringHelper::WildcardCompareNoCase (sNameToLook, sTempName)) bMatches = false; } if (bMatches && bValue) { if (!StringHelper::WildcardCompareNoCase (sValueToLook, sTempValue)) bMatches = false; } if (bMatches) { // No need to search more! bSearch = false; if (bSetCheck) { if (bNewCheckValue) pInputElem->put_checked (VARIANT_TRUE); else pInputElem->put_checked (VARIANT_FALSE); } if (bChangeValue) { CString sTemp (sNewValue); BSTR bstrNewValue = sTemp.AllocSysString (); pInputElem->put_value (bstrNewValue); SysFreeString (bstrNewValue); } if (bSelect) pInputElem->select (); if (bClick) pElem->click (); } pInputElem->Release (); } } pElem->Release (); } pElemDispatch->Release (); } } pColl->Release (); } pHtmlDoc->Release(); } pHtmlDocDispatch->Release (); } if (bSearch == false) return true; return false; }
bool CMyInternetExplorer::FindAnchor (bool bClick, bool bFocus, bool bName, bool bOuterText, bool bTooltip, bool bURL, LPCTSTR sName, LPCTSTR sOuterText, LPCTSTR sTooltip, LPCTSTR sURL) { ASSERT (m_pWebBrowser != NULL); if (m_pWebBrowser == NULL) return false; HRESULT hr; IDispatch* pHtmlDocDispatch = NULL; IHTMLDocument2 * pHtmlDoc = NULL; bool bSearch = true; // Retrieve the document object. hr = m_pWebBrowser->get_Document (&pHtmlDocDispatch); if (SUCCEEDED (hr) && (pHtmlDocDispatch != NULL)) { hr = pHtmlDocDispatch->QueryInterface (IID_IHTMLDocument2, (void**)&pHtmlDoc); if (SUCCEEDED (hr) && (pHtmlDoc != NULL)) { IHTMLElementCollection* pColl = NULL; hr = pHtmlDoc->get_all (&pColl); if (SUCCEEDED (hr) && (pColl != NULL)) { // Obtained the Anchor Collection... long nLength = 0; pColl->get_length (&nLength); for (int i = 0; i < nLength && bSearch; i++) { COleVariant vIdx ((long)i, VT_I4); IDispatch* pElemDispatch = NULL; IHTMLElement * pElem = NULL; hr = pColl->item (vIdx, vIdx, &pElemDispatch); if (SUCCEEDED (hr) && (pElemDispatch != NULL)) { hr = pElemDispatch->QueryInterface (IID_IHTMLElement, (void**)&pElem); if (SUCCEEDED (hr) && (pElem != NULL)) { BSTR bstrTagName; CString sTempTagName; if (!FAILED (pElem->get_tagName (&bstrTagName))) { sTempTagName = bstrTagName; SysFreeString (bstrTagName); } if (sTempTagName == _T ("a") || sTempTagName == _T ("A")) { IHTMLAnchorElement * pAnchor = NULL; hr = pElemDispatch->QueryInterface(IID_IHTMLAnchorElement, (void**)&pAnchor); if (SUCCEEDED (hr) && (pAnchor != NULL)) { BSTR bstrName, bstrOuterText, bstrURL, bstrTooltip; CString sTempName, sTempOuter, sTempURL, sTempTooltip; if (!FAILED (pElem->get_outerText (&bstrOuterText))) { sTempOuter = bstrOuterText; SysFreeString (bstrOuterText); } if (!FAILED (pElem->get_title (&bstrTooltip))) { sTempTooltip = bstrTooltip; SysFreeString (bstrTooltip); } if (!FAILED (pAnchor->get_name (&bstrName))) { sTempName = bstrName; SysFreeString (bstrName); } if (!FAILED (pAnchor->get_href (&bstrURL))) { sTempURL = bstrURL; SysFreeString (bstrURL); } // Do the comparison here! bool bMatches = true; if (bMatches && bName) { if (!StringHelper::WildcardCompareNoCase (sName, sTempName)) bMatches = false; } if (bMatches && bOuterText) { if (!StringHelper::WildcardCompareNoCase (sOuterText, sTempOuter)) bMatches = false; } if (bMatches && bURL) { if (!StringHelper::WildcardCompareNoCase (sURL, sTempURL)) bMatches = false; } if (bMatches && bTooltip) { if (!StringHelper::WildcardCompareNoCase (sTooltip, sTempTooltip)) bMatches = false; } if (bMatches) { // No need to search more! bSearch = false; if (bFocus) pAnchor->focus (); if (bClick) pElem->click (); } pAnchor->Release (); } } pElem->Release (); } pElemDispatch->Release (); } } pColl->Release (); } pHtmlDoc->Release(); } pHtmlDocDispatch->Release (); } if (bSearch == false) return true; return false; }