把下面代码存到一个asp文件中即可，方便管理服务器上的文件
<Title> http://bbs.asp2004.net制作：QQ：103895 </title>
<meta http-equiv = content-type content = text/html; charset = gb2312>
<样式类型= text/css>
<！ -
答：链接{
字体大小：9pt;
}
答：访问{
字体大小：9pt;
}
答：悬停{
字体大小：9pt;
}
答：活动{
字体大小：9pt;
}
身体 {
字体大小：9pt;
左键：0px;
保证金顶：0px;
边缘右：0px;
边缘底：0px;
线高：20px;
}
TD {
字体大小：9pt;
线高：20px;
}
- >
</style>
<％
action = request.querystring（action）
temp = split（request.servervariables（url），/）
url = temp（ubound（temp））
chklogin（）
选择案例动作
案例注销
logout（）
案例
delfile（）
案例保存文件
savefile（）
案例编辑文件
fileedit（）
案例newfile
filenew（）
案例上传
上传（）
CASE SAVEUPLOAD
saveupload（）
案例固定员
delfolder（）
CASE SAVEFOLDER
savefolder（）
案例编辑备货员
editfolder（）
案例新手
newfolder（）
其他情况
foldername = request.querystring（foldername）
filename = request.querystring（文件名）
路径= foldername
如果路径=然后路径= server.mappath（./）
ShowFolderList（路径）
结束选择
函数ShowFolderList（folderspec）
temp = request.servervariables（http_referer）
temp =左（temp，instrev（temp，/））
temp1 = len（folderspec）-len（server.mappath（./)- :)- 1
如果temp1> 0，则
temp1 = right（folderspec，cint（temp1））
然后，elseif temp1 = -1
temp1 =
如果结束
tempurl = temp+替换（temp1，/，/）+/
set fso = createObject（scripting.filesystemobject）
upfolderspec = fso.getParentFoldername（folderspec＆/）
％>
<a href = <％= url％>？action = newFolder＆foldername = <％= folderspec％>> </a> | <a href = <％= url％>？action = newfile＆filename = <％= folderspec＆/％>> </a> | <a href = <％= url％>？action = upload>上传文件</a> | <a href = <％= url％>？foldername = <％= upfolderspec％>>向上</a> | <a href = file.asp>返回首页</a> | <a href = <％= url％>？action = logout>退出</a>
<table width = 100％边界= 0 cellpadding = 0 cellpacing = 1 bgcolor =＃6595d6>
<tr bgcolor =＃e4e8ef>
<td width = 64％> <div align = center>名称</div> </td>