原来ASP和PHP都是可以删除自身的

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
% >
这样也行@_@