功能:将“扫描图片成网页.html”拷贝到图片所在目录,打开,点击按钮即可生成包括该目录下所有图片的网页。
觉得对您有用可以下载附件,有使用方法。
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <script type="text/javascript"> function getCurrentDirectory(){ var locHref = location.href; var locArray = locHref.split("/"); var str = ""; /**这里测试locArray效果** for(x in locArray){ document.write("locArray["); document.write(x+"]: "); document.write(locArray[x]+"<br />"); } **/ delete locArray[locArray.length-1]; var dirtxt = locArray.join("/"); str = dirtxt.substr(8); //document.write ("<div align=center>" + str + "</div><br />\n\n\n"); document.form1.localfolder.value = str; return str; } function searchFiles(dir, flag_all, flag_name){ if (dir == "") { if (document.form1.localfolder.value == "") var dir = String(getCurrentDirectory()); else var dir = document.form1.localfolder.value; } if (dir.substr(dir.length-1, 1) != "\\" && dir.substr(dir.length-1, 1) != "/") dir = dir + "\\"; dir = dir.replace(/\//g, "\\"); var fso = new ActiveXObject("Scripting.FileSystemObject"); var f = fso.GetFolder(dir); var fc = new Enumerator(f.files); var str = ""; var content = ""; for (; !fc.atEnd(); fc.moveNext()) { str = fc.item(); type = fso.GetExtensionName(str).toLowerCase(); if (type == "jpg" || type == "gif" || type == "png") { temp = str.Name.toLowerCase(); //不带名字 if (flag_name == 0) content = "<p align=center><img src=\"" + dir + temp + "\" /></p><br />\n"; //带名字 else content = "<p align=center><img src=\"" + dir + temp + "\" /><br /> " + temp.substring(temp.indexOf("-")+1, temp.lastIndexOf(".")) + "</p><br />\n"; document.write (content); } } if (flag_all == 1) //读取目录下所有目录下的图片 { var fk = new Enumerator(f.SubFolders); for (; !fk.atEnd(); fk.moveNext()) { str = String(fk.item()); //document.write( str.substr(dir.length) + "<br>"); var dir_name = dir + str.substr(dir.length) + "\\"; dir_name = dir_name.replace("/", "\\"); document.write("<hr /><br />\n<p align=center>子文件夹:" + dir_name + "</p>\n") searchFiles(dir_name, flag_all, flag_name); } } } </script> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>扫描图片生成网页</title> <style type="text/css"> <!-- body,td,th { font-size: 14px; } --> </style></head> <body bgcolor="#FFFFFF" onLoad="getCurrentDirectory()"> <p align="center"><font style="font-family:'华文中宋'; font-size:24px; color='blue'">将目录下全部图片扫描成网页</font></p> <table width="650" border="0" align="center"> <tr> <td> <hr /> <form name="form1"> <p><font color=red>指定本地文件夹(可更改,点击‘搜索’后出现提示点确定或按住‘y’不放直到没有提示框),目录也是文件夹的意思。:</font> </p> <p><br /> <input type="text" name="localfolder" size="50" value =""> (当前内容为您打开这个网页所在的路径) <br /> <br /> 您只读取当前目录下图片,而不再读取本目录下所有目录中的图片吗?那就点如下按钮: <br /> <input type="button" value ="搜索(不在图片下方显示图片名)" onClick="searchFiles('', 0, 0)"> <input type="button" value ="搜索(要在图片下方显示图片名)" onClick="searchFiles('', 0, 1)"> <br /> <br /> <br /> <br /> 您不仅要读取当前目录下的图片,还要读取当前目录下所有目录中的图片吗?那就点如下按钮: <br /> <input type="button" value ="搜索(不在图片下方显示图片名)" onClick="searchFiles('', 1, 0)"> <input type="button" value ="搜索(要在图片下方显示图片名)" onClick="searchFiles('', 1, 1)"> </p> </form> </td> </tr> </table> </body> </html>