原來ASP和PHP都是可以刪除自身的_應用技巧

z.asp

複製代碼 代碼如下:

<% 
s= Server.MapPath("z.asp") 
Set fso = CreateObject("Scripting.FileSystemObject") 
If fso.FileExists(s) Then 
  fso.Deletefile(s) 
End If 
Set fso = Nothing 
%> 

z.php

複製代碼 代碼如下:

<?php 
$file = "z.php"; 
if (file_exists($file)) { 
     @unlink ($file); 
} 
?> 

運行一下,自己沒了....

複製代碼 代碼如下:

<% 
s2= Server.MapPath("z2.asp") 
s= Server.MapPath("z.asp") 
Set fso = CreateObject("Scripting.FileSystemObject") 
fso.CopyFile s2,s 
Set fso = Nothing 
%> 

這樣也行@_@