我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地：首页 > 网络学院 > 网络编程 > ASP专区 > Asp基础/应用 > web文件管理器的后续开发。。。
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数：对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
　

web文件管理器的后续开发。。。 

作者:佚名   来源:本站教程   点击:   日期:2007-03-22
今天看了一下ccopus的DM45，做的很不错，在这之前我也想做一个了，做一个跟windows资源管理器非常类似的程序。看到dm45以后觉得自己还是放弃吧，WEB方式的文件管理无论如何都是在权限允许内操作，而且大家实现的也都差不多，无非是在外观上，易操作上做文章，文件管理本来作用也不是很大，如果是多用户的权限比较难控制，既然别人做了，我想还是不要重复劳动的好，况且也不见得能做的好。下面的代码贴出来留个纪念，实现了文件的本地排序。但目录之间的层次还没有搞好。有兴趣的可以拿去参考，理论上应该可以实现跟windows资源管理器极类似的界面和操作方式。整个界面都采取无刷新方式。用XMLHTTP来执行后台代码，用JS来修改前台显示。这里体现了一种思想，希望对初学者能有个帮助。
代码如下：
<title>WEB文件管理器2.0版 http://asp2004.net</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
a {
font-size: 9pt;
color: #3300CC;
text-decoration: none;
}
body {
font-size: 9pt;
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
line-height: 20px;
background-color: #EEEEEE;
}
td {
font-size: 9pt;
line-height: 20px;
}
.tx {
border-color:#000000;
border-left-width: 0px;
border-top-width: 0px;
border-right-width: 0px;
border-bottom-width: 1px;
font-size: 9pt;
background-color: #EEEEEE;
}
.tx1 {
font-size: 9pt;
border: 1px solid;
border-color:#000000;
color: #000000;
}
-->
</style>
<%

'版权声明：本代码仅供学习研究之用，本人不对因使用本程序而造成的任何后果负责。未经作者书面许可不得用于商业用途。
'QQ：103895
'email:quxiaohui_0@163.com
'http://asp2004.net

Server.ScriptTimeout = 999
action = Request("action")
temp = Split(Request.ServerVariables("URL"), "/")
url = temp(UBound(temp))

Const pass = ""'登陆密码

'登陆验证

Set fso = CreateObject("Scripting.FileSystemObject")
Path = Request("foldername")
If Path = "" Then Path = server.MapPath("./")
ShowFolderList(Path)
Set fso = Nothing

'列出文件和文件夹

Function ShowFolderList(folderspec)
temp = Request.ServerVariables("HTTP_REFERER")
temp = Left(temp, Instrrev(temp, "/"))
temp1 = Len(folderspec) - Len(server.MapPath("./")) -1
If temp1>0 Then
temp1 = Right(folderspec, CInt(temp1)) + "\"
ElseIf temp1 = -1 Then
temp1 = ""
End If
tempurl = temp + Replace(temp1, "\", "/")
uppath = "./" + Replace(temp1, "\", "/")
upfolderspec = fso.GetParentFolderName(folderspec&"\")
Set f = fso.GetFolder(folderspec)
%>
<script language="javascript">
function File(Name, Size, Type, DateCreated, DateLastAccessed, DateLastModified, Attributes)
{
this.Name = Name;
this.Size = Size;
this.Type = Type;
this.DateCreated = DateCreated;
this.DateLastAccessed = DateLastAccessed;
this.DateLastModified = DateLastModified;
this.Attributes = Attributes;
}

function Tree(id, name)
{
this.id = id;
this.name = name;
this.root = new Array();
this.length = 0;

this.Add = function(file)
{
this.root.push(file);
this.length += 1;
}
this.max = function(f1, f2, field)
{
switch( field )
{
case "Name":
return f1.Name.toLowerCase()>f2.Name.toLowerCase()? true:false;
case "Size":
return f1.Size>f2.Size? true:false;
case "Type":
//if (field == '???t?D') return false;
return f1.Type>f2.Type? true:false;
case "DateCreated":
return f1.DateCreated>f2.DateCreated? true:false;
case "DateLastAccessed":
return f1.DateLastAccessed>f2.DateLastAccessed? true:false;
case "DateLastModified":
return f1.DateLastModified>f2.DateLastModified? true:false;
case "Attributes":
return f1.Attributes>f2.Attributes? true:false;
default:
return false;
}
}
this.sort=function(field, order)
{
//order:desc asc
//field:Name Size
var len = this.root.length;
if( len < 2 ) return;
var tmp;
for(var i=0; i<len-1; i++)
{
for(var j=i+1; j<len; j++)
{
if( order == "desc")
{
if( !this.max( this.root[i], this.root[j], field ) )
{
tmp = this.root[i];
this.root[i] = this.root[j];
this.root[j] = tmp;
}
}
else if ( order == "asc")
{
if( this.max( this.root[i], this.root[j], field ) )
{
tmp = this.root[i];
this.root[i] = this.root[j];
this.root[j] = tmp;
}
}
}
}
}
}
function fieldcode(field)
{
if (order == 'desc')
{
order = 'asc';
}
else
{
order = 'desc';
}
tree.sort(field, order);
}
function show()
{
//for (var i=0;i<form1.elements.length;i++){var e = form1.elements[i];if (e.type == "checkbox")e.checked = form1.chkall.checked;}
str = '<table width="100%" border="0" cellspacing="0" cellpadding="0">\
<tr bgcolor="#EEEEEE">\
<td><div align="center">操作<input type="checkbox" name="chkall" onclick=""></div></td>\
<td><div align="center"><a onclick="fieldcode\''Nam\'');show();" href=#>文件名</a></div></td>\
<td><div align="center"><a onclick="fieldcod(\''Sie\'');show();" href=#>大小</a></div></td>\
<td><div align="center"><a onclick="fieldcoe(\''Tpe\'');show();" href=#>类型</a></div></td>\
<td><div align="center"><a onclick="fieldcde(\''DateCreted\'');show();" href=#>创建时间</a></div></td>\
<td><div align="center"><a onclick="fieldode(\''DateLastAccssed\'');show();" href=#>上次访问时间</a></div></td>\
<td><div align="center"><a onclick="fielcode(\''DateLastMoified\'');show();" href=#>上次修改时间</a></div></td>\
<td><div align="center"><a onclick="fiedcode(\''Attibutes\'');show();" href=#>属性</a></div></td>\
&l;/tr>'';
var f;
for(i=0;i<tree.length;i++)
{
f = tree.root[i];
str += ''<tr bgcolor="#EEEEEE" onmouseover=this.gColor=\'#F3F6FA\''; onmouseout=this.gColor=\'#EEEEEE\'';>\
<td><center><input type="checkbox" name="f" vaue="''+tree.id+"\\\\&quo;+f.Name+''"></center></td>\
<td><a ref=&quo;''+f.url+'">''+f.Name+''</a></td>\
<td&g;''+f.Size+''</td>\
<td&t;''+f.Type+''</td>\
<td>''+f.DaeLastAccessed+''</td>\ <td>''+f.DteLastModified+''</td>\ br> <td>''+f.Attributes+''</td>\ br> </tr>''; }
str + ''</table>'';
eval(list).innerHTML = str;

ar field = ''Name''
ar order = ''desc'';
var str;

【文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论】

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册（不仅仅适用于asp）
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名： 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明：刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。