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
%>
这样也行@_@ASP和PHP都是可以删除自身的
原文：http://www.jb51.net/article/9297.htm
