指定路径,遍历当前路径下所有文件夹和文件
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script>
function searchFiles(){
var fso = new ActiveXObject("Scripting.FileSystemObject");
var f = fso.GetFolder(document.all.fixfolder.value);
var fc = new Enumerator(f.files);
var s = "";
for (; !fc.atEnd(); fc.moveNext())
{
s += fc.item();
s += "<br/>";
}
fk = new Enumerator(f.SubFolders);
for (; !fk.atEnd(); fk.moveNext())
{
s += fk.item();
s += "<br/>";
}
textarea.innerHTML = s
}
</script>
</head>
<body bgcolor="#FFFFFF">
指定一个非空文件夹路径：<br/>
<input type="text" name="fixfolder" value ="C:\黑色头发">
<input type="button" value ="查找" onclick="searchFiles()">
<table >
<tr>
<td id = "textarea">
</td>
</tr>
</table>
</body>
</html>
黑色头发:http://heisetoufa.iteye.com/
