在ABCD文件夹中有12个或更多的文件,在网页中,要把这些文件列出来,还要把文件名中的"_"去掉,这个能做吗? 还有,在这个文件夹中可能还有的文件夹但不向下再找了,只查这一个目录中的.最后,这个文件夹中还会有文件注入,这样的话,能不能自动在网页中列表中出现呢?代码越简练越好.多谢了.<ul>
<li>moi_11258.html</li>
<li>je_eeee.html</li>
<li>xxx_fdsaf.html</li>
<li>def_999877.html</li>
<li>qq_qq_daaaa.html</li>
<li>fdsaffd_iuuio.html</li>
<li>xreeesa_0213.html</li>
<li>exra_mme_5120.html</li>
....
</ul>如果我以dl, dt, dd 的方式呢?
<dl>
<dt>ABCD</dt>
<dd>moi_11258.html</dd>
<dd>je_eeee.html</dd>
<dd>xxx_fdsaf.html</dd>
<dd>def_999877.html</dd>
<dd>qq_qq_daaaa.html</dd>
<dd>fdsaffd_iuuio.html</dd>
<dd>xreeesa_0213.html</dd>
<dd>exra_mme_5120.html</dd>
....
</dl>
<li>moi_11258.html</li>
<li>je_eeee.html</li>
<li>xxx_fdsaf.html</li>
<li>def_999877.html</li>
<li>qq_qq_daaaa.html</li>
<li>fdsaffd_iuuio.html</li>
<li>xreeesa_0213.html</li>
<li>exra_mme_5120.html</li>
....
</ul>如果我以dl, dt, dd 的方式呢?
<dl>
<dt>ABCD</dt>
<dd>moi_11258.html</dd>
<dd>je_eeee.html</dd>
<dd>xxx_fdsaf.html</dd>
<dd>def_999877.html</dd>
<dd>qq_qq_daaaa.html</dd>
<dd>fdsaffd_iuuio.html</dd>
<dd>xreeesa_0213.html</dd>
<dd>exra_mme_5120.html</dd>
....
</dl>
<script>
function HTMlist(path){
var txt;
fso = new ActiveXObject("Scripting.FileSystemObject");
fldr = fso.GetFolder(path);
fc = new Enumerator(fldr.files);
for (; !fc.atEnd(); fc.moveNext()) //枚举所有文件
{
s=fc.item(); //取文件对象
if (s.type=="HTML Document"){ //判断是否是“HTML文件”
f = fso.GetFile(s);
ts = f.OpenAsTextStream(1,-2);
txt = ts.ReadAll( ); //读全文
ts.Close( );
txt=txt.toUpperCase();
titl=s.name;
start=txt.indexOf("<TITLE>",0);
if (start!=-1){
start+=7;
end=txt.indexOf("</TITLE>",start);
if (end!=-1) titl=txt.substr(start,end-start);
}
document.write("<a href=\""+s+"\">"+titl+"</a><br>");
}
}
}
HTMlist("C:\\My Documents");
</script>
套用中国政府的语言,对这种干涉我们后台语言内政的行为,表示严重愤慨。
套用人民的语言,前后区分,干活不累。