|
指定路径,遍历当前路径下所有文件夹和文件
<html><head><meta http-equiv="Content-Type"content="text/html;charset=gb2312"><script>function searchFiles(){varfso= new ActiveXObject("Scripting.FileSystemObject");varf =fso.GetFolder(document.all.fixfolder.value);varfc = new Enumerator(f.files);vars ="";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 ="查找" ><table ><tr><tdid = "textarea"></td></tr></table></body></html>
黑色头发:http://heisetoufa.iteye.com/ |
|