标题:求助:在listview中显示的文件信息(包括文件名/文件路径),想实现删除功能 ...
只看楼主
Steven_LHX
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2017-10-18
结帖率:0
已结贴  问题点数:10 回复次数:7 
求助:在listview中显示的文件信息(包括文件名/文件路径),想实现删除功能,但不能实现彻底删除所选项的文件?
大家帮帮我看看代码,问题出在哪,尝试了好多遍了,谢谢!
程序代码:
Try
            Dim dfpath As String = NodeDrives.SelectedItem.ToString
            Dim dfi As DirectoryInfo = New DirectoryInfo(dfpath)
            Dim file As FileInfo() = dfi.GetFiles(".", SearchOption.AllDirectories)
            Dim fiTemp As FileInfo
            For Each fiTemp In file
                Dim lifile() As String = {fiTemp.Name, fiTemp.FullName, fiTemp.Extension, fiTemp.LastWriteTime}
                If lifile(0) = ListView1.SelectedIndices.ToString Then
                    Dim dpath As String = fiTemp.FullName
                    Dim fi As FileInfo = New FileInfo(dpath)
                    fi.Delete()
                End If
            Next
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try


[此贴子已经被作者于2017-10-27 08:28编辑过]

搜索更多相关主题的帖子: 文件 信息 删除 Dim String 
2017-10-26 22:18
xyxcc177
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:26
帖 子:197
专家分:1249
注 册:2017-7-8
得分:10 
不知道彻底删除是什么意思?
2017-10-28 12:54
xyxcc177
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:26
帖 子:197
专家分:1249
注 册:2017-7-8
得分:0 
程序代码:
'
Dim FileName As String
(FileName)
2017-10-28 12:59
zhangcanwei
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:63
专家分:135
注 册:2010-7-4
得分:0 
看看fiTemp.FullName字符串中是否包含了非法字符
2017-11-04 07:55
zhangcanwei
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:63
专家分:135
注 册:2010-7-4
得分:0 
在循环体内定义变量不好。影响速度。应该在循环体外部定义
2017-11-04 07:56
Steven_LHX
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2017-10-18
得分:0 
回复 2楼 xyxcc177
就是实现本地文件也删除。
2018-03-13 08:32
Steven_LHX
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2017-10-18
得分:0 
回复 3楼 xyxcc177
嗯嗯、已经解决了,谢谢
2018-03-13 08:33
Steven_LHX
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2017-10-18
得分:0 
回复 4楼 zhangcanwei
嗯、程序能够运行,不报错,应该不存在非法字符吧。不过确实影响速度。哈哈,,谢谢了
2018-03-13 08:36



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-481811-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.109750 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved