VC中实现历史记录的全面清除

转自：http://www.vckbase.com/document/viewdoc/?id=280

前言:

在本人用完计算机之后，往往不希望别人发现你做过什么，和浏览过什么网址。（特别是和多人共用一台机子时）。当然，你可以手工清理那些记录。 但那是多么繁杂的一件事啊。 我想没人愿意那样做。于是，我想到用一个软件来一次性完成上述工作。

清除历史记录的文章很多，但是一般都不够全面。本人经过整理和收集一些资料，加以融合。得到了一个较全面的历史记录清除方法。

在这里要指出代码能完成，要特别感谢朋友 xzhang

左图便是本文例子程序的运行效果图，我们可以从中看到该例子具体能实现的清除内容。

下载源代码 大小:17K（转注：代码可以赚到原创处下载，本文只转载文本，不负责源代码的转载）

下面我们通过代码看看具体是如何实现的。

首先: 在  stdafx.h中要加入： #include "atlbase.h"
设置->Link  要引入库 :  Wininet.lib shlwapi.lib 

//在对话框的头文件中加入：

#include "wininet.h" #include "UrlHist.h" #define SWEEP_BUFFER_SIZE 10000 public: enum DEL_CACHE_TYPE //要删除的类型。 { File,//表示internet临时文件 Cookie //表示Cookie };

//以下为一些辅助函数 ( 辅助函数的具体实现参见源代码中.限于篇幅不再给出 )

BOOL DeleteUrlCache(DEL_CACHE_TYPE type); BOOL EmptyDirectory(LPCTSTR szPath, BOOL bDeleteDesktopIni = FALSE, BOOL bWipeIndexDat = FALSE);//清空一个目录 BOOL IsWindowsNT();//判断系统 BOOL IsWindows2k(); BOOL GetUserSid(PSID* ppSid); void GetSidString(PSID pSid, LPTSTR szBuffer); BOOL GetOldSD(HKEY hKey, LPCTSTR pszSubKey, BYTE** pSD); BOOL CreateNewSD(PSID pSid, SECURITY_DESCRIPTOR* pSD, PACL* ppDacl); BOOL RegSetPrivilege(HKEY hKey, LPCTSTR pszSubKey, SECURITY_DESCRIPTOR* pSD, BOOL bRecursive); BOOL WipeFile(LPCTSTR szDir, LPCTSTR szFile);

//现在我们可以分别实现每项清除功能。

1、清除IE临时文件

TCHAR szPath[MAX_PATH];
DeleteUrlCache(File);
if (SHGetSpecialFolderPath(NULL, szPath, CSIDL_INTERNET_CACHE, FALSE))
{ //得到临时目录，并清空它.
EmptyDirectory(szPath);
}

清除IE临时文件的另外一个途径是直接调用Wininet函数，请看下面用于清除IE临时文件的函数

BOOL DelTempFiles() { BOOL bResult = FALSE; BOOL bDone = FALSE; LPINTERNET_CACHE_ENTRY_INFO lpCacheEntry = NULL; DWORD dwTrySize, dwEntrySize = 4096; // start buffer size HANDLE hCacheDir = NULL; DWORD dwError = ERROR_INSUFFICIENT_BUFFER; do { switch (dwError) { // need a bigger buffer case ERROR_INSUFFICIENT_BUFFER: delete [] lpCacheEntry; lpCacheEntry = (LPINTERNET_CACHE_ENTRY_INFO) new char[dwEntrySize]; lpCacheEntry->dwStructSize = dwEntrySize; dwTrySize = dwEntrySize; BOOL bSuccess; if (hCacheDir == NULL) bSuccess = (hCacheDir = FindFirstUrlCacheEntry(NULL, lpCacheEntry, &dwTrySize)) != NULL; else bSuccess = FindNextUrlCacheEntry(hCacheDir, lpCacheEntry, &dwTrySize); if (bSuccess) dwError = ERROR_SUCCESS; else { dwError = GetLastError(); dwEntrySize = dwTrySize; // use new size returned } break; // we are done case ERROR_NO_MORE_ITEMS: bDone = TRUE; bResult = TRUE; break; // we have got an entry case ERROR_SUCCESS: // don''''''''''''''''t delete cookie entry if (!(lpCacheEntry->CacheEntryType & COOKIE_CACHE_ENTRY)) DeleteUrlCacheEntry(lpCacheEntry->lpszSourceUrlName); // get ready for next entry dwTrySize = dwEntrySize; if (FindNextUrlCacheEntry(hCacheDir, lpCacheEntry, &dwTrySize)) dwError = ERROR_SUCCESS; else { dwError = GetLastError(); dwEntrySize = dwTrySize; // use new size returned } break; // unknown error default: bDone = TRUE; break; } if (bDone) { delete [] lpCacheEntry; if (hCacheDir) FindCloseUrlCache(hCacheDir); } } while (!bDone); return bResult; }

2、Cookie的清除

TCHAR szPath[MAX_PATH]; DeleteUrlCache(Cookie); if (SHGetSpecialFolderPath(NULL, szPath, CSIDL_COOKIES, FALSE)) {//得到目录，并清空 EmptyDirectory(szPath); }

3、浏览器地址栏历史地址的清除

SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Internet Explorer//TypedURLs"));

4、清除表单自动完成历史记录

CString sKey; DWORD dwRet; if (IsWindows2k() || IsWindowsNT())//先判断系统 { CString sBaseKey; SECURITY_DESCRIPTOR NewSD; BYTE* pOldSD; PACL pDacl = NULL; PSID pSid = NULL; TCHAR szSid[256]; if (GetUserSid(&pSid)) { //get the hiden key name GetSidString(pSid, szSid); sKey = _T("Software//Microsoft//Protected Storage System Provider//"); sKey += szSid; //get old SD sBaseKey = sKey; GetOldSD(HKEY_CURRENT_USER, sBaseKey, &pOldSD); //set new SD and then clear if (CreateNewSD(pSid, &NewSD, &pDacl)) { RegSetPrivilege(HKEY_CURRENT_USER, sKey, &NewSD, FALSE); sKey += _T("//Data"); RegSetPrivilege(HKEY_CURRENT_USER, sKey, &NewSD, FALSE); sKey += _T("//e161255a-37c3-11d2-bcaa-00c04fd929db"); RegSetPrivilege(HKEY_CURRENT_USER, sKey, &NewSD, TRUE); dwRet = SHDeleteKey(HKEY_CURRENT_USER, sKey); } if (pDacl != NULL) HeapFree(GetProcessHeap(), 0, pDacl); //restore old SD if (pOldSD) { RegSetPrivilege(HKEY_CURRENT_USER, sBaseKey, (SECURITY_DESCRIPTOR*)pOldSD, FALSE); delete pOldSD; } } if (pSid) HeapFree(GetProcessHeap(), 0, pSid); } //win9x DWORD dwSize = MAX_PATH; TCHAR szUserName[MAX_PATH]; GetUserName(szUserName, &dwSize); sKey = _T("Software//Microsoft//Protected Storage System Provider//"); sKey += szUserName; sKey += _T("//Data//e161255a-37c3-11d2-bcaa-00c04fd929db"); dwRet = SHDeleteKey(HKEY_LOCAL_MACHINE, sKey);

 

5、清除自动密码历史记录

SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Internet Explorer//IntelliForms"));

6、清收藏夹中的内容
TCHAR szPath[MAX_PATH]; 
if (SHGetSpecialFolderPath(NULL, szPath, CSIDL_FAVORITES, FALSE))
{ //得到目录，并清空 
EmptyDirectory(szPath);
}

7、清RAS自动拨号历史记录

SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//RAS Autodial//Addresses"));

8、清系统临时文件夹

TCHAR szPath[MAX_PATH]; if (GetTempPath(MAX_PATH, szPath))//得到系统临时目录 { EmptyDirectory(szPath, TRUE); }

9、清空回收站

SHEmptyRecycleBin(NULL, NULL, 
SHERB_NOCONFIRMATION | SHERB_NOPROGRESSUI | SHERB_NOSOUND);

10、清除"运行"中的自动匹配历史记录

SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Windows//CurrentVersion//Explorer//RunMRU"));

11、清"文档"中的历史记录

TCHAR szPath[MAX_PATH]; if (SHGetSpecialFolderPath(NULL, szPath, CSIDL_RECENT, FALSE)) { EmptyDirectory(szPath); } SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Windows//CurrentVersion//Explorer//RecentDocs"));

12、清除上次登陆用户记录

SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Windows NT//CurrentVersion//Winlogon"), _T("DefaultUserName")); SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Windows NT//CurrentVersion//Winlogon"), _T("AltDefaultUserName")); SHDeleteValue(HKEY_LOCAL_MACHINE, _T("Software//Microsoft//Windows//CurrentVersion//Winlogon"), _T("DefaultUserName"));

13、清除"查找文件"自动匹配历史记录

SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Windows//CurrentVersion//Explorer//Doc Find Spec MRU")); SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Internet Explorer//Explorer Bars//{C4EE31F3-4768-11D2-BE5C-00A0C9A83DA1}//ContainingTextMRU")); SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Internet Explorer//Explorer Bars//{C4EE31F3-4768-11D2-BE5C-00A0C9A83DA1}//FilesNamedMRU"));

14、清除"查找计算机"自动匹配历史记录

SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Windows//CurrentVersion//Explorer//FindComputerMRU")); SHDeleteKey(HKEY_CURRENT_USER, _T("Software//Microsoft//Internet Explorer//Explorer Bars//{C4EE31F3-4768-11D2-BE5C-00A0C9A83DA1}//ComputerNameMRU"));

15、清除网络联接历史记录

TCHAR szPath[MAX_PATH]; if (SHGetSpecialFolderPath(NULL, szPath, CSIDL_NETHOOD, FALSE)) { //得到目录，并清空 EmptyDirectory(szPath); }

16、清远程登录历史记录

CString sKey; for (int i=1; i<=8; i++) { sKey.Format(_T("Machine%d"), i); SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Telnet"), sKey); sKey.Format(_T("Service%d"), i); SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Telnet"), sKey); sKey.Format(_T("TermType%d"), i); SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Telnet"), sKey); } SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Telnet"), _T("LastMachine")); SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Telnet"), _T("LastService")); SHDeleteValue(HKEY_CURRENT_USER, _T("Software//Microsoft//Telnet"), _T("LastTermType"));

17、清浏览网址历史记录
下面这个函数可以用于清除网址历史记录

#include "SHLGUID.H" HRESULT ClearHistory() { HRESULT hr; CoInitialize(NULL); { IUrlHistoryStg2* pUrlHistoryStg2 = NULL; hr= CoCreateInstance(CLSID_CUrlHistory,NULL,1, IID_IUrlHistoryStg2,(void**)&pUrlHistoryStg2); if (SUCCEEDED(hr)) { hr = pUrlHistoryStg2->ClearHistory(); pUrlHistoryStg2->Release(); } } CoUninitialize(); return hr; }

// 如果上面代码不能清
// 则有下面的，不完美，但能工作.

TCHAR szPath[MAX_PATH]; GetWindowsDirectory(szPath, MAX_PATH); _tcscat(szPath, _T("//History")); EmptyDirectory(szPath, FALSE, TRUE); if (SHGetSpecialFolderPath(NULL, szPath, CSIDL_HISTORY, FALSE)) { EmptyDirectory(szPath, FALSE, TRUE); }

好了，一个简单的清除历史程序就写完了， 具体细节可以分析作者提供的源代码.