中国开发网: 论坛: 程序员情感CBD: 贴子 474906
haitao
已经搞定!有狐的defer的确管用!。。。。。。。开源一把。。。。。。。
<html>
<head>
<title>海涛照片图库系统(硬盘版)--http://szhaitao.blog.hexun.com/</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<SCRIPT LANGUAGE="JavaScript">
<!--
function ln()
{
document.write("<br>");
}
function w(s)
{
document.write(s);
}
function wln(s)
{
document.write(s+"<br>");
}

//在这里列出你所有的照片目录,以“|”作为分隔符:
var photodirs="'c:/照片目录1|d:/dir/照片目录2|照片目录3|照片目录...'";
//作者:http://szhaitao.blog.hexun.com/


var selfurl=location.href.substr(0,location.href.length-11) ;

var jsb='<'+'SCRIPT DEFER'+'>';
var jse='</'+'SCRIPT'+'>';

function insertScript(js)
{
var div=document.createElement("DIV");
div.style.display="none";
document.body.appendChild(div);
var sScript=jsb;
sScript += js;
sScript += jse;
div.insertAdjacentHTML("AfterBegin", "<BR>"+sScript) // <BR>is important
}

function jssrc(jsurl)
{
var div=document.createElement("DIVsrc");
div.style.display="none";
document.body.appendChild(div);
var sScript='<'+'SCRIPT'+' src='+jsurl+' DEFER>';
sScript += jse;
div.insertAdjacentHTML("AfterBegin", "<BR>"+sScript) // <BR>is important
}

var aframe=location.search.substring(1).split('&')[0];
if (aframe)
{
if ( aframe == "aframe=top" )
{
w("<body bgcolor=#FFFFFF text=#000000 leftmargin=5>");

insertScript('w("<center><marquee direction=left behavior=scroll scrollamount=3 scrolldelay=10 align=middle bgcolor=#ffffff onmouseover=this.stop() onmouseout=this.start()>");'+"var links="+photodirs+";"
+"var qs = links.split('|'); if (qs) { for (var i=0;i<qs.length;i++) {"
+"w('<a href='+selfurl+'?aframe=left&alink='+qs[i]+' target=left>'+qs[i]+'</a> '); } } "+'w("</marquee></center>");');

w("</body>");
}
else
if ( aframe == "aframe=left" )
{
alink=location.search.substring(1).split('&')[1];
if (alink)
{
alink=alink.substr(6);
w("<body bgcolor=#FFFFFF text=#000000 leftmargin=5>");

var imgs=new Array();

jssrc(alink+"/photolib.js");

insertScript('function outlist(){\nvar n=imgs.length; if(!n) n=0; wln("共"+n+"张<hr>"); for (i=0; i<n; i++)\n w((i+1)+"/"+n+":<br><a href=\\\"'+alink+'/"+imgs[i]+"\\\" target=right><img src=\\\"'+alink+'/s/"+imgs[i]+"\\\" border=0></a><hr>");\n}\noutlist();');

w("</body>");
}
else
w("请先在上面选择图库目录。。。");
}
else
{
w("请先在上面选择图库目录,再点击左边的小图。。。");
wln("<br><br><br><br>作者:<a href=http://szhaitao.blog.hexun.com/>http://szhaitao.blog.hexun.com/</a>");
wln("");
wln("上次利用asp作了照片图库的自动预览,frameset模式:上方是多个照片目录的清单");
wln("点一个照片目录名称链接,就在下方的左边显示该照片子目录里所有照片的缩略图片清单,");
wln("点一个缩略图,就在右边显示它的大照片");
wln("(缩略图预先生成在照片目录下的一个名为s的子目录,文件名与原大照片的一致)");
wln("");
wln("“4个html”都是一个asp文件动态生成的");
wln("照片目录下除了所有的原大照片,还有一个photolist.js,包含了该目录下的所有原大照片的文件名");
wln("不管有几个照片目录,只需要一个asp文件。。。。");
wln("");
wln("现在想在本地目录作一个含js的html,也能实现上述功能--因为asp需要iis支持,本地目录里的文件,asp不会被解释执行、生效,所以希望能利用js来实现 ");
wln("");
wln("");
wln("需求背景:公司每次活动,拍了一些照片,放在一个目录");
wln("想通过web开放给同事浏览观看--利用asp实现了(2006-12)");
wln("");
wln("现在想,放假了,在自己的硬盘里也复制这些目录,也能浏览观看");
wln("acdsee是可以,但是它要阅读所有图片才能显示缩略图(2007-02-14)");
wln("");
wln("");
wln("这里涉及一个技术:");
wln("javascripts脚本能生成 插入某个js文件(文件名动态变化的) 的语句吗?");
wln("有狐 介绍了js的DEFER属性,很好的解决了这个问题! ");
}
}
else
{
w("<frameset rows=50,*>");
w(" <frame name=top src="+this.location.href+"?aframe=top frameborder=2>");
w(" <frameset cols=180,*>");
w(" <frame name=left src="+this.location.href+"?aframe=left frameborder=1>");
w(" <frame name=right src="+this.location.href+"?aframe=right frameborder=1>");
w(" </frameset>");
w("</frameset><noframes></noframes>");
}
//-->
</SCRIPT>
我的blog:http://szhaitao.blog.hexun.com & http://www.hoolee.com/user/haitao
--以上均为泛泛之谈--
不尽牛人滚滚来,无边硬伤纷纷现 人在江湖(出来的),哪能不挨刀(总归是要的)
网络对话,歧义纷生;你以为明白了对方的话,其实呢?

您所在的IP暂时不能使用低版本的QQ,请到:http://im.qq.com/下载安装最新版的QQ,感谢您对QQ的支持和使用

相关信息:


欢迎光临本社区,您还没有登录,不能发贴子。请在 这里登录