Новостной код ASP Slide: <!-Это файл домашней страницы-> <html>
<голова>
<meta http-equiv = content-type content = text /html;
<Title> Slide News </title>
</head>
<тело>
<!-#включить файл = diaoyong.asp->
</body>
</html> <!-Просто вызовите следующий файл.
<%
'Slide News
Db = ../webjx_data/webjx_data.asp
Установить conn = server.createObject (adodb.connection)
Connstr = Provider = microsoft.jet.oledb.4.0;
Conn.Open Connstr
SQL = SELECT TOP 5 * из [music_list_tupian_system], где iswnumssex = 'horent ads' ordes 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
Если я> num_total, то выходит для
Если я = 1, тогда
imgurn = img/& rs (iswnumsphoto)
Если Len (rs (iswnumsuser))> = 18 тогда
imgtext11 = слева (rs (iswnumsuser), 18) и ... & ...
еще
imgtext11 = rs (iswnumsuser)
конец, если
imglink11 = rs (iswnumsclass)
конец, если
Если я = 2, тогда
Imgurl22 = img/& rs (iswnumsphoto)
Если Len (rs (iswnumsuser))> = 18 тогда
imgtext22 = слева (rs (iswnumsuser), 18) & ... & ...
еще
imgtext22 = rs (iswnumsuser)
конец, если
imglink22 = rs (iswnumsclass)
конец, если
Если я = 3, то тогда
Imgurl33 = img/& rs (iswnumsphoto)
Если Len (rs (iswnumsuser))> = 18 тогда
imgtext33 = слева (rs (iswnumsuse), 18) и ... & ...
еще
imgtext33 = rs (iswnumsuser)
конец, если
imglink33 = rs (iswnumsclass)
конец, если
Если я = 4, тогда
Imgurl44 = img/& rs (iswnumsphoto)
Если Len (rs (iswnumsuser))> = 18 тогда
imgtext44 = слева (rs (iswnumsuse), 18) и ... & ...
еще
imgtext44 = rs (iswnumsuser)
конец, если
imglink44 = rs (iswnumsclass)
конец, если
Если я = 5, тогда
Imgurl55 = img/& rs (iswnumsphoto)
Если Len (rs (iswnumsuser))> = 18 тогда
imgtext55 = слева (rs (iswnumsuser), 18) и ... & ...
еще
imgtext55 = rs (iswnumsuser)
конец, если
imglink55 = rs (iswnumsclass)
конец, если
Rs.movenext
k = k+1
следующий
еще
Response.Write не имеет данных на данный момент!
конец, если
%>
<A target = _self href = javascript: gourl ()> <span class = f14b>
<script type = text/javascript>
Imgurl1 = <%= imgurl11%>;
imgtext1 = <%= imgtext11%>
imglink1 = Escape (<%= imglink11%>);
imgurl2 = <%= imgurl22%>;
imgtext2 = <%= imgtext22%>
imglink2 = Escape (<%= imglink22%>);
Imgurl3 = <%= imgurl33%>;
imgtext3 = <%= imgtext33%>
imglink3 = Escape (<%= imglink33%>);
imgurl4 = <%= imgurl44%>;
imgtext4 = <%= imgtext44%>
imglink4 = Escape (<%= imglink44%>);
Imgurl5 = <%= imgurl55%>;
imgtext5 = <%= imgtext55%>
Imglink5 = Escape (<%= imglink55%>);
var Focus_height = 160
var text_height = 18
var swf_height = focus_height+text_height
<%if num_total = 1, то%>
varge pics = imgurl1
var links = imglink1
var texts = imgtext1
<%Elseif num_total = 2, затем%>
varge pics = imgurl1+|+imgurl2
var links = imglink1+|+imglink2
var texts = imgtext1+|+imgtext2
<%Elseif num_total = 3 затем%>
varge pics = imgurl1+|+imgurl2+|+imgurl3
var links = imglink1+|+imglink2+|+imglink3
Var Texts = imgText1+|+imgText2+|+imgText3
<%Elseif num_total = 4, затем%>
varge pics = imgurl1+|+imgurl2+|+imgurl3+|+imgurl4
var links = imglink1+|+imglink2+|+imglink3+|+imglink4
Var Texts = imgText1+|+imgText2+|+imgText3+|+imgText4
<%elseif num_total = 5, что%>
varge pics = imgurl1+|+imgurl2+|+imgurl3+|+imgurl4+|+imgurl5
var links = imglink1+|+imglink2+|+imglink3+|+imglink4+|+imglink5
Var Texts = imgText1+|+imgText2+|+imgText3+|+imgText4+|+imgText5
<%Конец, если%>
Document.write ('<object classid = clSID: d27cdb6e-ae6d-11cf-96b8-4445553540000 = http: //fpdownload.macromedia.com/pub/shockwavwavave e/cabs/flash/swflash.cab#версии = 6,0, 6,0, 6,0, 6,0, 6,0, 6,0, 6,0, 0,0 ширина = ' + фокусировка_width +' height = ' + swf_height +'> ');
document.write ('<param name = AllingCrickAccess value = samedomain> <param name = value = focus.swf> <param name = Quality = High> <param name = bgcolor value =#f0f0f0>');
document.write ('<param name = значение меню = 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+' & texts+'& borderwidth ='+focus_width+'& borderheight ='+focus_height+'& textheight ='+text_height+ Menu = false bgcolor =#f0f0f0f0 Quality = High Width = '+Focus_width+' height = '+focus_heightaccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc macromedia.com/go/getflashplayer/ > ');
</script>
</span> </a> <span id = focustext class = f14b> </span>