fso文件按照文件名字母排序
来源：中国站长站 发布时间：2008-03-09 15:25:00
标签：fso,排序,文件
下面的这个函数实现的功能是列出某文件夹下的所有文件，以文件名字母排序，先数字后字母再到中文。
<％
Function ShowFileList(folderspec)
Dim fso, f, f1, fc, rs, s
const adVarChar = 200
set rs = Server.createobject("adodb.recordset")
rs.fields.append "myField", adVarChar, 255
rs.open
Set fso = server.CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(folderspec)
Set fc = f.Files
For Each f1 in fc
rs.addnew array("myField"), array(f1.name)
Next
rs.sort = "myField ASC" 'use "myField DESC" for reverse order
rs.moveFirst
do until rs.eof
s = s & rs.fields("myField") & "<BR>"
rs.moveNext
loop
rs.close
set rs=nothing
set fso=nothing
ShowFileList = s
End Function
'列出当前文件夹下的所有文件
Response.write ShowFileList(Server.MapPath("."))
'列出imges文件下的所有文件
Response.write ShowFileList(Server.MapPath("images/"))
％>
0
投稿猜你喜欢
- 用语言实现 好处： 1、可以减少对数据库的访问。 2、可移植性好。 坏处： 1、操作起来考虑的东西较多，修改一处就要修改别一处。也就是说是相
- 中介者模式中介者模式（Mediator Pattern）是一种常用的设计模式，用于解决各个对象之间的复杂依赖关系，使得各个对象之间可以独立地
阅读上一篇：你是真正的用户体验设计者吗? Ⅱ系统和用户环境设计苹果系统成功在于系统架构。简化系统本身，设备只能变得更好、更小、性能更强大。在- 惊现！表面下的隐藏信息——浅谈信息可视化1910年，病卧床上的魏格那（德国气象学家，以“大陆漂移学说”闻名），无意地注视着墙上的世界地图……
- 是否看见大站的广告都是放在内容中间实现文字环绕的呢，一般普通小站广告只能放在内容开头或者结尾，也许大站的cms系统带这个功能吧，我们小站常用
- 这是一篇知识性的文档，主要目的是为了让Web缓存相关概念更容易被开发者理解并应用于实际的应用环境中。为了简要起见，某些实现方面的细节被简化或
- 以下的文章主要是介绍MySQL5创建存储过程的实例演示，MySQL5创建存储在实际操作中应用的频率还是很高的，以下就是MySQL5创建存储过
- 接着上一篇，统一思想，遵循标准。如何遵循标准，其实标准有很多，结构标准，表现标准，行为标准。选择标准规范，就优先选择W3C推荐的标准。结构标
- 一、在访客的内心深处做导航我讨厌迷失，不管是在道路上或是在线网络上。猜想一下？您的访客也是这样的。就像我们期望看到的道路上的路标一样，来帮助
- YSlow是yahoo美国开发的一个页面评分插件，非常的棒，从中我们可以看出我们页面上的很多不足，并且可以知道我们改怎么却改进和优化。仔细研
- 来自Usability Post的Categories vs Tags作者认为“就博客而言，标签没有太大意义。”I don’t think
- <％ dim result,result1 str="ad_asp之家_nzlkjlkfjoj
- BluePrint是一个非常成熟也非常流行的CSS框架，很多网站和wordpress基于Blueprint搭建前端结构。最近，bluepri
- 回想自己从事Web方面的开发已经有6-7年，对于各种Web技术都已经非常熟悉.可是,身为程序员的我对于制作Web表单界面的事着实心痛。心痛１
- javascript代码编写在页面中实现页内搜索功能，类似Word等文本编辑软件里的搜索功能，只要是页面中的字符（别管是显在的还是隐蔽在文本
- 在写ASP网页时常用的检测代码:服务器现在时间:<％ =now ％>服务器CPU型号:<％=Request.ServerV
- 这篇论坛文章详细介绍了完全卸载MySQL数据库5.0的具体方法，更多内容请参考下文：数据库突然出了问题，没办法只能重装，因为事先并不知道My
- 它是第一个既能用于数据加密也能用于数字签名的算法。它易于理解和操作，也很流行。算法的名字以发明者的名字命名：Ron Rivest, Adi
- master库对于SQLServer来说，是很重要的系统数据库，保存着所有Sqlserver的用户信息、数据库信息等，当数据库崩溃时，mas
- 大家是否还记得1983年任天堂的著名游戏《超级玛丽》里那个留着胡子的意大利水管工人，还有日本konami公司1987年发行的射击游戏《魂斗罗
