说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

请问如何将文件删除到回收站?

编辑:说三道四文库 发布时间:2018-02-21 05:31
HTML文档下载 WORD文档下载 PDF文档下载
请各位高手帮帮我,我希望让用户选择一个文件,然后,如果选择删除按钮的话,那么就将该文件删除到回收站。但是我不知道怎么实现。

还有一个关于DATAGRID的问题
我用以下方法设置了DATAGRID的DATASOURCE:
Set Main.ShowSearchResult.DataSource = Rst

但是我现在想让DATAGRID的DATASOURCE变成空。请问如何实现?
我用Set Main.ShowSearchResult.DataSource = ""报错。

谢谢了!50分!
移动文件到回收站 
声明:
Public Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As Long
End Type

Public Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long

Public Const FO_DELETE = &H3
Public Const FOF_ALLOWUNDO = &H40 
代码:
Dim SHop As SHFILEOPSTRUCT
Dim strFile as string

With SHop
.wFunc = FO_DELETE
.pFrom = strFile + Chr(0)
.fFlags = FOF_ALLOWUNDO
End With

SHFileOperation SHop 
关于DATAGRID的问题
我的经验是DATAGRID要先初始化,指定DATAGRID一些必要的属性
rainstormmaster(rainstormmaster) :可以说的清楚一些么?比如哪些属性?UP


还有,谢谢你的回收站代码,我实现过了,可以用。谢谢!
问题已经全部解决。给分。
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘