📄 show.asp
字号:
<!--#include file="dbinc/dbpath.asp" -->
<!--#include file="dbinc/fanfuc.inc" -->
<!--#include file="bof.asp" -->
<html>
<head>
<link href="link.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>叁鸟设社(中国)打造中国的设计学社</title>
<style type="text/css">
<!--
td {
font-size: 12px;
}
body {
font-size: 12px;
}
-->
</style>
</head>
<body bgcolor="#CCCCCC" leftmargin="0" topmargin="0">
<table width="100%" height="701" border="0" cellspacing="0">
<tr>
<td width="181" height="701" valign="top">
<table width="100%" border="0" cellspacing="0">
<tr>
<td><img src="images/pi8.gif" width="174" height="20"></td>
</tr>
<tr>
<td height="30"><div align="center"><a href="type.asp?type=1">个性站点</a><br>
<br>
<a href="type.asp?type=3">艺术设计</a><br>
<br>
<a href="type.asp?type=4">建站资源</a><br>
<br>
<a href="type.asp?type=4">商业咨询</a><br>
<br>
<a href="type.asp?type=5">娱乐生活</a><br>
<br>
<a href="type.asp?type=6">其它分类 </a></div></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/pi15.gif" width="174" height="20"></td>
</tr>
<tr>
<td><p align="left">
<%
strSql="select pickid,picksite,news,ndate from zkpick "
strSql=strSql&" order by ndate desc,news asc"
set rs=createobject("adodb.recordset")
rs.open strSql,conn
for i=1 to 3 step 1
response.write ("★ <a href='show.asp?id="&rs("pickid")&"'>"&rs("picksite")&"::<font color=#333333>"&rs("news")&"</font>")
%>
</p>
<p align="left">
<%
rs.movenext
if rs.eof then exit for
next
rs.close
set rs=nothing
%>
</p></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/pi10.gif" width="174" height="20"></td>
</tr>
<tr>
<td><textarea style="FONT-SIZE: 8pt; FONT-FAMILY: Tahoma; BACKGROUND-COLOR: transparent" onMouseOver=this.focus() onFocus=this.select() name="yy-s Codes" rows=4 cols=30><!-- 媒体中国(设计联盟) -->
<script src="http://www.3niao.com/pick/list.asp?id=联盟认证ID号"></script>
<!-- 媒体中国(设计联盟) --></textarea></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/pi9.gif" width="174" height="20"></td>
</tr>
<tr>
<td><br>
旧版图标</td>
</tr>
<tr>
<td><img src="image/logo.gif" width="88" height="31"></td>
</tr>
<tr>
<td><br>
新版图标 </td>
</tr>
<tr>
<td><img src="image/3.gif" width="88" height="31"></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
</table> </td>
<td width="1" valign="top" bgcolor="#000000"> </td>
<td width="630" valign="top"><div align="center">
<table width="100%" border="0" cellspacing="0">
<tr>
<td height="20" bgcolor="#999999"> <table width="100%" border="0" cellspacing="0">
<tr>
<td height="18"><div align="center"><font color="#cc0011"><strong>媒体中国(设计联盟)
-- 网 站 鉴 定<a name="1"></a></strong></font></div></td>
</tr>
</table></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><table width="100%" height="100" border="0" cellspacing="0" bgcolor="#999999">
<tr>
<td width="20%" height="69" valign="top" bgcolor="#666666">
<TABLE WIDTH=176 BORDER=0 CELLPADDING=0 CELLSPACING=0>
<TR>
<TD COLSPAN=3> <IMG SRC="images/addown_01.gif" WIDTH=176 HEIGHT=2 ALT=""></TD>
</TR>
<TR>
<TD ROWSPAN=2> <IMG SRC="images/addown_02.gif" WIDTH=23 HEIGHT=96 ALT=""></TD>
<TD WIDTH="117" HEIGHT="93" BGCOLOR="#FFFFFF" VALIGN="BASELINE">
<%
siteid=CLng(request.querystring("id"))
set rs=server.createobject("adodb.recordset")
rs.open "Select * from zkpick where zkpick.pickid="&siteid,conn,1,3
if not (rs.bof and rs.eof) then
%>
<%
if (rs("pickimg")<>" ") and (rs("pickimg")<>"http://") then
response.write ("<a href='"&rs("pickurl")&"' target='_blank'><img src='"&rs("pickimg")&"' border='0' width='115' height='89' ></a>")
else
end if
%>
</TD>
<TD ROWSPAN=2> <IMG SRC="images/addown_04.gif" WIDTH=36 HEIGHT=96 ALT=""></TD>
</TR>
<TR>
<TD> <IMG SRC="images/addown_05.gif" WIDTH=117 HEIGHT=3 ALT=""></TD>
</TR>
</TABLE>
<table width="100%" height="110" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="left"><font color="#FFFFFF">站 长:
<%response.write ("<a href='mailto:"&rs("pickemail")&"' target='_blank'>"&rs("pickuser")&"</a>")%>
</font><br>
<br>
<%=rs("usermemo")%></div></td>
</tr>
</table>
</td>
<td width="80%"><table width="100%" height="117" border="0" cellspacing="0">
<tr>
<td valign="top"><p>网站名称：<%=rs("picksite")%></p>
<p>荣誉等级：
<%
gradestr=rs("pickgrade")
select case gradestr
case 1: gradestr="设社联盟待审网站"
case 2: gradestr="中级认证网站"
case 3: gradestr="中级推荐网站"
case 4: gradestr="高级推荐网站"
case 5: gradestr="高级精品网站"
case else: gradestr="设社联盟待审网站"
end select
response.write gradestr
%>
</p>
<p>加盟时间：<%=rs("pickdate")%> </p>
<p>网站热度：<font color="#cc0011"><%=rs("pickvisitor")%>℃</font></p>
<p>网站得分：
<% =rs("pickvote") %>
分，共
<% votecount=rs("votecount")
Response.Write(votecount)
%>
人参与投票 ，平均得分
<%if votecount=0 then
votecount=votecount+1
pcount=rs("pickvote") /votecount
Response.Write(pcount)
end if%>
</p>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -