ASP删除FTP无法删除的顽固文件夹或文件

ASP代码删除FTP上特殊文件名的文件

顽固文件夹类似这样“绝对路径\文件名.”，ftp里面无法打开也无法删除，还有一些只读的文件，
ftp里面也无法删除

程序代码

<%
‘这里一定要完整的绝对路径，前面再加上“\\?”
‘delfolder “\\?\绝对路径\文件名.”        ‘删除文件夹
‘delfile “\\?\绝对路径\文件名.\index.asp”        ‘删除文件

function Delfolder(t0)
‘On Error Resume Next
Set fso=Server.CreateObject(“Scripting.FileSystemObject”)
If Instr(t0,”:\”)>0 Then
f0=t0
Else
f0=Server.MapPath(t0)
End If
‘IF fso.FolderExists(f0) Then
fso.DeleteFolder f0,true    ‘加上true，强制删除只读属性的文件夹
IF Err Then Response.write Err.Description:Err.Clear
End Function

function Delfile(t0)
‘On Error Resume Next
Set fso=Server.CreateObject(“Scripting.FileSystemObject”)
If Instr(t0,”:\”)>0 Then
f0=t0
Else
f0=Server.MapPath(t0)
End If
‘IF fso.FileExists(f0) Then
fso.DeleteFile f0,true     ‘加上true，强制删除只读属性的文件
IF Err Then Response.write Err.Description:Err.Clear
End function
%>

调用的时候例如：Delfolder(“\old website”) 即可