通过ITravelLogStg把历史纪录换掉 The Log Less Traveled Dear Web Team, Is there a way to access and modify a WebBrowser control's session history? I need to be able to obtain (and/or change) the URL and text description of the session history entries? Any help you can provide will be appreciated. George Loo The Web Team Replies: Starting with Internet Explorer 5.5, the WebBrowser control exposes this information to its host through a family of interfaces known as the travel log interfaces ("travel log" being the IE lingo for session history). These interfaces not only give a WebBrowser control access to all the URLs and titles in the history, but also provide a nifty enumeration interface to make traversal of the list that much easier. Now why you would want to go replacing user's history entries with alternate entries is beyond us, but for the purposes of this sample, we'll assume you're trying to replace potentially embarrassing URLs with much cooler ones—like replacing all occurrences of www.starlandvocalband.com or www.ghostdad.com with the much more satisfying http://msdn.microsoft.com/ie. To this end, here is some code that goes through the URLs the user has visited so far and performs just these substitutions: HRESULT hr = S_OK; IServiceProvider* pISP = NULL; ITravelLogStg* pTLStg = NULL; ITravelLogEntry* pTLEntry = NULL; IEnumTravelLogEntry* pTLEnum = NULL;if (FAILED(pWB->QueryInterface(IID_IServiceProvider, (void**) &pISP)) || pISP == NULL) goto Cleanup;if (FAILED(pISP->QueryService(SID_STravelLogCursor, IID_ITravelLogStg, (void**) &pTLStg)) || pTLStg == NULL) goto Cleanup;if (SUCCEEDED(pTLStg->EnumEntries(TLEF_RELATIVE_BACK, &pTLEnum)) && pTLEnum) { hr = pTLEnum->Next(1, &pTLEntry, NULL); while (hr != S_FALSE) { LPOLESTR szURL; if (SUCCEEDED(pTLEntry->GetURL(&szURL)) && szURL) { if (wcsstr(szURL, L"www.starlandvocalband.com") || wcsstr(szURL, L"www.ghostdad.com")) { ITravelLogEntry* pTLNewEntry = NULL; hr = pTLStg->CreateEntry(L"http://msdn.microsoft.com/ie", L"MSDN Online Internet Explorer Developer Center", pTLEntry, FALSE, &pTLNewEntry); hr = pTLStg->RemoveEntry(pTLEntry); } } pTLEntry->Release(); pTLEntry = NULL; hr = pTLEnum->Next(1, &pTLEntry, NULL); } }Cleanup:if (pTLStg) pTLStg->Release();if (pTLEnum) pTLEnum->Release();For the full specs on each of these interfaces, check out http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/travellog/travellog.asp. "Sky rockets in flight…"
帮你up一下！
不知道什么boh，行不行？
如果你在写服务器端的程序，
只需将网页的expire设为零就可以了，
如果你想在自己机器上这么做，
那一定别人用很简单的办法就可以绕过你这个屏蔽而后退
这一点我可以肯定很容易做到，
不超过十行VB代码
The Log Less Traveled
Dear Web Team,
Is there a way to access and modify a WebBrowser control's session history? I need to be able to obtain (and/or change) the URL and text description of the session history entries?
Any help you can provide will be appreciated.
George Loo
The Web Team Replies:
Starting with Internet Explorer 5.5, the WebBrowser control exposes this information to its host through a family of interfaces known as the travel log interfaces ("travel log" being the IE lingo for session history). These interfaces not only give a WebBrowser control access to all the URLs and titles in the history, but also provide a nifty enumeration interface to make traversal of the list that much easier. Now why you would want to go replacing user's history entries with alternate entries is beyond us, but for the purposes of this sample, we'll assume you're trying to replace potentially embarrassing URLs with much cooler ones—like replacing all occurrences of www.starlandvocalband.com or www.ghostdad.com with the much more satisfying http://msdn.microsoft.com/ie. To this end, here is some code that goes through the URLs the user has visited so far and performs just these substitutions:
HRESULT hr = S_OK;
IServiceProvider* pISP = NULL;
ITravelLogStg* pTLStg = NULL;
ITravelLogEntry* pTLEntry = NULL;
IEnumTravelLogEntry* pTLEnum = NULL;if (FAILED(pWB->QueryInterface(IID_IServiceProvider, (void**) &pISP))
|| pISP == NULL)
goto Cleanup;if (FAILED(pISP->QueryService(SID_STravelLogCursor, IID_ITravelLogStg, (void**) &pTLStg))
|| pTLStg == NULL)
goto Cleanup;if (SUCCEEDED(pTLStg->EnumEntries(TLEF_RELATIVE_BACK, &pTLEnum)) && pTLEnum)
{
hr = pTLEnum->Next(1, &pTLEntry, NULL); while (hr != S_FALSE)
{
LPOLESTR szURL;
if (SUCCEEDED(pTLEntry->GetURL(&szURL)) && szURL)
{
if (wcsstr(szURL, L"www.starlandvocalband.com") ||
wcsstr(szURL, L"www.ghostdad.com"))
{
ITravelLogEntry* pTLNewEntry = NULL; hr = pTLStg->CreateEntry(L"http://msdn.microsoft.com/ie",
L"MSDN Online Internet Explorer Developer Center",
pTLEntry,
FALSE,
&pTLNewEntry);
hr = pTLStg->RemoveEntry(pTLEntry);
}
}
pTLEntry->Release();
pTLEntry = NULL;
hr = pTLEnum->Next(1, &pTLEntry, NULL);
}
}Cleanup:if (pTLStg)
pTLStg->Release();if (pTLEnum)
pTLEnum->Release();For the full specs on each of these interfaces, check out http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/travellog/travellog.asp. "Sky rockets in flight…"