VB 怎样搜索并且删除文件夹及文件夹下面的所有文件?
比如说要删除文件夹1245564及下面的文件夹和文件.事先不知道文件夹1245564的路径.
[解决办法]
SHFileOperation
函数状态: 正式函数
函数功能描述:文件操作，与 Shell 的动作相同.
函数原型：
WINSHELLAPI int WINAPI SHFileOperation (LPSHFILEOPSTRUCT lpFIleOp);
声明：
Private Declare Function SHFileOperation Lib "shell32.dll " Alias "SHFileOperationA " (lpFileOp As SHFILEOPSTRUCT) As Long
参数：
Private Type SHFILEOPSTRUCT
HWND hwnd; //父窗口句柄
UINT wFunc; //要执行的动作
LPCTSTR pFrom; //源文件路径，可以是多个文件
LPCTSTR pTo; //目标路径，可以是路径或文件名
FILEOP_FLAGS fFlags; //标志，附加选项
BOOL fAnyOperationsAborted; //是否可被中断
LPVOID hNameMappings; //文件映射名字，可在其它 Shell 函数中使用
LPCTSTR lpszProgressTitle; //只在 FOF_SIMPLEPROGRESS 时，指定对话框的标题。
End Type
wFunc 可以为：
Const FO_MOVE = &H1 移动文件
Const FO_COPY = &H2 复制文件
Const FO_DELETE = &H3 删除文件，只使用 pFrom
Const FO_RENAME = &H4 文件重命名
fFlags可以为：
Const FOF_CREATEPROGRESSDLG = &H0 //
Const FOF_MULTIDESTFILES = &H1 //pTo 指定了多个目标文件，而不是单个目录
Const FOF_CONFIRMMOUSE = &H2
Const FOF_SILENT = &H4 // 不显示一个进度对话框
COnst FOF_RENAMEONCOLLISION = &H8 // 碰到有抵触的名字时，自动分配前缀
Const FOF_NOCONFIRMATION = &H10 // 不对用户显示提示
Const FOF_WANTMAPPINGHANDLE = &H20 // 填充 hNameMappings 字段，必须使用 SHFreeNameMappings 释放
Const FOF_ALLOWUNDO = &H40 // 允许撤销
Const FOF_FILESONLY = &H80 // 使用 *.* 时, 只对文件操作
Const FOF_SIMPLEPROGRESS = &H100 // 简单进度条，意味者不显示文件名。
Const FOF_NOCONFIRMMKDIR = &H200 // 建新目录时不需要用户确定
Const FOF_NOERRORUI = &H400 // 不显示出错用户界面
Const FOF_NOCOPYSECURITYATTRIBS = &H800 // 不复制 NT 文件的安全属性
返回值：
函数成功返回 0 ，失败返回非 0 。
详细说明：
函数中参数类型为一个LPSHFILEOPSTRUCT结构，它包含有进行文件操作的各种信息，在这个结构中，hWnd是指向发送消息的窗口句柄，pFrom与pTo是进行文件操作的源文件名和目标文件名，它包含文件的路径，对应单个文件的路径字符串，或对于多个文件，必须以NULL作为字符串的结尾或文件路径名之间的间隔，否则在程序运行的时候会发生错误。另外，pFrom和pTo都支持通配符*和?。
wFunc 是结构中的一个非常重要的成员，它代表着函数将要进行的操作类型。
使用该函数进行文件拷贝、移动或删除时，如果需要的时间很长，则程序会自动在进行的过程中出现一个无模式的对话框（Windows操作系统提供的文件操作对话框），用来显示执行的进度和执行的时间，以及正在拷贝、移动或删除的文件名，此时结构中的成员lpszProgressTitle显示此对话框的标题。fFlags是在进行文件操作时的过程和状态控制标识。
