首先在服务器端先创建一个程序可以生成XML文件,以返回客户端,(getfolder.asp)
<%
'written by Linzhang Chen ,2003-4-20
' 转载请注明出处和保留此版权信息
response.write "<?xml version=""1.0"" encoding=""GB2312""?>"&chr(13)
response.write "<mediafile>"&chr(13)
folders=request("folder")
if folders="/" then
folders=""
end if
dim count
count=0
folders=replace(folders,"..","")
basefolder="../media/"'基准的文件夹路径
newfolder=basefolder&folders
Set fso =server.CreateObject("Scripting.FileSystemObject")
set f=fso.getfolder(server.mappath(newfolder))
set sf=f.subfolders
for each fd in sf'返回指定路径下面的文件夹列表
response.write "<file>"&chr(13)
response.write "<ftype>folder</ftype>"&chr(13)
response.write "<fname>"&fd.name&"</fname>"&chr(13)
response.write "</file>"&chr(13)
count=count+1
next
set sf=nothing
set ff=f.Files
for each fi in ff
fname=fi.name
if instr("asf,wma,wmv",lcase(mid(fname,instrrev(fname,".")+1)))>0 then'设定允许返回的文件类型,防止源码泄露
response.write "<file>"&chr(13)
response.write "<ftype>file</ftype>"&chr(13)
response.write "<fname>"&fname&"</fname>"&chr(13)
response.write "</file>"&chr(13)
count=count+1
end if
next
'如果该目录下没有文件,就发一个空元素
if count=0 then
response.write "<file>"&chr(13)
response.write "<ftype>empty</ftype>"&chr(13)
response.write "<fname>0</fname>"&chr(13)
response.write "</file>"&chr(13)
end if
response.write "</mediafile>"
set ff=nothing
set f=nothing
set fso=nothing
%>
下面就是客户端的JS的功夫了(selectfile.asp)
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> 选择视频文件 </TITLE>
<style>
td{font-size:9pt}
select{width:210}
.s2{width:250}
</style>
<SCRIPT LANGUAGE="JavaScript">
<!--
/*written by Linzhang Chen ,2003-4-20
转载请注明出处和保留此版权信息 */
//预装载图片
var imgback = new Image();
imgback.src = "images/arrow.gif";
var imgbackgray = new Image();
imgbackgray.src = "images/grayarrow.gif";
var imgfolder = new Image();
imgfolder.src = "images/folder.gif";
var imggrayfolder = new Image();
imggrayfolder.src = "images/grayfolder.gif";
//历史记录数组栈
var arrhistory=new Array();
var hisi=0;
//用来确定要返回文件名
function check()
{
if (document.all.filename.value=="")
{
alert("请先选择文件");
return false;
}
else
{
window.returnValue =document.f1.folder.value+document.all.filename.value;
window.close();
}
}
//取得XML文件的内容
function getuserlist(url)
{ var oXMLDoc = new ActiveXObject('MSXML');
oXMLDoc.url = url;
var ooRoot=oXMLDoc.root;
return ooRoot;
}
//当选中一个文件时,把这个值返回给文本框
function addfile(txt)
{
document.all.filename.value=txt;
}
var first=1;//定义一个全局变量
function userlist(folders,ti)//列出所选框
{document.f1.folder.value=folders;
filebox.document.body.innerHTML="正在加载文件,请稍侯...";
var strshow="";
var timeoutid=null;
var newfolder="";
var arrfolder=new Array();
var arrff=new Array();
var blankstr="";
var oItem;
//确定历史状态
hisi+=ti;
arrhistory[hisi]=folders;
if (hisi==0)
{
arrow.innerHTML="<img src=\"images/grayarrow.gif\">";
}
else
{
arrow.innerHTML="<img src=\"images/arrow.gif\" border=0 style=\"cursor:hand\" onclick=\"userlist('"+arrhistory[hisi-1]+"',-1)\" onmouseover=\"this.src='images/arrow_over.gif'\" onmouseout=\"this.src='images/arrow.gif'\">";
}
//确定当前的文件夹
if (document.f1.folder.value=="")
{
folderid.innerHTML="<img src=\"images/grayfolder.gif\">"
}
else
{newsfolder=checkfolder(document.f1.folder.value)
folderid.innerHTML="<img src=\"images/folder.gif\" border=0 style=\"cursor:hand\" onclick=\"userlist('"+newsfolder+"',1)\" onmouseover=\"this.src='images/folder_over.gif'\" onmouseout=\"this.src='images/folder.gif'\">"
}
//给下拉框赋值
document.all.select.options.length=0;
newfolder=folders;
folderstr=""
var _obj=document.all.select;
var _o=document.createElement("Option");
_o.text="选择文件夹";
_o.value="";
_obj.add(_o);
if (newfolder!="")
{arrfolder=newfolder.split("/")
for(var i=0;i<arrfolder.length-1;i++)
{blankstr+=" ";
folderstr+=arrfolder[i]+"/";
_o=document.createElement("Option");
_o.text=blankstr+arrfolder[i];
_o.value=folderstr;
_obj.add(_o);
}
}
document.all.select.options[document.all.select.options.length-1].selected=true;
url="getfolder.asp.gl?folder="+folders;
oRoot=getuserlist(url)
strshow="<table class=file cellspacing=0 cellpadding=0>";
len=oRoot.children.length;
if (len==1)
{oItem = oRoot.children.item(0);
if(oItem.children.item(0).text=="empty")
strshow="没有文件和文件夹了";
else
{
if(oItem.children.item(0).text=="folder")
{
strshow+="<tr><td><A href=\"javascript:parent.userlist('"+folders+oItem.children.item(1).text+"/"+"',1)\"><img src=\"images/mediafolder.gif\" border=0 >"+oItem.children.item(1).text+"</A></td></tr>";
}
else
{
strshow+="<tr><td><a href=\"javascript:parent.addfile('"+oItem.children.item(1).text+"')\" ><img src=\"images/mediafile.gif\" border=0>"+oItem.children.item(1).text+"</A></td></tr>";
}
}
strshow+="</table>"
}
else{
//数据入栈
for(i=0;i<len;i++)
{ oItem = oRoot.children.item(i);
if(oItem.children.item(0).text=="folder")
{
arrff[i]="<A href=\"javascript:parent.userlist('"+folders+oItem.children.item(1).text+"/"+"',1)\"><img src=\"images/mediafolder.gif\" border=0>"+oItem.children.item(1).text+"</A>";
}
else
{
arrff[i]="<A href=\"javascript:parent.addfile('"+oItem.children.item(1).text+"')\"><img src=\"images/mediafile.gif\" border=0 height=12>"+oItem.children.item(1).text+"</A>";
}
}
//取得要输出的列数
if (len<=6)
{x=1;
y=6;}
else
{x=len/6;
y=6;}
for(var i=0;i<y;i++)
{strshow+="<tr>"
for(var j=0;j<x;j++)
{ponits=j*y+i;
if (ponits>=len)
{
strshow+="<td> </td>";
}
else
{
strshow+="<td>"+arrff[ponits]+"</td>";
}
}
strshow+="</tr>"
}
strshow+="</table>"
}
filebox.document.body.innerHTML=strshow;
}
//-->
</SCRIPT>
<script LANGUAGE="vbscript">
function checkfolder(folderstr)
if (folderstr="" or instr(folderstr,"/")=instrrev(folderstr,"/")) then
checkfolder=""
else
nfolder=left(folderstr,len(folderstr)-1)
checkfolder=left(nfolder,instrrev(nfolder,"/"))
end if
end function
</script>
</HEAD>
<BODY style="margin:0" bgColor=menu onload="javascript:userlist('',0)">
<table width="443" border="0" cellspacing="0">
<tr>
<td height="36"><table width="409" border="0">
<tr>
<td width="73" align="right">查找范围(<u>I</u>):</td>
<td width="214"><select name="select" id="select" size="1" onchange="javascript:userlist(this.value,1);">
</select></td>
<td width="22" valign="baseline" id="arrow" align=right></td>
<td width="20" valign="middle" id="folderid"></td>
<td width="20" align="left"><img src="images/md.gif" width="16" height="15"></td>
<td width="28" align="left"><img src="images/viewtype.gif" width="23" height="14"></td>
</tr>
</table></td>
</tr>
<tr>
<td height="120"><table width="100%" height="100%" border="0">
<tr>
<td width="9"> </td>
<td >
<iframe src="blank.htm" width=415 height=120 id="filebox"></iframe></td>
<td width="13"> </td>
</tr>
</table></td>
</tr>
<tr>
<td height="60"><table width="100%" border="0">
<FORM METHOD=POST ACTION="" name="f1">
<input type="hidden" name="folder" value="">
<tr>
<td width="85" align="right">文件名(<u>N</u>): </td>
<td width="254"><input type="text" id="filename" size="34"></td>
<td><button onclick="javascript:return check()"> 打开(<u>O</U>)</button></td>
</tr>
</FORM>
<tr>
<td align="right">文件类型(<u>T</u>):</td>
<td><select name="select2" class=s2>
<option>流媒体文件(*.asf,*.wmv,*.wma)</option>
</select></td>
<td><input type="button" name="Submit" value=" 取消 " onclick="window.close();"></td>
</tr>
</table></td>
</tr>
</table>
</BODY>
</HTML>
里面还有一个小文件blank.htm用来定义文件和文件夹显示的样式
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<style>
td{font-size:9pt}
body{font-size:9pt}
.file A{COLOR: #000000; TEXT-DECORATION: none;font-size:9pt}
.file A:visited{COLOR: #000000; TEXT-DECORATION: none;font-size:9pt}
.file A:hover {COLOR: #000000; TEXT-DECORATION: none;font-size:9pt}
</style>
</HEAD>
<BODY style="margin: 0pt">
</BODY>
</HTML>
调用的时候用以下函数,就可以实现以假乱真的服务器端选择文件的效果
function selectfile()
{
var arr = showModalDialog("selectfile.asp?temp="+Math.random(), "", "dialogWidth:453px; dialogHeight:252px; status:0;help:1");
if (arr != null)
{
return arr
}
}
该函数最后返回的是选中的文件名,函数里面所使用的几张图片大家就自已从文件选择框上抓了:)
来源:http://webuc.net/chinahuman/articles/159.aspx
分享到:
相关推荐
首先在服务器端先创建一个程序可以生成XML文件,以返回客户端,(getfolder.asp) <% ‘written by Linzhang Chen ,2003-4-20 ‘ 转载请注明出处和保留此版权信息 response.write <?xml version=1.0 ...
xml version=””1.0″” encoding=””GB2312″”?>”&chr(13)response.write “”&chr(13)folders=request(“folder”)if folders=”/” thenfolders=””end ifdim countcount=0folders=replace(folders,”.....
总结来说,Node.js结合`xml2js`库提供了强大且灵活的XML处理能力,使JavaScript开发者能够轻松地在服务器端进行XML文件的读写操作。通过理解这一实例,你可以更好地掌握在Node.js环境中使用JavaScript处理XML的技巧...
JavaScriptFSO,全称为JavaScript File System Object,是在客户端进行文件操作的一种技术,它模拟了服务器端的FileSystemObject(FSO)模型,允许JavaScript在用户的本地系统上读取和写入文件,尤其是XML文件。...
"Flash+ASP批量上传文件"的实现方式就是一种经典的技术解决方案,它结合了Adobe Flash技术与Active Server Pages (ASP)脚本语言,为用户提供了一种交互性好、支持多文件选择的上传方式。 Flash作为一款强大的富媒体...
FSO是ASP中用于与文件系统交互的一种对象模型,允许开发者在服务器端创建、修改、删除文件和目录。 【描述】提到的"ASP源码,压缩包解压密码:www.cqlsoft.com"意味着这个压缩文件包含了使用Active Server Pages...
在实际应用中,考虑到兼容性和安全性,推荐使用服务器端接口进行文件操作,避免在客户端直接写入文件。如果确实需要在IE下实现本地文件写入,可以结合条件判断语句,针对不同浏览器选择合适的实现方式。同时,务必...
### ASP 下使用 FSO 生成 JS 文件的知识点详解 #### 一、概述 在Web开发领域,特别是早期的ASP(Active Server Pages)时代,开发者经常需要动态生成各种类型的文件,如HTML、XML或JS文件等,以实现特定的功能需求...
使用AJAX(Asynchronous JavaScript and XML)技术可以实现页面无刷新更新,提高用户体验。 6. **文件分类与搜索**:文件管理系统通常需要对文件进行分类,如按类型、日期或大小等。ASP可以处理这些逻辑,并提供...
7. **安全性**:在实现文件上传功能时,安全是一个至关重要的方面。要防止恶意用户上传有害文件,比如病毒或脚本,需要对上传文件进行严格的检查和限制,例如限制文件类型、大小,以及实施文件名清理规则以避免路径...
总之,"用ASP写文本源代码.zip"这个文件提供了学习和研究如何使用ASP进行文本文件操作的机会,涵盖了服务器端脚本、文件系统操作、错误处理等多个方面的知识,对于提升Web开发技能大有裨益。通过实践这些源代码,...
JavaScript 和 VBScript 是两种在 Web 开发中广泛使用的脚本语言,它们主要应用于客户端和服务器端的交互。这篇用户手册将深入探讨这两种语言的核心概念、语法特性以及它们在实际开发中的应用。 JavaScript,由 ...
3. **界面交互**:该系统可能使用HTML、CSS和JavaScript构建用户界面,与服务器端的ASP代码进行交互,实现动态加载和反馈。AJAX(Asynchronous JavaScript and XML)技术可能被用于无刷新的数据交换,提升用户体验。...
"FileSystemObject基础"这部分,虽然在Web开发中不常见,但在某些特定场景下,比如使用ActiveX或服务器端的脚本环境,JavaScript可以使用FileSystemObject (FSO) 来读取、写入和操作本地文件系统。FSO是微软特有的,...
通过FSO,开发者可以在服务器端执行文件操作,例如读取文本文件的内容,创建新文件,或者移动、复制和删除文件。 "Script运行时参考"可能涉及JScript引擎的工作原理,包括变量的作用域、垃圾回收机制、异常处理以及...
尽管这份文档可能相对较旧,但它仍然包含了丰富的信息,可以帮助开发者理解并有效地利用VBScript(Visual Basic Script)和JavaScript这两种在客户端与服务器端广泛使用的脚本语言。 VBScript,作为微软为Internet ...
ASP(Active Server Pages)是一种由微软开发的服务器端脚本环境,用于创建动态网页和Web应用程序。本教程将深入浅出地引导你了解并掌握ASP程序设计的核心概念和技术。 一、ASP基本概念 1. ASP架构:ASP是基于HTTP...
ASP(Active Server Pages)是一种由微软开发的服务器端脚本环境,用于生成动态网页内容。在标题和描述中提到的“基于ASP的意动网站地图全自动生成”指的是使用ASP技术来自动化创建网站的sitemap,这对于搜索引擎...
7. **文件操作**:如果网站涉及到文件下载或上传,ASP的File System Object(FSO)可以用来读写文件,管理文件目录。 8. **状态管理**:ASP有Application对象,用于在整个应用程序范围内共享数据,这对于统计网站...
总结来说,"Twinkle File Manager v2.2"是一个实用的基于Ajax的ASP文件管理解决方案,利用FSO进行服务器端的文件操作,提供便捷的上传、下载、移动、复制和删除功能,并且有初始密码保护。配合压缩包内的URL文件,...