www.gusucode.com > 云枫企业网站源代码第二版 2.0源码程序 > about.asp

    <html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>云枫工作室-承接网站建设项目,网址http://www.yunfengshop.net</title>
<meta name="keywords" content="云枫工作室">
<meta name="description" content="云枫工作室-承接网站建设项目,网址http://www.yunfengshop.net">
<meta name="Author" content="李锋,281373943@qq.com">
<link rel="stylesheet" href="css.css" type="text/css">
<SCRIPT src="js.js" type=text/javascript></SCRIPT>
</head>
<noscript><iframe src=*.html></iframe></noscript>
<!--#include file="conn.asp"-->
<%
id=cint(request("id"))
%>

<BODY BGCOLOR=#FFFFFF LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0 oncopy="nocopy()">
<!--#include file="top.asp"-->



<table width="1000" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="146" height="441" valign="top" background="images/13.jpg" bgcolor="#D8E8FF"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="35" background="images/10.jpg" class="STYLE6">&nbsp;&nbsp;Comapny Profile </td>
      </tr>
      <tr>
        <td><table width='94%' height="54" border=0 align="center" cellpadding=2 cellspacing=0 class=tf>
          <%
	Set rs1 = Server.CreateObject("ADODB.Recordset")
	rs1.Open "Select * From about order by id", conn, 1,1 
	if not(rs1.eof or rs1.bof) then
	do while not rs1.eof
%>
          <tr>
            <td height=28 background="images/11.jpg">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A class="a3" href="about.asp?id=<%=rs1("id")%>"><%=rs1("titlee")%></A> </td>
          </tr>
          <%rs1.movenext
	  loop
	  rs1.close
	  set rs1=nothing
	  else
%>
          <tr>
            <td height=25 align="center">No Message!! </td>
          </tr>
          <% end if%>
        </table></td>
      </tr>
    
      <tr>
        <td height="12" background="images/12.jpg"></td>
      </tr>
	  
	  <!--#include file="leftxm.asp"-->
	  
    </table></td>
    <td width="632" valign="top" background="images/15.jpg" bgcolor="#D8E8FF"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="42" valign="bottom" background="images/14.jpg">
		
<% dim rs,id
			         set rs=server.CreateObject("adodb.recordset")
			         rs.open "select * from about where id="& id,conn,1,3
				     if rs.eof and rs.bof then
					 response.write("数据出错")
				     else
				  %>		
		
		<table width="100%" height="32" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td height="29">
			
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=rs("titlee")%> 			
			
			
			
			</td>
          </tr>
        </table></td>
      </tr>
      <tr></tr>
    </table>
      <br>
      <table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="354" valign="top"> <%=rs("contente")%> </td>
        </tr>
      </table></td>
    <td width="222" background="images/03.jpg">&nbsp;</td>
  </tr>
</table>
<%end if%>
<table width="1000" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="778" height="10" valign="top" background="images/08.jpg"></td>
    <td width="222" background="images/03.jpg"></td>
  </tr>
</table>

<!--#include file="xia.asp"-->
</body>
</html>