盾怪网教程:是一个免费提供流行杀毒软件教程、在线学习分享的学习平台!

起泡法按照时间排列文件(FSO)

时间:2024/11/13作者:未知来源:盾怪网教程人气:

[摘要]本站的http://btyz.51web.cn/collection.asp没有使用按照时间排列文件的,后来想到如果按照文件建立的时间为顺序排列,那就太棒了。幸好学过C语言,起泡法只是一个简单的算法...

本站的http://btyz.51web.cn/collection.asp没有使用按照时间排列文件的,后来想到如果按照文件建立的时间为顺序排列,那就太棒了。幸好学过C语言,起泡法只是一个简单的算法而已,但是在网页编程中要用到什么算法的还是比较少的,我已经用过的算法只有递归和起泡法。有问题大家多多指点。
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'######################################'
'## Copyright (C) 2003 醉雨梧桐 All rights reserved. ##'
'## Powered by 醉雨梧桐 ##'
'## http://btyz.51web.cn/ ##'
'## winterfire@163.com ##'
'######################################'
Function file_list(path)
Set FSO=Server.CreateObject("Scripting.FileSystemObject") 'FSO对象
Set FD=FSO.GetFolder(path) '获得文件夹
Set F=FD.Files '获得文件夹内文件
For Each OneFile in F '列出所有的txt文件
filename=OneFile.Name
If LCase(right(filename,3))="txt" Then '只对txt文件处理
filename_arr0=filename_arr0&Left(filename,Len(filename)-4)&"

关键词:起泡法按照时间排列文件(FSO)




Copyright © 2012-2018 盾怪网教程(http://www.dunguai.com) .All Rights Reserved 网站地图 友情链接

免责声明:本站资源均来自互联网收集 如有侵犯到您利益的地方请及时联系管理删除,敬请见谅!

QQ:1006262270   邮箱:kfyvi376850063@126.com   手机版