主题:大家谁有好的幻灯片代码(读库的asp)
小小刘茜
[专家分:10] 发布于 2008-03-30 17:19:00
最好就像39网的(www.39.net)
回复列表 (共2个回复)
沙发
wxpc [专家分:1240] 发布于 2008-04-03 09:52:00
你说的好象是ASP图片轮播吧,我摘录了一下网上查到的资料给你:
你可以去百度搜索"ASP图片轮播" 下面是代码,还需要一个FLASH文件
首先数据库里的信息或者新闻表里有要专门的字段来存放图片的地址信息,即在后台发布信息/信息时自动将用户上传的图片获取增加到该字段里,然后还需要设置一个字段,用来标识这记录是否用来显示在flash轮播里。(这里只介绍下思想,实现略)
我的信息表名为:news
用来记录图片地址的字段名:firstImageName
用来标识是否显示在flash轮播的字段名:ok
前台调用代码:
<%
sql="select top 5 * from news where firstImageName<>'' and ok=true order by ID DESC" '从数据库中查找前5条符合条件的记录
set rses=conn.execute(sql)
%>
<script type="text/javascript">
var pics=""; //用来记录图片的地址
var links=""; //用来记录图片的链接
var texts=""; //用来记录播放效果下面的标题提示,即记录的标题
<%
adsi=0 '用来记录实际从数据库中读取的符合条件的记录
do while not rses.eof
adsi=adsi+1
%>
imgUrl<%=adsi%>="UploadFiles/<%=trim(rses("firstImageName"))%>";
imgtext<%=adsi%>="<%=left(rses("title"),12)%>";
imgLink<%=adsi%>=escape("xwxsym/viewnews.asp?id=<%=rses("id")%>");
pics+=imgUrl<%=adsi%>+"|";
links+=imgLink<%=adsi%>+"|";
texts+=imgtext<%=adsi%>+"|";
<%
rses.movenext
loop
%>
if(pics!="" && links!="" && texts!="") //如果有记录,则整理结果,即去掉最后的|
{
pics=pics.substring(0,pics.length-1);
links=links.substring(0,links.length-1);
texts=texts.substring(0,texts.length-1);
}
var focus_width=200 //播放的图片宽度
var focus_height=135 //播放的图片高度
var text_height=18 //显示标题文本的高度
var swf_height = focus_height+text_height //计算播放总共的实际高度
document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0"
width="'+ focus_width +'" height="'+ swf_height +'">');
document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="focus2.swf"><param name="quality" value="high"><param name="bgcolor" value="#F0F0F0">');
document.write('<param name="menu" value="false"><param name=wmode value="opaque">');
document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+
'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');
document.write('</object>');
</script>
附件里上传了些程序所需要的flash,请参见右边下载。
文章来源(WEB开发技术知识库):http://cn-web.com/cnweb/0/513/article/
板凳
悠悠我心 [专家分:30] 发布于 2008-04-03 17:17:00
我刚好写了一个..结合JS的.JS是静态给出图片地址的,而且里面有一个透明的flash,你可以到这个地址去下这个特效(http://www.makewing.com/lanren/jscode/js-0010.rar),我分别把JS和ASP的代码贴出来.你自己去研究吧.其中asp代码中,需要建一个表,里面的一个字段用来保存图片文件名.
javascript:
<script type="text/javascript">
imgUrl1="images/01.jpg";
imgtext1="蔬菜广告创意01"
imgLink1=escape("http://www.makewing.com");
imgUrl2="images/02.jpg";
imgtext2="蔬菜广告创意02"
imgLink2=escape("http://www.makewing.com");
imgUrl3="images/03.jpg";
imgtext3="蔬菜广告创意03"
imgLink3=escape("http://www.makewing.com");
imgUrl4="images/04.jpg";
imgtext4="蔬菜广告创意04"
imgLink4=escape("http://www.makewing.com");
imgUrl5="images/05.jpg";
imgtext5="蔬菜广告创意05"
imgLink5=escape("http://www.makewing.com");
var focus_width=240
var focus_height=200
var text_height=18
var swf_height = focus_height+text_height
var pics=imgUrl1+"|"+imgUrl2+"|"+imgUrl3+"|"+imgUrl4+"|"+imgUrl5
var links=imgLink1+"|"+imgLink2+"|"+imgLink3+"|"+imgLink4+"|"+imgLink5
var texts=imgtext1+"|"+imgtext2+"|"+imgtext3+"|"+imgtext4+"|"+imgtext5
document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ focus_width +'" height="'+ swf_height +'">');
document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="images/focus1.swf"><param name="quality" value="high"><param name="bgcolor" value="#F0F0F0">');
document.write('<param name="menu" value="false"><param name=wmode value="opaque">');
document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');
document.write('</object>');
</script>
ASP:动态读取图片地址:
<!--#include file="conn.asp"-->
<html>
<head>
<title>图片新闻</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body>
<%
sql="select top 4 * from NEWS where firstImageName<>'' and ok=true order by ID DESC"
set rs=conn.execute(sql)
if not Rs.eof then
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<%
i=0
do while not rs.eof
i=i+1
%>
<input id="id<%=i%>" name="id<%=i%>" type="hidden" value="<%=trim(rs("id"))%>"></input>
<input id="input<%=i%>" name="input<%=i%>" type="hidden" value="<%=trim(rs("firstImageName"))%>"></input>
<input id="imglink<%=i%>" name="imglink<%=i%>" type="hidden" value="onews.asp?id=<%=rs("id")%>"></input>
<input id="imgtext<%=i%>" name="imgtext<%=i%>" type="hidden" value="<%=left(rs("title"),10)%>"></input>
<br>
<%
rs.movenext
loop
rs.close()
set rs=nothing
%>
<input id="imgNum" name="imgNum" type="hidden" value="<%=i%>"></input>
<%
if i<>0 then
%>
<script type="text/javascript">
<!--
var i=1;
var len=0;
var pics="";
var links="";
var texts="";
var imgNums=imgNum.value;
for(i=1;i<=imgNums;i++){
var imgurl="input"+i;
var imglink="imglink"+i;
var imgtext="imgtext"+i;
var id="id"+i;
var Objimgurl=eval(imgurl);
var objimglink=eval(imglink);
var objimgtext=eval(imgtext);
imgurl="\|uppic/"+Objimgurl.value;
pics=pics+imgurl;
imglink="\|"+objimglink.value;
links=links+imglink;
imgtext="\|"+objimgtext.value;
texts=texts+imgtext;
}
len=pics.length;
pics=pics.substr(1,len);
links=links.substr(1,links.length);
texts=texts.substr(1,texts.length);
var focus_width=150
var focus_height=210
var text_height=15
var swf_height = focus_height+text_height
document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ focus_width +'" height="'+ swf_height +'">');
document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="uppic/focus1.swf"><param name="quality" value="high"><param name="bgcolor" value="#F0F0F0">');
document.write('<param name="menu" value="false"><param name=wmode value="opaque">');
document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');
document.write('</object>');
-->
</script>
<%end if%>
</td>
</tr>
<tr>
<td height="25" align="center"><a href="onews.asp?id=<%=rs("id")%>" target="_blank" ><%=left(rs("title"),12)%></a></td>
</tr>
</table>
<%
else
response.write "<tr><td align=center colspan=2 bgcolor=#E8E8F4>尚无收录</td></tr>"
end if
rs.close
set conn=nothing
%>
</body>
</html>
我来回复