web文件管理器的後續開發。 。 。選擇自iuhxq的Blog
關鍵字web文件管理器的後續開發。 。 。
出處
今天看了一下ccopus的DM45,做的很不錯,在這之前我也想做一個了,做一個跟windows資源管理器非常類似的程序。看到dm45以後覺得自己還是放棄吧,WEB方式的文件管理無論如何都是在權限允許內操作,而且大家實現的也都差不多,無非是在外觀上,易操作上做文章,文件管理本來作用也不是很大,如果是多用戶的權限比較難控制,既然別人做了,我想還是不要重複勞動的好,況且也不見得能做的好。下面的代碼貼出來留個紀念,實現了文件的本地排序。但目錄之間的層次還沒有搞好。有興趣的可以拿去參考,理論上應該可以實現跟windows資源管理器極類似的界面和操作方式。整個界面都採取無刷新方式。用XMLHTTP來執行後台代碼,用JS來修改前台顯示。這裡體現了一種思想,希望對初學者能有個幫助。
代碼如下:
<title>WEB文件管理器2.0版http://asp2004.net</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<styletype="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:1pxsolid;
border-color:#000000;
color:#000000;
}
-->
</style>
<%
'版權聲明:本代碼僅供學習研究之用,本人不對因使用本程序而造成的任何後果負責。未經作者書面許可不得用於商業用途。
'QQ:103895
'email:[email protected]
'http://asp2004.net
Server.ScriptTimeout=999
action=Request("action")
temp=Split(Request.ServerVariables("URL"),"/")
url=temp(UBound(temp))
Constpass=""'登陸密碼
'登陸驗證
Setfso=CreateObject("Scripting.FileSystemObject")
Path=Request("foldername")
IfPath=""ThenPath=server.MapPath("./")