1 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
2 <html>
3 <head>
4 <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
5 <script>
6 function searchFiles(){
7 var fso = new ActiveXObject("Scripting.FileSystemObject");
8 var f = fso.GetFolder(document.all.fixfolder.value);
9 var fc = new Enumerator(f.files);
10 var s = "";
11 for (; !fc.atEnd(); fc.moveNext())
12 {
13 s += fc.item();
14 s += "<br/>";
15 }
16 fk = new Enumerator(f.SubFolders);
17 for (; !fk.atEnd(); fk.moveNext())
18 {
19 s += fk.item();
20 s += "<br/>";
21 }
22
23 textarea.innerHTML = s
24 }
25 </script>
26 </head>
27 <body bgcolor="#FFFFFF">
28 指定文件夹:<input type="text" name="fixfolder" value ="E:\">
29 <input type="button" value ="搜索" onclick="searchFiles()">
30 <table >
31 <tr>
32 <td id = "textarea">
33
34 </td>
35 </tr>
36 </table>
37
38 </body>
39 </html>来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/2249/viewspace-3146224/ ,如需转载,请注明出处,否则将追究法律责任。