ASP Slide News Code: <!-Dies ist eine Homepage-Datei-> <html>
<kopf>
<meta http-äquiv = content-type content = text /html;
<title> Foliennachrichten </title>
</head>
<body>
<!-#include file = diaoyong.asp->
</body>
</html> <!-Rufen Sie einfach die folgende Datei an.
<%
'Slide News
Db = ../webjx_data/webjx_data.asp
Setzen Sie conn = server.createObject (adodb.Connection)
ConnStr = provider = microsoft.jet.oledb.4.0;
Conn.open Connstr
SQL = Top 5 * aus [music_list_tupian_system] wobei iswnumsSex = 'Rotent Ads' Order by iswnumsid Desc
Setzen Sie rs = server.createObject (adodb.oldset)
Rs.oopen SQL, Conn, 1,1
wenn nicht rs.eof dann
K = 1
Num_total = rs.rcordCount
für i = 1 bis 5
Wenn i> num_total, beenden Sie für
Wenn i = 1 dann
imgurn = img/& rs (iswnumSpHoto)
Wenn Len (Rs (iswnumususer))> = 18 dann
ImgText11 = links (RS (iswnumsuser), 18) & ... & ...
anders
ImgText11 = RS (iswnumsuser)
Ende wenn
imglink11 = rs (iswnumsClass)
Ende wenn
Wenn i = 2 dann
IMGURL22 = IMG/& RS (ISWNUMSPHOTO)
Wenn Len (Rs (iswnumususer))> = 18 dann
ImgText22 = links (RS (iswnumsuser), 18) & ... & ...
anders
ImgText22 = rs (iswnumsuser)
Ende wenn
imglink22 = rs (iswnumsClass)
Ende wenn
Wenn i = 3 dann
IMGURL33 = IMG/& RS (ISWNUMSPHOTO)
Wenn Len (Rs (iswnumususer))> = 18 dann
ImgText33 = links (RS (iswnumsuse), 18) & ... & ...
anders
ImgText33 = RS (iswnumsuser)
Ende wenn
imglink33 = rs (iswnumsClass)
Ende wenn
Wenn i = 4 dann
IMGURL44 = IMG/& RS (ISWNUMSPHOTO)
Wenn Len (Rs (iswnumususer))> = 18 dann
ImgText44 = links (RS (iswnumsuse), 18) & ... & ...
anders
ImgText44 = RS (iswnumsuser)
Ende wenn
imglink44 = rs (iswnumsClass)
Ende wenn
Wenn i = 5 dann
IMGURL55 = IMG/& RS (ISWNUMSPHOTO)
Wenn Len (Rs (iswnumususer))> = 18 dann
ImgText55 = links (RS (iswnumsuser), 18) & ... & ...
anders
ImgText55 = RS (iswnumsuser)
Ende wenn
imglink55 = rs (iswnumsClass)
Ende wenn
Rs.Movenext
K = K+1
nächste
anders
Response.Write hat vorerst keine Daten!
Ende wenn
%>
<A target = _self href = javaScript: GORL ()> <span class = f14b>
<Skript 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
<%wenn num_total = 1 dann%>
varge pics = imgurl1
var links = imglink1
var texts = imgtext1
<%Elseif num_total = 2 dann%>
varge pics = imgurl1+|+imgurl2
var links = imglink1+|+imglink2
var texts = imgText1+|+imGtext2
<%Elseif num_total = 3 dann%>
varge pics = imgurl1+|+imgurl2+|+imgurl3
var links = imglink1+|+imglink2+|+imglink3
Var texts = imgText1+|+imGText2+|+imGtext3
<%Elseif num_total = 4 dann%>
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
<%Ende wenn%>
document.write ('<Objekt klassifisch = clSID: D27CDB6E-AE6D-11CF-96B8-44445535400 = http: //fpdownload.macromedia.com/pub/shockwavwav e/cabrids/swFlash.cab#fusion = 6,0, 0,0 width = ' + focus_width +' height = ' + swf_height +'> ');
document.write ('<param name = zulässtscriptAccess value = samedomain> <param name = movie value = focus
document.write ('<param name = Menüwert = false> <sem name = wmode value = opaque>');
document.write ('<param name = flashvars value = pics ='+pics+'& links ='+links+'& texte+texte+' & borderwidth = '+foc US_WIDTH+' & BorderHeight = '+Focus_Height+' & textheight = '+ Text_Height+'>'>);
document.write ('<eingebettet src = pixviewer 'menu = false bgcolor =#f0f0f0f0 Quality = high width ='+focus_width+'height ='+focus_heightacccccccccccccccccccccccccccccccccccccccccccccc ESS = SAMEDOMAIN TYPE = Application/X-SHOCKWAVE-FLASH Pluginspage = http://www.macromedia.com /go/getflashplayer/ > ');
</script>
</span> </a> <span id = focusttext class = f14b> </span>