VC产生的临时文件有时真的很烦人!当你编译一个程序，突然系统弹出一个对话框：“D盘已经没有足够的空间~~~~~~~~~请问需要进行磁盘清理吗”，而它只能清掉了Nkb的东东，你有什么理由不自己写一个专门清理VC垃圾的小工具呢？隔一段时间运行一次，彻底清除指定类型的垃圾文件：干干净净，中国人，奇强!
很明显，这个程序的核心代码肯定是一个有通配符的功能的递归查找文件的函数。我的想法是先查找给定目录下的所有符合条件的文件，再递归查找下级文件夹下所有符合条件的文件。为了保证其封闭性，我用了一个 CStringList& 变量来保存搜索结果。如果您有好的建议，请给我发邮件。下面是代码：
CStringList& CDelTempDlg::SearchFile(CString strFileName,
CString strPath,
CStringList &listFileName)
{
char szFullPathName[MAX_PATH];
/*static*/ WIN32_FIND_DATA findData;
SetCurrentDirectory(strPath);
HANDLE hFindHandle = FindFirstFile(strFileName, &findData);
if ((hFindHandle != INVALID_HANDLE_VALUE))
{
if (!(findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))
{
GetFullPathName(findData.cFileName,
MAX_PATH,
szFullPathName,
NULL);
listFileName.AddTail(szFullPathName);
}
while (FindNextFile(hFindHandle, &findData) != 0)
{
if (!(findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))
{
GetFullPathName(findData.cFileName,
MAX_PATH,
szFullPathName,
NULL);
listFileName.AddTail(szFullPathName);
}
}
FindClose(hFindHandle);
}
hFindHandle = FindFirstFile(\"*\", &findData);
if ((hFindHandle != INVALID_HANDLE_VALUE))
{
if (findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
{
if (findData.cFileName[0] != \''.\'')
{
SearchFile(strFileName,
findData.cFileName,
listFileName);
SetCurrentDirectory(\"..\");
}
}
while (FindNextFile(hFindHandle, &findData) != 0)
{
if (findData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
{
if (findData.cFileName[0] != \''.\'')
{
SearchFile(strFileName,
findData.cFileName,
listFileName);
SetCurrentDirectory(\"..\");
}
}
}
FindClose(hFindHandle);
}
return listFileName;
}
另外，程序中还用到了 SHBrowseForFolder、SHGetPathFromIDList 两个API函数来打开文件夹选择的对话框，GetProvateProfileInt、Get(/Write)PrivateProfileString、WritePrivateProfileSection 等函数以方便用户自定义文件类型。因为程序比较简单，里面的一些错误信息显示也就没有单独抽象出来。不提倡读者这样写，呵呵。
程序在VC6.0、Win2000Pro下编译通过。