<!--
FLASH樣式
本例可以設置TOP的數字,從而可以動態控制圖象的數量
?-->
<!--#include file="inc/conn.asp"-->
<%Set rs=Server.CreateObject("ADODB.Recordset")
sql="select top 5 * from product? where elite=true order by updatetime desc"
rs.open sql,conn,1,1%>
<DIV style="DISPLAY: none">
<TABLE id=pictable cellSpacing=0 cellPadding=0 width="100%" border=0>
? <TBODY>
? <%do while not rs.eof
??? %>
? <TR>
?
??? <TD><%=rs("bookpic")%></TD>
??? <TD><%=rs("product_id")%></TD>
??? <TD>productshow.asp?articleid=<%=rs("articleid")%></TD></TR>
? <%rs.movenext
? Loop
? rs.close%>
? </TBODY></TABLE></DIV>
<SCRIPT type=text/javascript>
?<!--
?
?var focus_width=550;//圖象的寬度
?var focus_height=145;//圖象的高度
?var text_height=25;//文字高度
?var swf_height = focus_height+text_height;
?var t=document.getElementById("pictable");
?var rl=t.rows.length;
?var baseu=?document.URL.replace(/(http.*//)(.*)/, "$1");
?var pics="";?var links="";?var texts="";
?for (var i=0;i<rl;i++) {
??pics+=baseu+t.rows[i].cells[0].innerText.replace(///.*///, "")+"|";
??links+=t.rows[i].cells[2].innerText+"|";
??texts+=t.rows[i].cells[1].innerText+"|";
?}
?pics=pics.substr(0,pics.length-1);
?links=links.substr(0,links.length-1);
?texts=texts.substr(0,texts.length-1);
?var fv="pics="+pics+"&links="+links+"&texts="+texts+"&borderwidth="+focus_width+"&borderheight="+focus_height+"&textheight="+text_height;
?document.write('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase=" http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 " width="'+focus_width+'" height="'+swf_height+'">');
?document.write('<param name="movie" value="test/pv.swf"> <param name="quality" value="high"><param name="allowScriptAccess" value="sameDomain"><param name="menu" value="false"><param name="bgcolor" value="#ffffff"><param name="wmode" value="opaque">');
?document.write('<param name="flashvars" value="'+fv+'"></object>');

?//-->
?</SCRIPT>

?Pv.swf需要的發郵件給我,或者在這里留言.

變換顯示數據庫圖片(2/3)