ASP删除黑客建立的只读文件夹和文件

最近网友的网站被入侵，黑客建立了一些只读属性的文件夹和文件，在很多页面挂上了**彩等违法信息，FTP无法打开也无法删除，虚拟主机售后又极度垃圾，在尝试N次以后，发现这样可以删除这些只读属性的文件夹和文件，代码如下：
<%
'这里一定要完整的绝对路径，前面再加上“//?”
'delfolder "//?/E:/www/liuhecai."'删除文件夹
'delfile "//?/E:/www/user/liuhecai./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
%>