ASPスライドニュースコード:<! - これはホームページファイルです - > <html>
<head>
<メタhttp-equiv = content-type content = text /html;
<title>スライドニュース</title>
</head>
<body>
<! - #include file = diaoyong.asp->
</body>
</html> <! - 次のファイルを呼び出します。
<%
'スライドニュース
db = ../webjx_data/webjx_data.asp
conn = server.createObject(adodb.connection)を設定します
connstr = provider = microsoft.jet.oledb.4.0;
conn.open connstr
sql = [music_list_tupian_system] from [music_list_tupian_system] from iswnumssex = 'Rotent ads' Order by iswnumsid descを選択する
rs = server.createObject(adodb.oldset)を設定します
rs.oopen sql、conn、1,1
rs.eofではない場合
k = 1
num_total = rs.rcordcount
i = 1から5の場合
i> num_totalの場合、entistの場合
i = 1の場合
imgurn = img/&rs(iswnumsphoto)
len(rs(iswnumsuser))> = 18の場合
imgtext11 = left(rs(iswnumsuser)、18)&...&...
それ以外
imgtext11 = rs(iswnumsuser)
ifを終了します
imglink11 = rs(iswnumsclass)
ifを終了します
i = 2の場合
imgurl22 = img/&rs(iswnumsphoto)
len(rs(iswnumsuser))> = 18の場合
imgtext22 = left(rs(iswnumsuser)、18)&...&...
それ以外
imgtext22 = rs(iswnumsuser)
ifを終了します
imglink22 = rs(iswnumsclass)
ifを終了します
i = 3の場合
imgurl33 = img/&rs(iswnumsphoto)
len(rs(iswnumsuser))> = 18の場合
imgtext33 = left(rs(iswnumsuse)、18)&...&...
それ以外
imgtext33 = rs(iswnumsuser)
ifを終了します
imglink33 = rs(iswnumsclass)
ifを終了します
i = 4の場合
imgurl44 = img/&rs(iswnumsphoto)
len(rs(iswnumsuser))> = 18の場合
imgtext44 = left(rs(iswnumsuse)、18)&...&...
それ以外
imgtext44 = rs(iswnumsuser)
ifを終了します
imglink44 = rs(iswnumsclass)
ifを終了します
i = 5の場合
imgurl55 = img/&rs(iswnumsphoto)
len(rs(iswnumsuser))> = 18の場合
imgtext55 = left(rs(iswnumsuser)、18)&...&...
それ以外
imgtext55 = rs(iswnumsuser)
ifを終了します
imglink55 = rs(iswnumsclass)
ifを終了します
rs.movenext
k = k+1
次
それ以外
Response.Writeには当面のデータがありません!
ifを終了します
%>
<A Target = _ self href = javascript:gourl()> <span class = f14b>
<script type = text/javascript>
imgurl1 = <%= imgurl11%>;
imgtext1 = <%= imgtext11%>
imglink1 = escase(<%= imglink11%>);
imgurl2 = <%= imgurl22%>;
imgtext2 = <%= imgtext22%>
imglink2 = escase(<%= imglink22%>);
imgurl3 = <%= imgurl33%>;
imgtext3 = <%= imgtext33%>
imglink3 = escase(<%= imglink33%>);
imgurl4 = <%= imgurl44%>;
imgtext4 = <%= imgtext44%>
imglink4 = escase(<%= imglink44%>);
imgurl5 = <%= imgurl55%>;
imgtext5 = <%= imgtext55%>
imglink5 = escase(<%= imglink55%>);
var focus_height = 160
var text_height = 18
var swf_height = focus_height+text_height
<%if num_total = 1 then%>
varge pics = imgurl1
var links = imglink1
var texts = imgtext1
<%elseif num_total = 2 then%>
varge pics = imgurl1+|+imgurl2
var links = imglink1+|+imglink2
var texts = imgtext1+|+imgtext2
<%elseif num_total = 3 then%>
varge pics = imgurl1+|+imgurl2+|+imgurl3
var links = imglink1+|+imglink2+|+imglink3
var texts = imgtext1+|+imgtext2+|+imgtext3
<%elseif num_total = 4 then%>
varge pics = imgurl1+|+imgurl2+|+imgurl3+|+imgurl4
var links = imglink1+|+imglink2+|+imglink3+|+imglink4
var texts = imgtext1+|+imgtext2+|+imgtext3+|+imgtext4
<%elseif num_total = 5 thatn%>
varge pics = imgurl1+|+imgurl2+|+imgurl3+|+imgurl4+|+imgurl5
var links = imglink1+|+imglink2+|+imglink3+|+imglink4+|+imglink5
var texts = imgtext1+|+imgtext2+|+imgtext3+|+imgtext4+|+imgtext5
<%end if>
document.write( '<object classid = clsid:d27cdb6e-ae6d-11cf-96b8-444553540000 = http://fpdownload.macromedia.com/pub/shockwavwavav e/cabs/swflash.cab#バージョン= 6,0、6,0、 0,0 width = ' + focus_width +' height = ' + swf_height +'> ');
document.write( '<param name = alscriptaccess value = samedomain> <param name = movie value = focud.swf> <param name = high> <param name = bgcolor value =#f0f0f0>');
document.write( '<param name = mence value = false> <sem name = wmode value = opaque>');
document.write( '<param name = flashvars value = pics ='+pics+'&links ='+links+'&texts+texts+'&borderwidth = '+foc us_width+'&borderheight = '+focus_height+'&textheight = '+ text_height+'>'>);
document.write( '<embed src = pixviewer.swf wmode = opaque = pics ='+pics+'&links+links+'& '&borderwidth ='+focus_width+'&borderheight ='+focus_height+'&textheigh ='+text_height+ 'メニュー= false bgcolor =#f0f0f0f0 quality = high width ='+focus_width+'height ='+focus_heightacccccccccccccccccccccccckcccccccccccccccckccccccccccccccccccc > '); document.write(' </object> ');
</script>
</span> </a> <span id = focustext class = f14b> </span>