• 软件测试技术
  • 软件测试博客
  • 软件测试视频
  • 开源软件测试技术
  • 软件测试论坛
  • 软件测试沙龙
  • 软件测试资料下载
  • 软件测试杂志
  • 软件测试人才招聘
    暂时没有公告

字号: | 推荐给好友 上一篇 | 下一篇

js和asp 显示数据库中图片

发布: 2007-6-30 18:56 | 作者: admin | 来源: | 查看: 38次 | 进入软件测试论坛讨论

领测软件测试网 <table width="100%" border="0" align="center" cellspacing="0" cellpadding="0" style="TABLE-LAYOUT: fixed">
<%
sql="select top 4 * from Ad where checked=true "
rs.Open sql,conn,1,1
if not rs.eof then
n=0
while not rs.EOF
n=n+1
%>
<%=rs("AdSitePic")%>
<%
rs.MoveNext
wend
%>
<td width="100%" height="220">
<script language="JavaScript1.2">

var slideshow_width=@#200px@# //SET SLIDESHOW WIDTH (set to largest image@#s width if multiple dimensions exist)
var slideshow_height=@#200px@# //SET SLIDESHOW HEIGHT (set to largest image@#s height if multiple dimensions exist)
var pause=3000 //SET PAUSE BETWEEN SLIDE (2000=2 seconds)
var slidebgcolor="white"

var dropimages=new Array()

dropimages[0]="<img src="<%=rs("AdSitePic")%>" width="128" height="128">"
dropimages[1]="<img src="<%=rs("AdSitePic")%>" width="128" height="128">"
dropimages[2]="<img src="<%=rs("AdSitePic")%>" width="128" height="128">"

var droplinks=new Array()

droplinks[0]=www.airsend.com
droplinks[1]=www.sina.com
droplinks[2]=www.baidu.com

var preloadedimages=new Array()
for (p=0;p<dropimages.length;p++){
preloadedimages[p]=new Image()
preloadedimages[p].src=dropimages[p]
}

var ie4=document.all
var dom=document.getElementById

if (ie4||dom)
document.write(@#<div style="position:relative;width:@#+slideshow_width+@#;height:@#+slideshow_height+@#;overflow:hidden"><div id="canvas0" style="position:absolute;width:@#+slideshow_width+@#;height:@#+slideshow_height+@#;background-color:@#+slidebgcolor+@#;left:-@#+slideshow_width+@#"></div><div id="canvas1" style="position:absolute;width:@#+slideshow_width+@#;height:@#+slideshow_height+@#;background-color:@#+slidebgcolor+@#;left:-@#+slideshow_width+@#"></div></div>@#)
else
document.write(@#<a href="javascript:rotatelink()"><img name="defaultslide" src="@#+dropimages[0]+@#" border=0></a>@#)

var curpos=parseInt(slideshow_width)*(-1)
var degree=10
var curcanvas="canvas0"
var curimageindex=linkindex=0
var nextimageindex=1


function movepic(){
if (curpos<0){
curpos=Math.min(curpos+degree,0)
tempobj.style.left=curpos+"px"
}
else{

clearInterval(dropslide)
nextcanvas=(curcanvas=="canvas0")? "canvas0" : "canvas1"
tempobj=ie4? eval("document.all."+nextcanvas) : document.getElementById(nextcanvas)
var slideimage=@#<img src="@#+dropimages[curimageindex]+@#" border=0>@#
tempobj.innerHTML=(droplinks[curimageindex]!="")? @#<a href="@#+droplinks[curimageindex]+@#">@#+slideimage+@#</a>@# : slideimage
nextimageindex=(nextimageindex<dropimages.length-1)? nextimageindex+1 : 0
setTimeout("rotateimage()",pause)
}
}

function rotateimage(){
if (ie4||dom){
resetit(curcanvas)
var crossobj=tempobj=ie4? eval("document.all."+curcanvas) : document.getElementById(curcanvas)
crossobj.style.zIndex++
var temp=@#setInterval("movepic()",50)@#
dropslide=eval(temp)
curcanvas=(curcanvas=="canvas0")? "canvas1" : "canvas0"
}
else
document.images.defaultslide.src=dropimages[curimageindex]
linkindex=curimageindex
curimageindex=(curimageindex<dropimages.length-1)? curimageindex+1 : 0
}

function rotatelink(){
if (droplinks[linkindex]!="")
window.location=droplinks[linkindex]
}

function resetit(what){
curpos=parseInt(slideshow_width)*(-1)
var crossobj=ie4? eval("document.all."+what) : document.getElementById(what)
crossobj.style.left=curpos+"px"
}

function startit(){
var crossobj=ie4? eval("document.all."+curcanvas) : document.getElementById(curcanvas)
crossobj.innerHTML=@#<a href="@#+droplinks[curimageindex]+@#"><img src="@#+dropimages[curimageindex]+@#" border=0></a>@#
rotateimage()
}

if (ie4||dom)
window.onload=startit
else
setInterval("rotateimage()",pause)

</script>

</td>
<%
else
Response.Write "<tr><td><center><b>还 没 有 内 容</b></center></td></tr>"
end if
rs.close
set rs1=nothing
%>
</table>

小弟 想在网页中显示动态图片 随着图片的改变而改变起连接 adsitepic 为数据库ad中图片的url 连接数据库没有问题 可是一旦加上asp 到js 中 图片就不显示

<%=rs("AdSitePic")%> 显示正确的url

请问 各位高手 如何解决这个问题



文章来源于领测软件测试网 https://www.ltesting.net/


关于领测软件测试网 | 领测软件测试网合作伙伴 | 广告服务 | 投稿指南 | 联系我们 | 网站地图 | 友情链接
版权所有(C) 2003-2010 TestAge(领测软件测试网)|领测国际科技(北京)有限公司|软件测试工程师培训网 All Rights Reserved
北京市海淀区中关村南大街9号北京理工科技大厦1402室 京ICP备2023014753号-2
技术支持和业务联系:info@testage.com.cn 电话:010-51297073

软件测试 | 领测国际ISTQBISTQB官网TMMiTMMi认证国际软件测试工程师认证领测软件测试网