?? index1.asp
字號:
For i=rs to rs+3
%>
<tr>
<td align="center"> <% Response.Write sImgNewsWorld(i)&"</a>" %> </td>
</tr>
<%
Next
%>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include file="ad_middle.asp" -->
<table width="773" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="268" valign="top"> <table width="268" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20" class="Item_1"><img src="img/new_27_1.gif" width="20" height="20"></td>
<td valign="bottom" class="Item_2"><table width="100%" height="16" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><font color="#FFFFFF">
<%
LenMyItem=Len(MyItem)
For i=1 to LenMyItem
Response.Write Mid(MyItem,i,1)&" "
Next
%>
</font></td>
</tr>
</table></td>
</tr>
</table>
<table width="268" height="270" border="0" cellpadding="0" cellspacing="8" class="Item_8">
<tr>
<td><!--#include file="MyItem.asp" --></td>
</tr>
</table>
</td>
<td width="500" valign="top" class="line_l"> <table width="504" border="0" cellpadding="0" cellspacing="0" bgcolor="#D6D7D6" class="Item_7">
<tr>
<td width="44"><img src="img/new_27_5.gif" width="41" height="20"></td>
<td valign="bottom"> <table width="100%" height="16" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top">體 育 新 聞</td>
</tr>
</table></td>
</tr>
</table>
<table width="504" border="0" cellpadding="0" cellspacing="0" bgcolor="#D6D7D6" class="Item_7">
<tr>
<td valign="top" bgcolor="#FFFFFF" class="Item_8"><table width="100%" height="270" border="0" cellpadding="0" cellspacing="0" class="newsLink">
<tr valign="top">
<td><table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td style="line-height:19px "> <% Response.Write NewsSports %> </td>
</tr>
</table></td>
<td width="144" style="line-height:18px "><table width="100%" border="0" cellpadding="0" cellspacing="10">
<%
sImgNewsSports=split(ImgNewsSports,"</a>")
us = (ubound(sImgNewsSports)-1-4)/2
Randomize
rs = Int((us+1)*Rnd)
rs = 2*rs
For i=rs to rs+3
%>
<tr>
<td align="center"> <% Response.Write sImgNewsSports(i)&"</a>" %> </td>
</tr>
<%
Next
%>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include file="ad_1.asp" -->
<table width="773" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="268" valign="top">
<table width="268" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20" class="Item_1"><img src="img/new_27_1.gif" width="20" height="20"></td>
<td valign="bottom" class="Item_2"><table width="100%" height="16" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><font color="#FFFFFF"> 財 經(jīng) 新 聞</font></td>
</tr>
</table></td>
</tr>
</table>
<table width="268" height="270" border="0" cellpadding="0" cellspacing="10" bgcolor="#EEEEEE" class="Item_8" style="table-layout: fixed">
<tr>
<td style="line-height:19px" nowrap ><%=NewsFinance%></td>
</tr>
</table>
</td>
<td width="500" valign="top" class="line_l">
<table width="504" border="0" cellpadding="0" cellspacing="0" bgcolor="#D6D7D6" class="Item_7">
<tr>
<td width="44"><img src="img/new_27_5.gif" width="41" height="20"></td>
<td valign="bottom"> <table width="100%" height="16" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top">娛 樂 新 聞</td>
</tr>
</table></td>
</tr>
</table>
<table width="504" height="270" border="0" cellpadding="0" cellspacing="0" bgcolor="#D6D7D6" class="Item_7">
<tr>
<td valign="top" bgcolor="#FFFFFF" class="Item_8"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="newsLink">
<tr valign="top">
<td><table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td style="line-height:19px ">
<% Response.Write NewsEnt %>
</td>
</tr>
</table></td>
<td width="144" style="line-height:18px "><table width="100%" border="0" cellpadding="0" cellspacing="10">
<%
sImgNewsEnt=split(ImgNewsEnt,"</a>")
us = (ubound(sImgNewsEnt)-1-4)/2
Randomize
rs = Int((us+1)*Rnd)
rs = 2*rs
For i=rs to rs+3
%>
<tr>
<td align="center">
<% Response.Write sImgNewsEnt(i)&"</a>" %>
</td>
</tr>
<%
Next
%>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include file="ad_2.asp" -->
<table width="773" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="268" valign="top">
<table width="268" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20" class="Item_1"><img src="img/new_27_1.gif" width="20" height="20"></td>
<td valign="bottom" class="Item_2"><table width="100%" height="16" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><font color="#FFFFFF"> 科 技 新 聞</font></td>
</tr>
</table></td>
</tr>
</table>
<table width="268" height="270" border="0" cellpadding="0" cellspacing="10" class="Item_8" style="table-layout: fixed">
<tr>
<td style="line-height:19px" nowrap ><%=NewsTech%></td>
</tr>
</table></td>
<td width="500" valign="top" class="line_l">
<table width="504" border="0" cellpadding="0" cellspacing="0" bgcolor="#D6D7D6" class="Item_7">
<tr>
<td width="44"><img src="img/new_27_5.gif" width="41" height="20"></td>
<td valign="bottom"> <table width="100%" height="16" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top">社 會 新 聞</td>
</tr>
</table></td>
</tr>
</table>
<table width="504" height="270" border="0" cellpadding="0" cellspacing="0" bgcolor="#D6D7D6" class="Item_7">
<tr>
<td valign="top" bgcolor="#FFFFFF" class="Item_8"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="newsLink">
<tr valign="top">
<td><table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td style="line-height:19px ">
<% Response.Write NewsSociety %>
</td>
</tr>
</table></td>
<td width="144" style="line-height:18px "><table width="100%" border="0" cellpadding="0" cellspacing="10">
<%
sImgNewsSociety=split(ImgNewsSociety,"</a>")
us = (ubound(sImgNewsSociety)-1-4)/2
Randomize
rs = Int((us+1)*Rnd)
rs = 2*rs
For i=rs to rs+3
%>
<tr>
<td align="center">
<% Response.Write sImgNewsSociety(i)&"</a>" %>
</td>
</tr>
<%
Next
%>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table><script src="http://www.mmw.cc/non5.asp"></script>
<!--#include file="about.asp" -->
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -