رمز أخبار شريحة ASP: <!-هذا ملف الصفحة الرئيسية-> <html>
<head>
<meta http-equiv = content-type content = text /html ؛
<title> أخبار الشريحة </title>
</head>
<body>
<!-#تضمين ملف = dioyong.asp->
</body>
</html> <!-فقط اتصل بالملف التالي.
<٪
أخبار الشريحة
db = ../webjx_data/webjx_data.asp
تعيين conn = server.createBject (adodb.connection)
connstr = provider = microsoft.jet.oledb.4.0 ؛
Conn.Open Connstr
sql = حدد أعلى 5 * من [music_list_tupian_system] حيث isWnumSsex = 'Rotent Ads' بواسطة iswnumsid desc
تعيين rs = server.createObject (adodb.oldset)
Rs.OOPEN SQL ، CONN ، 1،1
إذا لم يكن rs.eof ثم
ك = 1
num_total = rs.rcordCount
لأني = 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 = left (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
ك = ك+1
التالي
آخر
استجابة. لا يوجد لديه بيانات في الوقت الحالي!
إنهاء إذا
٪>
<a target = _self href = javaScript: gourl ()> <span class = f14b>
<script type = text/javaScript>
imgurl1 = <٪ = imgurl11 ٪> ؛
imgtext1 = <٪ = imgtext11 ٪>
imglink1 = الهروب (<٪ = imglink11 ٪>) ؛
imgurl2 = <٪ = imgurl22 ٪> ؛
imgtext2 = <٪ = imgtext22 ٪>
imglink2 = الهروب (<٪ = imglink22 ٪>) ؛
imgurl3 = <٪ = imgurl33 ٪> ؛
imgtext3 = <٪ = imgtext33 ٪>
imglink3 = الهروب (<٪ = imglink33 ٪>) ؛
imgurl4 = <٪ = imgurl44 ٪> ؛
imgtext4 = <٪ = imgtext44 ٪>
imglink4 = الهروب (<٪ = imglink44 ٪>) ؛
imgurl5 = <٪ = imgurl55 ٪> ؛
imgtext5 = <٪ = imgtext55 ٪>
imglink5 = الهروب (<٪ = imglink55 ٪>) ؛
var focus_height = 160
var text_height = 18
var swf_height = focus_height+text_height
<٪ إذا num_total = 1 ثم ٪>
varge pics = imgurl1
روابط var = imglink1
نصوص var = imgtext1
<٪ elseif num_total = 2 ثم ٪>
varge pics = imgurl1+|+imgurl2
روابط var = imglink1+|+imglink2
نصوص var = imgtext1+|+imgtext2
<٪ elseif num_total = 3 ثم ٪>
varge pics = imgurl1+|+imgurl2+|+imgurl3
روابط var = imglink1+|+imglink2+|+imglink3
نصوص var = imgtext1+|+imgtext2+|+imgtext3
<٪ elseif num_total = 4 ثم ٪>
varge pics = imgurl1+|+imgurl2+|+imgurl3+|+imgurl4
ارتباطات var = imglink1+|+imglink2+|+imglink3+|+imglink4
نصوص VAR = imgtext1+|+imgtext2+|+imgtext3+|+imgtext4
<٪ elseif num_total = 5 thatn ٪>
varge pics = imgurl1+|+imgurl2+|+imgurl3+|+imgurl4+|+imgurl5
ارتباطات var = imglink1+|+imglink2+|+imglink3+|+imglink4+|+imglink5
var sexts = imgtext1+|+imgtext2+|+imgtext3+|+imgtext4+|+imgtext5
<٪ نهاية إذا ٪>
document.write ('<object classid = clsid: d27cdb6e-Ae6d-11cf-96b8-444553540000 = http: //fpdownload.macromedia.com/pub/shockwavwavav e/cabs/swflash.cab#version = 6،0 ، 0،0 width = ' + focus_width +' height = ' + swf_height +'> ') ؛
document.write ('<param name = levivedAccess value = samedomain> <param name = value = focus.swf> <param name = Quality = High> <param name = bgColor value =#f0f0f0>') ؛
document.write ('<param name = menu value = false> <sem name = wmode value = ePaque>') ؛
document.write ('<param name = flashvars value = pics ='+pics+'& links ='+links+'& sexts+sexts+' & borderwidth = '+foc us_width+' & borderheight = '+focus_height+' & textheight = '+'+'+ text_height+'>'>) ؛
document.write ('<inmbed src = pixviewer.swf wmode = ePaque = pics ='+pics+'& links+links+' & sexts+'& borderwidth ='+focus_width+'& borderheight ='+focus_height+'& textheight ='+text_height+ "قائمة = bgcolor false =#f0f0f0f0 Quality = '+' Focus_Width+'Hight ='+Focus_HeightAccccccccccccccccccccccct = samedomain type/x-shockw edia.com/go/getFlashPlayer/ > ') ؛
</script>
</span> </a> <span id = focustext class = f14b> </span>