1.asp

很漂亮的一个网络公司的源码

<link href="25175_34.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	background-color: #000000;
}
-->
</style><table width="768"  border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="145"><table width="132" height="180"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td height="168" valign="top"><table width="145"  border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td height="25" colspan="2"><table width="92%"  border="0" align="right" cellpadding="0" cellspacing="0">
                  <tr bgcolor="#000000">
                    <td><span class="unnamed1ye"><strong>&nbsp;δ</strong></span></td>
                    <td><span class="unnamed1ye"><strong>最新案例:</strong></span> </td>
                  </tr>
              </table></td>
            </tr>
            <% 
	Dim objRec
	Call OpenData
	Set objRec = Conn.Execute("Select top 6 * From News Where TypeID=3 Order By tID Desc")
	With objRec
		If .Eof and .Bof then
				response.Write("<tr><td>暂无</td></tr>")
		Else
				Do While Not .Eof		
					Response.Write("<tr><td width=""23"" height=""18"">&nbsp;</td>")&chr(13)
			 	Response.Write("<td class=""style7"" style=""overflow:hidden; text-overflow:ellipsis;"" nowrap>·<a href='shownews.asp?newID=" & .Fields("tid").Value & "' title='ProductName:" & .Fields("p_Title").Value & "' target=""_blank"">"&cutStr(.Fields("p_Title").Value,20)&"</a></td></tr>")&chr(13)
			.MoveNext
			Loop
		End If
		.Close
	End With
	Set objRec = Nothing
%>
        </table></td>
      </tr>
    </table></td>
    <td width="221"><img src="images/t1_11.jpg" width="221" height="172"></td>
    <td width="402" background="images/t1_12.jpg"><table width="365"  border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td valign="top">&nbsp;</td>
      </tr>
      <tr>
        <td valign="top" class="unnamedhigh20y"><strong>&nbsp;&nbsp;&nbsp;杭州新创网络科技有限公司 </strong> 〖简称：新创科技〗，是杭州目前发展最快的电子商务平台服务提供商之一，专注于开拓应用服务提供（Active Server Pages）市场，为企业、政府、组织提供最为齐全的域名注册、虚拟主机、专业邮局、电子商务、网络营销、网络广告、商业网站策划和网页设计、制作以及网站推广等全套企业上网电子商务一站式全程服务，目前已发展成为在浙江杭州和浙江绍兴及浙江台州均有公司和分支机构的专业公司。</td>
      </tr>
      <tr>
        <td valign="top" class="unnamedhigh20y"><div align="right"> <a href="profile.asp"><img src="images/nex_31.jpg" alt="" width="32" height="7" border="0"></a>&nbsp;</div></td>
      </tr>
    </table></td>
  </tr>
  <tr bgcolor="#717171">
    <td height="1" colspan="3"></td>
  </tr>
</table>