----------------------------------------------------------------------------------------
<%
add=""
if request("add")<>"" then add="add='"&request("add")&"' and "
sql="Select * from ad where "&add&" checked=true"
rs.Open sql, conn, 1, 3
if rs.bof or rs.eof then
response.write "document.write('<div align=center>无任何记录!</div>');"
response.end
rs.close
else
rs.movefirst
minid=rs("id")
rs.movelast
maxid=rs("id")
rs.close
randomize
x=fix((maxid-minid+1)*rnd)+minid
sql = "Select * From ad where "&add&" id="&x&" and checked=true"
rs.Open sql,conn, 1,3
if rs.bof or rs.eof then
rs.close
sql="Select * From ad where "&add&" checked=true"
rs.Open sql,conn, 3,1
rs.movefirst
showad
else
showad
end if
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
sub showad
if rs("isflash")=true then
response.write ("document.write('<embed src="""&rs("AdSitePic")&""" pluginspage=""http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash";" type=""application/x-shockwave-flash"" width=468 height=60></embed>');")
else
response.write ("document.write('<a href=""ShowAd.asp?ads=" & rs("id") & "&url=" & rs("AdSiteUrl") & """ target=""_blank""><img border=0 src=""" & rs("AdSitePic") & """ alt=""" & rs("AdSiteIntro") & """></a>');")
end if
end sub
%>
---------------------------------------------------------------------------------------
如果在这个调用句上:<script src="diaoyon.asp?add=显示位置"></script>去掉( ?add=显示位置"> )这个部分,那么可以在页面上成功调用一张默认的图片。。。。
但只要指定了ADD的参数,就无法成功调用。。。我看了数据库里的数,ADD的参数很正常,没有什么异常呀。。。。
请教各位仁兄。。。。