vc列举浏览器“历史”记录

VC MFC程序，列举浏览器“历史”记录并记录到文件中：

void CMy111Dlg::OnButton1() 

{

	HRESULT   hr; 

	IUrlHistoryStg2   *puhs; 

	IEnumSTATURL   *pesu; 

	STATURL   su; 

	ULONG   celt; 

	_bstr_t   bstr; 

	

	hr = ::CoCreateInstance(CLSID_CUrlHistory, NULL, CLSCTX_INPROC_SERVER, IID_IUrlHistoryStg, (LPVOID*)&puhs); 

	if(SUCCEEDED(hr)) 

	{ 

		hr = puhs-> EnumUrls(&pesu);

		if(SUCCEEDED(hr)) 

		{

			CStdioFile file;

			if(file.Open("history.txt", CFile::modeCreate | CFile::modeWrite))

			{

				while(SUCCEEDED(pesu->Next(1, &su, &celt)) && celt > 0)

				{ 

					bstr = su.pwcsUrl;

					file.WriteString(bstr + "\n");

				}

				file.Close();

			}

			puhs-> Release();

		}

	}

}

 千万不要忘了添加头文件：

#include  <urlhist.h>   //   Needed   for   IUrlHistoryStg2   and   IID_IUrlHistoryStg2
#include <COMDEF.H>