webbrowser弹出网页的问题

long12 2005-12-20 12:44:22
如何用webbrowser1.navigate url以弹出网页的方式打开,同时截获该网页(url已改变)的新地址并显示在文本框中? 谢谢!!
...全文
161 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
蒋晟 2005-12-26
  • 打赏
  • 举报
回复
处理DocumentComplete事件,其中的SQL参数就是
新地址
void CIEAutomationView::OnDocumentComplete(LPDISPATCH pDisp, LPCTSTR lpszUrl)
{
// make sure the main frame has the new URL. This call also stops the animation

CString strURL(lpszUrl);
IUnknown* pUnkBrowser = NULL;
IUnknown* pUnkDisp = NULL;
TRACE(_T("Document %s Done\r\n"),lpszUrl);
//is it top level document?
HRESULT hr = m_pBrowserApp->QueryInterface( IID_IUnknown, (void**)&pUnkBrowser);
if ( SUCCEEDED(hr) ){
hr = pDisp->QueryInterface( IID_IUnknown, (void**)&pUnkDisp );
if ( SUCCEEDED(hr) ){
if ( pUnkBrowser == pUnkDisp ){
((CChildFrame*)GetParentFrame())->SetAddress(lpszUrl);
//top level
m_spHtmlDoc=NULL;
hr=m_pBrowserApp->get_Document(&m_spHtmlDoc);
TRACE(_T("Downloading Complete\r\n"),lpszUrl);
if(m_spHtmlDoc){
CComPtr<ITypeInfo> pTypeInfo;
HRESULT hr = S_OK;
hr= m_spHtmlDoc->GetTypeInfo(0, GetUserDefaultLCID(), &pTypeInfo);
DumpTypeInfo(pTypeInfo);
}
}
pUnkDisp->Release();
}
pUnkBrowser->Release();
}
m_domExternal.FireDocumentComplete(pDisp,COleVariant(lpszUrl));
}
long12 2005-12-21
  • 打赏
  • 举报
回复
这个问题是不是用vb无法实现?
long12 2005-12-20
  • 打赏
  • 举报
回复
哪位朋友能帮忙解答一下? 谢谢!!

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧