ASP實現js圖片的輪顯_ASP教程
推薦:ASP代碼直接增加、刪除ACCESS表和字段本例主要講述如何應用Create、Drop和Alter語句增加、刪除ACCESS表和字段,代碼如下: % '''''''''''''''''''''''''''''''''''' ' 增加、刪除表和字段 ' ├Create Table 表名(field1 type[(size)] [null|not null] [default eExpression] [primary key][,fiel
下午做了一個asp+js實現圖片的輪顯的效果,效果圖如: 左側的圖片輪顯,在 我用的是js,然后我改了一下用asp實現效果的。
pic.asp源代碼:
<%
'連接數據庫代碼省去了
sql=("select * from Pic order by picorder asc,id desc")
Set rs=server.CreateObject("adodb.recordset")
If rs.eof And rs.bof Then
%>
document.write('暫無圖片');
<%
Else
%>
var focus_width=820
var focus_height=185
var text_height=0
var swf_height = focus_height+text_height
<%
'轉載請保留來源
Do While Not rs.eof
pics=pics&rs("picurl")&"|" '把圖片用"|"連接起來
links=links&rs("picaddress")&"|"
rs.movenext
Loop
picLen=Len(pics)
pics=Left(pics,(picLen-1)) '作用是去除最后一個"|"
linksLen=Len(links)
links=Left(links,(linksLen-1))
%>
var pics='<%=pics%>'
var links='<%=links%>'
var texts=''
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="flash/pixviewer.swf"><param name="quality" value="high"><param name="bgcolor" value="#ffffff">');
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('<embed src="flash/pixviewer.swf" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'" menu="false" bgcolor="#ffffff" quality="high" width="'+ focus_width +'" height="'+ focus_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />'); document.write('</object>');
<%End If %>
然后在首頁調用的地方,<script type="text/javascript" src="pic.asp"></script>
pixviewer.swf 可以在 /flash/pixviewer.swf 下載。
作者:無情 出處:
分享:ASP技巧:rs.getrows方法GetRows()方法是將數據從 Recordset 復制到二維數組中,這是一個二維數組,第一個下標標識字段,第二個則標識記錄號 所以rsArray = rs.GetRows() rsArray(0, 0)就表示記錄集第一行的第一字段值 rsArray(1, 0)就表示記錄集第一行的第二字段值 數組的數據是保
- 相關鏈接:
- 教程說明:
ASP教程-ASP實現js圖片的輪顯。