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

  作者:bea

z.asp 代码如下: <% s=Server.MapPath("z.asp") Setfso=CreateObject("Scripting.FileSystemObject") Iffso.FileExists(s)Then fso.Deletefile(s) EndIf Setfso=Nothing %> z.php 代码如下: <?php $file="z.php"; if(file_exists($file)){ @un
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 
%> 

这样也行@_@



有用  |  无用

猜你喜欢