⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 news.asp

📁 这个也是一个功能强大的企业整站的ASP源代码
💻 ASP
字号:
<!--#include file="../include/connstr.asp"-->
<!--#include file="../include/DefFunction.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ChengYi valve</title>
<style type="text/css">
<!--
body {
	background-color: #188200;
	margin-top: 0px;
	margin-bottom: 0px;
}
.style2 {	font-weight: bold; color: #ffffff
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<script src='../include/jchar.js'></script>
<link href="images/site.css" rel="stylesheet" type="text/css">
</head>
<script src="/include/jchar.js"></script>
<body onLoad="MM_preloadImages('../images/Englsh-about1.jpg','images/eb1.gif','images/eb22.gif','images/eb33.gif','images/eb44.gif','images/eb55.gif','images/eb66.gif')">
<TABLE style="BORDER-RIGHT: #cccccc 1px solid" cellSpacing=0 cellPadding=0 
width=800 align=center bgColor=#ffffff border=0>
  <TBODY>
    <TR>
      <TD width=180><IMG height=100 src="images/logo.gif" 
      width=180></TD>
      <TD vAlign=top>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR>
              <TD bgColor=#cdcdcd height=8></TD>
            </TR>
            <TR>
              <TD height=25 align="right"><a href="../main/main.asp" target="_blank" class="synthetical">/Chinese/ </a></TD>
            </TR>
            <TR>
              <TD>
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR>
                      <TD><a href="About.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image7','','images/eb1.gif',1)"><img src="images/eb.gif" name="Image7" width="125" height="59" border="0"></a></TD>
                      <TD><a href="Product.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image8','','images/eb22.gif',1)"><img src="images/eb2.gif" name="Image8" width="100" height="59" border="0"></a></TD>
                      <TD><a href="News.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image9','','images/eb33.gif',1)"><img src="images/eb3.gif" name="Image9" width="100" height="59" border="0"></a></TD>
                      <TD><a href="Feedback.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image10','','images/eb44.gif',1)"><img src="images/eb4.gif" name="Image10" width="100" height="59" border="0"></a></TD>
                      <TD><a href="Contacts.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image11','','images/eb55.gif',1)"><img src="images/eb5.gif" name="Image11" width="100" height="59" border="0"></a></TD>
                      <TD><a href="main.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image12','','images/eb66.gif',1)"><img src="images/eb6.gif" name="Image12" width="100" height="59" border="0"></a></TD>
                    </TR>
                  </TBODY>
              </TABLE></TD>
            </TR>
            <TR>
              <TD bgColor=#cdcdcd 
height=8></TD>
            </TR>
          </TBODY>
      </TABLE></TD>
    </TR>
  </TBODY>
</TABLE>
<table style="border-right: #cccccc 1px solid; border-left: #cccccc 1px solid" 
cellspacing=0 cellpadding=0 width=800 align=center border=0>
  <tbody>
    <tr>
      <td>
        <object 
      codebase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 
      height=137 width=803 classid=clsid:d27cdb6e-ae6d-11cf-96b8-444553540000>
          <param name="movie" value="images/top.swf">
          <param name="quality" value="high">
          <embed src="images/top.swf" quality="high" 
      pluginspage="http://www.macromedia.com/go/getflashplayer" 
      type="application/x-shockwave-flash" width="803" height="137"></embed>
      </object></td>
    </tr>
  </tbody>
</table>
<table style="border-right: #cccccc 1px solid; border-left: #cccccc 1px solid" 
cellspacing=0 cellpadding=0 width=804 align=center bgcolor=#ffffff border=0>
  <tbody>
  <tr>
    <td style="border-right: #cccccc 1px solid" valign=top width=179>
      <table cellspacing=0 cellpadding=0 width="100%" border=0>
        <tbody>
        <tr>
          <td><img src="images/news.jpg" width="178" height="39"></td>
        </tr>
        <tr>
          <td height=35>
		  <!--#include file="images/Left.asp"-->
              </td>
        </tr>
        <tr>
          <td height=1><img height=1 
            src="dazhong valve.files/english-line.jpg" width=178></td></tr>
        <tr>
          <td height=1><img height=1 
            src="images/line.jpg" width=178></td>
        </tr>
        <tr>
          <td height=1><img height=60 
            src="images/bottom.jpg" 
      width=178></td>
        </tr></tbody></table></td>
    <td valign=top>
      <table cellspacing=0 cellpadding=0 width="98%" align=center border=0>
        <tbody>
        <tr>
          <td height="33" style="border-bottom: #cccccc 1px solid">
            <table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" valign="bottom"><img height=25 
            src="images/brief.jpg" width=29></td>
                <td width="95%" valign="bottom" class="model">TRADE NEWS/ ENTERPRISE'S NEWS</td>
                </tr>
            </table></td>
        </tr>
        <tr>
          <td height="585" valign="top">
            <table width="95%" height="416" 
border=0 align=center cellpadding=0 cellspacing=0>
              <tbody>
              <tr>
                <td height="31">&nbsp;</td>
              </tr>
              <tr>
                <td class=synthetical>
				<table width="94%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td colspan="3" valign="top" class="zhengwen">
				  <%
		  '----------------------------				     
	  	   PERPAGE =10
           PageNo=request("PageNo")   
           set rs=server.createobject("ADODB.recordset")
		  
             sql="select * from tNews where ClassID='News_english' order by AddTime desc"
		
           rs.open sql,conn,1,1 
				   
		   if rs.eof and rs.bof then
			  response.write "暂时没有数据!"
           else
              rs.pagesize = PERPAGE
              if isempty(PageNo) or cstr(PageNo)<"1" then PageNo = 1
		      CurPage=PageNo					  
		      if int(PageNo)>=int(rs.pagecount) then CurPage=cint(rs.pagecount)                      
              rs.absolutepage = CurPage
		  %>
				  <img src="../images/news11.jpg" width="574" height="89"></td>
                </tr>
                <tr>
                  <td width="29" height="123" background="../images/news2.jpg" class="zhengwen"><img src="../images/news2.jpg" width="26" height="24"></td>
                  <td width="532" valign="top" class="zhengwen"><table width="95%"  border="0" cellspacing="0" cellpadding="0">
                  <% for i = 1 to rs.pagesize %>
                <tr <%if i mod 2=0 then response.write "bgcolor='efefef'"%>>
                  <td width="6%" height="20" align="center"><%=rs("ID")%></td>
                  <td width="65%" height="20" align="center"><a href="javascript:newWindow('/english/ShowNews.asp?ID=<%=rs("ID")%>','news','763','583','')">
                    <%if len(rs("Title"))>18 then response.write left(rs("Title"),18)&"..." else response.write rs("Title")%>
                  </a></td>
                  <td width="18%" height="20" align="center"><%=formatdatetime(rs("AddTime"),2)%></td>
                  <td width="11%" height="20" align="center"><%=rs("Hits")%></td>
                </tr>
                <tr <%if i mod 2=0 then response.write "bgcolor='efefef'"%>>
                  <td height="7" colspan="4" align="center"><img src="../images/news5.jpg" width="519" height="7"></td>
                  </tr>
                <% rs.movenext
             if rs.eof then
                i = i + 1
          	    exit for
             end if
           next %>
				  </table>
				 </td>
                  <td width="13" align="left" background="../images/news3.jpg" class="zhengwen"><img src="../images/news3.jpg" width="13" height="29"></td>
                </tr>
                <tr>
                  <td height="133" colspan="3"><table width="100%" height="133"  border="0" cellpadding="0" cellspacing="0" background="../images/news4.jpg">
                    <tr>
                      <td valign="middle"><table width="83%" height="45" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr>
                    <td width="41%" height="45" valign="bottom"> Page:<b><%=CurPage%></b>/<b><%=rs.pagecount %></b> &nbsp;&nbsp;</td>
                    <td width="59%" align="left" valign="bottom" nowrap>
                      <%if CurPage = 1 then 
			   response.write " HomePage | Upward | "
		    else
		       response.write "<a href='?PageNo=1&CateID="&request("CateID")&"'><b> HomePage </b></a> | <a href='?PageNo="&CurPage-1&"&CateID="&request("CateID")&"'><b>Upward</b></a>| "
		    end if 
		  
		    if CurPage = rs.pagecount then
			   response.write "Backward | End page "
		    else
		 	   response.write "<a href='?PageNo="&CurPage+1&"&CateID="&request("CateID")&"'><b>Backward</b> </a>| <a href='?PageNo="&rs.pagecount&"&CateID="&request("CateID")&"'><b>End page</b> </a>"
		    end if
           %>
&nbsp;&nbsp;&nbsp;&nbsp;Jump and turn into:
      <select name="menu1" onChange="MM_jumpMenu('parent',this,0)">
              <% for i=1 to rs.pagecount 
			    if CurPage=i then 
				  response.write "<option value='?PageNo="&i&"&CateID="&request("CateID")&"' selected>Page"&i&""
				else
				  response.write "<option value='?PageNo="&i&"&CateID="&request("CateID")&"'>Page"&i&""
				end if
			  next
		   %>
            </select></td>
                  </tr>
                  <%end if%>
                </table></td>
                    </tr>
                  </table></td>
                </tr>
              </table>
				</td>
              </tr>
              <tr>
<td>&nbsp;</td></tr></tbody></table></td></tr></tbody></table></td></tr></tbody></table>
<table cellspacing=0 cellpadding=0 width=804 align=center border=0>
  <tbody>
    <tr>
      <td width=178><img height=30 src="images/english-bottom.jpg" 
      width=180></td>
      <td align=middle bgcolor=#3196D6><span class=style2>copyright @2005 ChengYi valve all rights reserved.</span></td>
    </tr>
  </tbody>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -