28,406
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
karma 2001-11-28
- 打赏
- 举报
Sub DeleteAFile(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(filespec)
set fso=nothing
End Sub
DeleteAFile "c:\temp\test.tmp"
make sure you set the correct rights for anonymous users to delete files
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(filespec)
set fso=nothing
End Sub
DeleteAFile "c:\temp\test.tmp"
make sure you set the correct rights for anonymous users to delete files
