以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  ftp删除文件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=128324)

--  作者:qaz17909
--  发布时间:2018/12/3 21:27:00
--  ftp删除文件
我用以下代码想删除文件,对话框是显示“存在该文档”,但却未删除该文档,请问哪个地方有问题?
Dim ftp1 As New FtpClient
ftp1.Host= ""
ftp1.Account = ""
ftp1.Password = ""
Dim tg As String = "\\报告正文\\123.doc"
If ftp1.FileExists(tg) Then
    MessageBox.show("存在该文档")
    ftp1.DeleteFile(tg)
End If
[此贴子已经被作者于2018/12/3 21:31:30编辑过]

--  作者:有点蓝
--  发布时间:2018/12/3 21:43:00
--  
登录用户没有删除这个目录里的文件的权限
--  作者:qaz17909
--  发布时间:2018/12/3 21:49:00
--  
老师你指的是ftp1.Account这个用户的权限对吗,我看了下权限是“读、写
[此贴子已经被作者于2018/12/3 22:00:28编辑过]

--  作者:有点蓝
--  发布时间:2018/12/3 22:28:00
--  
给所有权限
--  作者:有点甜
--  发布时间:2018/12/4 9:02:00
--  

你打开 OpenManager 的时候,执行删除,是否报错,报什么错?

 

Dim ftp1 As New FtpClient
ftp1
.Host="196.128.143.28"
ftp1
.Account = "foxuser"
ftp1
.Password = "138238110"
ftp1
.Changedir("\\photo") 
ftp1.OpenManager()


--  作者:qaz17909
--  发布时间:2018/12/4 20:18:00
--  

[20:03:50] 列表结束,用时:0.062秒...
[20:03:58] 正在删除文件[123.doc]
[20:03:58] 删除文件失败,550 Access is denied. 

[20:03:58] 正在列表
[20:03:58] 列表结束,用时:0.062秒...

--  作者:有点蓝
--  发布时间:2018/12/4 20:34:00
--  
没有删除的权限,重新设置指定的目录给所有的权限。必须设置文件所在的目录,不能只设置上级目录
--  作者:qaz17909
--  发布时间:2018/12/4 20:45:00
--  
我看了下,我在附件图片中的位置已经设置ftpuser的权限把读和写都√了,还是说在另外的地方设置?
--  作者:有点蓝
--  发布时间:2018/12/4 20:54:00
--  
完全控制
图片点击可在新窗口打开查看

--  作者:qaz17909
--  发布时间:2018/12/4 21:05:00
--  
谢谢,搞定了!