news.asp

每次上传

<%@ LANGUAGE=VBScript CodePage=936%>
<%option explicit%>
<%Response.Buffer=True%>
<!--#include file="Include/System.asp"-->
<!--#include file="../Inc/ubbcode.asp"-->
<!--#include file="Include/SysNews.asp"-->
<!--#include file="Include/StrLeft.asp"-->

<%
'请勿改动下面这二行代码
MaxPerPage=NewsMaxPerPage_Default
%>
<!--#include file="Include/Head.asp" -->
<%if strSkins <= 200 and strSkins >= 1 then%>
<TABLE cellPadding=0 cellSpacing=0 class='Middle_Title'>
<TR> 
<TD vAlign=top class='M_Left_Td'> 
	<table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
		<tr>
			<td valign="top">
<% Call Left_News() %>
			</td>
		</tr>
	</table> 
</TD>
<%if strSkins <= 200 and strSkins >= 1 then%>
<TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
<%
elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
%>
<%end if%>
<TD vAlign=top> 
	<TABLE cellPadding=0 cellSpacing=0 align='center' class='M_Center_Title'>
<% Call Style_Adcolumn() '广告栏 %>

<!-- 新闻 -->
		<TR>
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 class='MC_Pt_Title'>
					<TR>
						<TD class='MC_Pt_TD1'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
						<TD class='MC_Pt_TD2'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
						<TD class='MC_Pt_TD3'><SPAN class=Glow>
<%
if Action="Co" then
	Response.write "公司新闻"
elseif Action="Ye" then
	Response.write "业内资讯"
elseif Action="Pr" then
	Response.write "产品动态"
end if
%>
&nbsp;</SPAN></TD>
						<TD class='MC_Pt_TD4'><div align="right">
<%
if Action="Co" then
	call ShowNewsCoTotal()
elseif Action="Ye" then
	call ShowNewsYeTotal()
elseif Action="Pr" then
	call ShowNewsPrTotal()
end if
%>
&nbsp;</div></TD>
						<TD class='MC_Pt_TD5'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
					</TR>
				</TABLE>
			</TD>
		</TR>
		<TR> 
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 class='MC_NewsNr_Title'>
					<tr> 
						<td valign=top>
<%
if Action="Co" then
	call ShowNewsCo(30)
elseif Action="Ye" then
	call ShowNewsYe(30)
elseif Action="Pr" then
	call ShowNewsPr(30)
end if
%>
						</td>
					</tr>
				</table>
			</TD>
		</TR>
<!-- 新闻 END -->
		<TR> 
			<TD> 
				<TABLE cellSpacing=0 cellPadding=0 class='MC_bottom_title'>
					<tr> 
						<td>
<%
strFileName="News.asp?Action="& Action &"&"
	if totalput>0 then
	call ShowNewsPage(strFileName,totalput,MaxPerPage,false,true,"条新闻")
	end if
%>
						</td>
					</tr>
					<tr><td class='MC_bottom_Td2'></td></tr>
				</table>
			</TD>
		</TR>
		<TR><TD height=10><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	</TABLE>
</TD>

</TR>
</TABLE>
<!--#include file="Include/Foot.asp" -->


<%
elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
%>
<TABLE cellPadding=0 cellSpacing=0 class='Middle_Title'>
<TR> 
<TD vAlign=top class='M_Left_Td'> 
	<table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
		<tr>
			<td valign="top">
<% Call Left_News() %>			</td>
		</tr>
	</table></TD>

<TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
<TD vAlign=top> 
	<TABLE cellPadding=0 cellSpacing=0 align='center' class='M_Center_Title'>
<% Call Style_Adcolumn() '广告栏 %>

<!-- 新闻 -->
		<TR>
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 class='MC_Pt_Title'>
					<TR>
						<TD class='MC_Pt_TD1'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
						<TD class='MC_Pt_TD2'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
						<TD class='MC_Pt_TD3'><SPAN class=Glow>
<%
if Action="Co" then
	Response.write "公司新闻"
elseif Action="Ye" then
	Response.write "业内资讯"
elseif Action="Pr" then
	Response.write "产品动态"
end if
%>
&nbsp;</SPAN></TD>
						<TD class='MC_Pt_TD4'><div align="right">
<%
if Action="Co" then
	call ShowNewsCoTotal()
elseif Action="Ye" then
	call ShowNewsYeTotal()
elseif Action="Pr" then
	call ShowNewsPrTotal()
end if
%>
&nbsp;</div></TD>
						<TD class='MC_Pt_TD5'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
					</TR>
				</TABLE>			</TD>
		</TR>
		<TR> 
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 class='MC_NewsNr_Title'>
					<tr> 
						<td valign=top>
<%
if Action="Co" then
	call ShowNewsCo(30)
elseif Action="Ye" then
	call ShowNewsYe(30)
elseif Action="Pr" then
	call ShowNewsPr(30)
end if
%>						</td>
					</tr>
				</table>			</TD>
		</TR>
<!-- 新闻 END -->
		<TR> 
			<TD> 
				<TABLE cellSpacing=0 cellPadding=0 class='MC_bottom_title'>
					<tr> 
						<td>
<%
strFileName="News.asp?Action="& Action &"&"
	if totalput>0 then
	call ShowNewsPage(strFileName,totalput,MaxPerPage,false,true,"条新闻")
	end if
%>						</td>
					</tr>
					<tr><td class='MC_bottom_Td2'></td></tr>
				</table>			</TD>
		</TR>
		<TR><TD height=10><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	</TABLE></TD>
<TD vAlign=top background="../Skin/201/line-mid-glay.gif" width="6"><img border="0" src="../Skin/201/line-shadow-glay-mid.gif" width="6" height="146"></TD>
<TD vAlign=top class='Mr_TitlePt'><% Call Right_Download() %></TD>
</TR>
</TABLE>
<!--#include file="Include/Foot4.asp" -->
<%end if%>