周峻弘 发表于 2019-6-13 09:46

一句话清空回收站

```cpp
#include <shlobj.h>
#include <shlwapi.h>
#include <iostream>
#pragma comment(lib,"Shell32.lib")

DWORD ListFileInRecycleBin(){
    CHAR pszPath;   // 保存路径
    // IShellFolder接口
    IShellFolder *pisf = NULL;
    IShellFolder *pisfRecBin = NULL;
    // 获取“根”目录,桌面
    SHGetDesktopFolder(&pisfRecBin);
    IEnumIDList *peidl = NULL;// 对象遍历接口
    LPITEMIDLIST pidlBin = NULL;
    LPITEMIDLIST idlCurrent = NULL;
    LPMALLOC pMalloc = NULL;
    // 分配
    SHGetMalloc(&pMalloc);
    // 回收站位置
    SHGetFolderLocation(NULL, CSIDL_BITBUCKET, NULL, 0, &pidlBin);
    // 绑定回收站对象
    pisfRecBin->BindToObject(pidlBin,NULL,IID_IShellFolder,(void **) &pisf);
    // 列举回收站中的对象,得到IEnumIDList接口,包括SHCONTF_FOLDERS、
    // SHCONTF_NONFOLDERS、SHCONTF_INCLUDEHIDDEN类型的对象
    pisf->EnumObjects(NULL, SHCONTF_FOLDERS | SHCONTF_NONFOLDERS |SHCONTF_INCLUDEHIDDEN, &peidl);

    STRRET strret;ULONG uFetched;

    HANDLE hOutPut = GetStdHandle(STD_OUTPUT_HANDLE);
    printf("\n哪些文件在回收站:\n");
    while(1)
    {
      // 遍历IEnumIDList对象,idlCurrent为当前对象
      if(peidl->Next(1,&idlCurrent,&uFetched) == S_FALSE)
            break;
      // 获取回收站当前对象当前的路径,这里没有输出结果,读者可自行修改
      SHGetPathFromIDList(idlCurrent,pszPath);
      // DisplayName,删除前的路径
      pisf->GetDisplayNameOf(idlCurrent,SHGDN_NORMAL,&strret);
      // 显示,printf可能会造成字符编码不正确。
      WriteConsoleW(hOutPut,strret.pOleStr,lstrlenW(strret.pOleStr),NULL,NULL);
      WriteConsoleW(hOutPut,L"\n", 1, NULL, NULL);
      //DeleteFile(strret.cStr);
      //
    }
    // 释放资源
    pMalloc->Free(pidlBin);
    pMalloc->Free(strret.pOleStr);
    pMalloc->Release();
    peidl->Release();
    pisf->Release();
    return 0;   
}
void 清空(){//这才是关键
    SHEmptyRecycleBin(NULL,NULL,SHERB_NOCONFIRMATION|SHERB_NOPROGRESSUI|SHERB_NOSOUND);
}
void main(){
    //ListFileInRecycleBin();
    清空();
}

```

周峻弘 发表于 2019-6-13 10:08

Triad 发表于 2019-6-13 10:02
呃,何不右键清空呢

这个与右键清空一样,只是我找了半天找到的编程实现.
我本来想列举出文件在回收站的地址,然后一个个删掉,可惜找不出来.网上没有.
然后就只有将就了.
当你回收站里面有几万个项目时,你就知道崩溃了.右键回收,我的电脑里面消耗1个G的内存都还没找完文件.结果还清不了.
本来推荐的是recyclebinEx,这个的,发表到精品软件,被删了.
微软连个小小的回收站清空都写不好啊.

JuncoJet 发表于 2019-6-13 10:12

Private Declare Sub SHEmptyRecycleBin Lib "shell32.dll" Alias "SHEmptyRecycleBinA" (ByVal hwnd As Long, ByVal pszRootPath As String, ByVal dwFlags As Long)

Private Sub Command1_Click()
    SHEmptyRecycleBin 0, "", 1 + 2 + 4
End Sub


ccph 发表于 2019-6-13 09:56

用#define比较好

鲶鱼的忧郁 发表于 2019-6-13 09:59

有点鸡肋吗

fyypll 发表于 2019-6-13 09:59

路过看看,学习了:loveliness:

VIP土豪什么都买 发表于 2019-6-13 10:02

路过,学习一下,表示不敢尝试

Triad 发表于 2019-6-13 10:02

呃,何不右键清空呢

linjian 发表于 2019-6-13 10:04

挺不错的样子

JuncoJet 发表于 2019-6-13 10:14

页: [1] 2
查看完整版本: 一句话清空回收站