網(wǎng)站被入侵，黑客把空間許多頁面掛上**彩，在嘗試N次以后，發(fā)現(xiàn)怎么樣也許刪除不了其創(chuàng)建的只讀屬性的文件夾和文件
黑客創(chuàng)建的文件夾類似這些“E:\www\liuhecai.”，ftp內(nèi)中無奈打開也無奈刪除，尚有一些只讀的文件，ftp內(nèi)中也沒辦法刪除
<%
'這里一定要完整的絕對路徑，前面再加上“\\?”
'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，強(qiáng)逼刪除只讀屬性的文件夾
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，強(qiáng)逼刪除只讀屬性的文件
IF Err Then Response.write Err.Description:Err.Clear
End function
%>
本人參考代碼發(fā)展履行
|
