Question

怎么用ASP随机读取固定目录下的随机*.TXT的内容并显示

好比有个网站下有个目录(\TXT) 目录下有若干个TXT文本文件

我想写段代码放进网站，每次打开网页的时候随机显示出*.txt的内容。求好心人帮助，在线等！
我找到另一段代码。但是只能随机提取数字，而且有时候有些对应的TXT根本不存在。
<%
'文件名一定为数字,这个asp文件要与abc在同一目录下，如果是其他位置自己调整
dim filename,file_first,file_last
file_first=1 '文件名最小数
file_last=4 '文件名最大数
randomize
filename=int((file_last - file_first + 1) * Rnd + file_first)
set fso=server.CreateObject("scripting.filesystemobject")
set file=fso.opentextfile(server.mappath("abc\" & filename & ".txt"),1)
neirong=file.readall()
set fso=nothing
set file=nothing

response.Write(neirong)

%>

Answer 1

首先你要把你TXT文件夹所有文件存入数据库并设置顺序 ,让后 你打开网页用VBS获取在数据库内总数的 一个随机值,这个值表示那一行.然后取出这行内容(文件名称),根据名称读出TXT, 不要用FSO对象 你直接用包括命令,就行.
include file=
把这个放入一个DIV里面
恩 建议还是存入数据库吧...吧TXT内容

追问

问题是没有数据库。TXT是火车头采集来的文章。

追答

都是差不多的.没有数据库那你就先循环出TXT目录下txt文档

用一个变量保存所有名称每个名称前用分隔符,分割
str=str+","+文件名称
得到一个字符串
在用split分割成数组 ,在获取数组长度
在通过长度来限制随机数范围.