我想删除存储在USB闪存盘中的文件(实际上是Android设备的SD卡)。
我要求用户将应用程序的文件夹指向sd卡内,并且我持有指向它的Shell32.Folder
对象。
我可以在文件(FolderItem
对象)之间进行迭代,但是如何使用Shell32
类删除文件?
通常File.Delete(filePath)
不起作用,因为FolderItem.Path
是BSTR数据类型,所以关键是要从一种类型转换为另一种类型,但我无法找到方法这样做。
有什么想法吗?
编辑1:
FolderItem.Path
数据:
" :: {20D04FE0-3AEA-1069-A2D8-08002B30309D} \\\ \ USB#vid_04e8&安培; pid_6860&安培; ms_comp_mtp&安培; GT-P5100#7和; 392be4e4&安培0安培; 0000#{6ac27878-a6fa- 4155-BA85-f98f491d4f33} \ {SID- 10001,SECZ9519043CHOHB,12530364416} \ {015C008D-013D-0145-D300-D300CB009500} \ {015C00EE-013D-0145-0201-37012C010901} \ {025901D2-029D-020F-DE01- FE010D02A601}"
这不是File.Delete
的有效路径。关于如何转换它的任何想法?
编辑2:
打开浏览文件夹窗口的方法,因此用户可以在他的Android设备的SD卡中指出app目录,这样我就可以使用文件夹和文件进行迭代,并与服务器同步一些数据。由于Win8和Shell32之间的问题,以这种方式完成:
public Shell32.Folder GetShell32NameSpace(Object folder)
{
Type shellAppType = Type.GetTypeFromProgID("Shell.Application");
Object shell = Activator.CreateInstance(shellAppType);
return (Shell32.Folder)shellAppType.InvokeMember("NameSpace", System.Reflection.BindingFlags.InvokeMethod, null, shell, new object[] { folder });
}
使用上述方法获取文件夹:
IntPtr windowHandle = new WindowInteropHelper(this).Handle;
Folder androidPath = BrowseForFolder(windowHandle.ToInt32(), "App's data folder", 0, 0);
我创建并将文件复制到应用的数据中。文件夹,因此设备可以识别同步操作,告诉用户并关闭应用程序:
byte[] data = new UTF8Encoding(true).GetBytes("sync_cable");
if (androidPath != null)
{
foreach (FolderItem dir in androidPath.Items())
{
if (dir.IsFolder && dir.Name == "data")
{
Folder dataFolder = GetShell32NameSpace(dir.Path);
if (dataFolder != null)
{
string tempPath = Path.GetTempPath();
string path = Path.Combine(tempPath, flagFileName);
File.WriteAllBytes(path, data);
Folder localPath = GetShell32NameSpace(tempPath);
if (localPath != null)
{
foreach (FolderItem file in localPath.Items())
{
if (file.Name.Contains(flagFileName))
{
dataFolder.CopyHere(file);
break;
}
}
}
}
break;
}
}
}
同步后,我想删除该文件,以便应用程序正常运行:
foreach (FolderItem file in dataFolder.Items())
{
if (file.Name.Contains(flagFileName))
{
// THIS THROWS AN 'INVALID PATH' EXCEPTION
// FileInfo fi = new FileInfo(file.Path);
// fi.Delete();
// THIS ALSO THROWS AN 'INVALID PATH' EXCEPTION
// File.Delete(file.Path);
break;
}
}
如编辑1中所述,我要删除的文件的file.Path
具有以下格式:
" :: {20D04FE0-3AEA-1069-A2D8-08002B30309D} \\\ \ USB#vid_04e8&安培; pid_6860&安培; ms_comp_mtp&安培; GT-P5100#7和; 392be4e4&安培0安培; 0000#{6ac27878-a6fa- 4155-BA85-f98f491d4f33} \ {SID- 10001,SECZ9519043CHOHB,12530364416} \ {015C008D-013D-0145-D300-D300CB009500} \ {015C00EE-013D-0145-0201-37012C010901} \ {025901D2-029D-020F-DE01- FE010D02A601}"
编辑3:
正如这里建议的那样,我尝试使用P / Invoke删除文件,但没有成功。
[DllImport("kernel32.dll", CharSet = CharSet.Unicode)]
[return: MarshalAs(UnmanagedType.Bool)]
internal static extern bool DeleteFile(string lpFileName);
调用方法:
foreach (FolderItem file in dataFolder.Items())
{
if (file.Name.Contains(flagFileName))
{
// ...
bool deleted = DeleteFile(file.Path);
// ...
}
}
该方法返回false,并且不删除该文件。我查看了事件查看器,了解发生了什么,但一无所获。
答案 0 :(得分:0)
路径的一部分看起来像" \?\"告诉你这是一条漫长的道路。遗憾的是,CLR无法处理长路径(它仅限于MAX_PATH = 260无意义)。我相信你可以使用WinAPI的DeleteFile来实现你想要的目标。
http://msdn.microsoft.com/en-us/library/windows/desktop/aa363915(v=vs.85).aspx
使用PInvoke,你就可以了。
http://pinvoke.net/default.aspx/kernel32/DeleteFile.html?diff=y
答案 1 :(得分:0)
guid前缀(" :: {20D04FE0-3AEA-1069-A2D8-08002B30309D}")是MyComputer的标准连接点(参见https://msdn.microsoft.com/en-us/library/windows/desktop/cc144096(v=vs.85).aspx)。
我怀疑使用shell API DeleteFile等方法无法删除该文件,因为它不在文件系统中(您可以使用FolderItem.IsFileSystem进行检查),因为Android设备是使用MTP连接的。
我已经能够使用FolderItem.InvokeVerb删除这些文件("删除")。这会生成一个确认对话框,可以使用某些版本的SendKeys(例如免费软件Nirsoft的Nircmd.exe)将其解除。以下是VBA示例:
Private Sub SampleDelete()
Const sFolder = "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\\\?\usb#vid_054c&pid_04cb#10fbd475671683#{6ac27878-a6fa-4155-ba85-f98f491d4f33}\SID-{10001,00000000000000000000000005671683,7513636864}\{00000007-0000-0000-0000-000000000000}\{000057F1-0000-0000-66A5-884D99020600}"
Const sFileName = "test.txt"
' requires reference to Shell32.dll
Dim oShell As New Shell32.Shell
Dim oFolder As Shell32.Folder
Dim oFile As Shell32.FolderItem
Set oFolder = oShell.Namespace(sFolder)
If Not oFolder Is Nothing Then
Set oFile = oFolder.ParseName(sFileName)
If Not oFile Is Nothing Then
Debug.Print "File system? " & oFile.IsFileSystem
' dismiss the confirmation dialog
SendKeys "~"
' Alternatively use an external function, like this freeware utility
' Shell "nircmd.exe sendkey enter press", vbHide
oFile.InvokeVerb "Delete"
Else
Debug.Print "File not found"
End If
Else
Debug.Print "Folder not found"
End If
Set oShell = Nothing
Set oFolder = Nothing
Set oFile = Nothing
End Sub