一聚教程网:一个值得你收藏的教程网站

热门教程

asp无法删除黑客文件处理方法

时间:2022-07-02 23:02:47 编辑:袖梨 来源:一聚教程网

<%
'这里一定要完整的绝对路径,前面再加上“?”
'delfolder "?E:wwwliuhecai."'删除文件夹
'delfile "?E:wwwuserliuhecai.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
%>

热门栏目