📄 showinfo.asp
字号:
<!--#include file="dbinc/dbpath.asp" -->
<html>
<head>
<title>3鸟设社网站评测—网站资料</title>
<link rel="stylesheet" href="link.css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="2" marginheight="2" bgcolor="#FFFFFF">
<!--#include file="top.htm" --> <%
siteid=CLng(request.querystring("id"))
set rs=server.createobject("adodb.recordset")
rs.open "Select * from zkpick where zkpick.pickid="&siteid,conn
if not (rs.bof and rs.eof) then
%> <table width="758" border="0" cellspacing="3" cellpadding="0" align="center" BGCOLOR="#FFFFFF" style="border-left: 1 dotted #000000; border-right: 1 dotted #000000">
<tr> <td width="200" bgcolor="#FFFFFF" valign="top"><IMG SRC="images/cool1.jpg" WIDTH="200" HEIGHT="62" USEMAP="#Map" BORDER="0"><BR><IMG SRC="images/cool3.jpg" WIDTH="200" HEIGHT="62" USEMAP="#Map2" BORDER="0"><BR><IMG SRC="images/cool4.jpg" WIDTH="200" HEIGHT="62" USEMAP="#Map3" BORDER="0"><BR><IMG SRC="images/cool6.jpg" WIDTH="200" HEIGHT="62" USEMAP="#Map4" BORDER="0"><BR><MAP NAME="Map"><AREA SHAPE="rect" COORDS="89,22,180,43" HREF="addnew.asp"></MAP><MAP NAME="Map2"><AREA SHAPE="rect" COORDS="91,20,180,43" HREF="best.asp"></MAP><MAP NAME="Map3"><AREA SHAPE="rect" COORDS="91,18,183,45" HREF="userbeginnew.asp"></MAP><MAP NAME="Map4"><AREA SHAPE="rect" COORDS="91,21,182,48" HREF="userbegin.asp"></MAP></td><td width="549">
<table width="550" border="0" cellspacing="2" cellpadding="0" align="center" class="9p" bgcolor="#FFFFFF">
<tr bgcolor="#FF6633"> <td height="20" bgcolor="#CC3366"> <div align="center"><font color="#FFFFFF"><b>3鸟设社网站评测——
网站资料</b></font></div></td></tr> <tr> <td class="2p"> </td></tr> <tr> <td BGCOLOR="#EDB7D1">
<table width="547" border="0" cellspacing="1" cellpadding="2" bordercolorlight="#9999CC" bordercolordark="#FFFFFF" class="9p" bgcolor="#EDB7D1">
<tr bgcolor="#EDB7D1"> <td height="20" width="188" BGCOLOR="#EDB7D1"> <div align="center">
<font color="#006600"> <%response.write ("<a href='"&rs("pickurl")&"' target='_blank'><b>"&rs("picksite")&"</b></a>")%>
</font> </div></td><td width="156" bgcolor="#EDB7D1"> <div align="center"><FONT COLOR="#666666">类型：
<%
typestr=rs("picktype")
select case typestr
case 1: typestr="电脑网络"
case 2: typestr="免费资源"
case 3: typestr="休闲娱乐"
case 4: typestr="文学艺术"
case 5: typestr="游戏世界"
case 6: typestr="音乐天堂"
case 7: typestr="体育生活"
case 8: typestr="程序设计"
case 9: typestr="商贸金融"
case 10: typestr="科技咨讯"
case 11: typestr="社会公益"
case 12: typestr="另类其它"
case else: typestr="电脑网络"
end select
response.write typestr
%> </FONT></div></td><td width="114" BGCOLOR="#EDB7D1"> <div align="center"><FONT COLOR="#666666">地域：
<%
typestr=rs("pickdiyu")
select case typestr
case 1: typestr="海口"
case 2: typestr="琼山"
case 3: typestr="澄迈"
case 4: typestr="临高"
case 5: typestr="儋州"
case 6: typestr="琼海"
case 7: typestr="定安"
case 8: typestr="万宁"
case 9: typestr="屯昌"
case 10: typestr="文昌"
case 11: typestr="昌江"
case 12: typestr="东方"
case 13: typestr="三亚"
case 14: typestr="陵水"
case 15: typestr="保亭"
case 16: typestr="琼中"
case 17: typestr="白沙"
case 18: typestr="乐东"
case 19: typestr="五指山"
case 20: typestr="其它"
case else: typestr="海口"
end select
response.write typestr
%> </FONT></div></td><td width="68" BGCOLOR="#EDB7D1"> <div align="center"><FONT COLOR="#666666">得票：<%=rs("pickvote")%></FONT></div></td></tr>
<tr> <td width="188" bgcolor="#FFFFFF"> <div align="center"> <%
if (rs("pickicon")<>" ") and (rs("pickicon")<>"http://") then
response.write ("<a href='"&rs("pickurl")&"' target='_blank'><img src='"&rs("pickicon")&"' width='180' height='100' border='0'></a>")
else
response.write ("<img src='image/no.gif' width='180' height='100'>")
end if
%> </div></td><td colspan="3" bgcolor="#FFFFFF"> <%=rs("pickmemo")%></td></tr>
</table></td></tr> <tr> <td class="4p" height="38"> <table width="545" border="0" cellspacing="1" cellpadding="2" bordercolorlight="#FF6633" bordercolordark="#FFFFFF" class="9p" bgcolor="#EDB7D1">
<tr> <td width="190" height="18" valign="bottom" bgcolor="#EDB7D1"><FONT COLOR="#666666">网站性质</FONT></td><td width="344" height="18" valign="bottom" bgcolor="#FFFFFF">
<%
gradestr=rs("pickleibie")
select case gradestr
case 1: gradestr="个人网站"
case 2: gradestr="企业网站"
case else: gradestr="个人网站"
end select
response.write gradestr
%> </td></tr> <tr> <td width="190" height="18" valign="bottom" bgcolor="#EDB7D1">
<div align="left"><FONT COLOR="#666666">网站所有</FONT></div></td><td width="344" height="18" valign="bottom" bgcolor="#FFFFFF">
<div align="left"> <%=rs("pickname")%></div></td></tr> <tr> <td width="190" height="9" bgcolor="#EDB7D1"><FONT COLOR="#666666">电子邮件</FONT>
</td><td width="344" height="9" bgcolor="#FFFFFF"> <%response.write ("<a href='mailto:"&rs("pickemail")&"' target='_blank'>"&rs("pickemail")&"</a>")%>
</td></tr> <tr> <td width="190" height="9" bgcolor="#EDB7D1" valign="top"><FONT COLOR="#666666">站长或企业简介</FONT></td><td width="344" height="9" bgcolor="#FFFFFF"> <%=rs("pickjink")%></td></tr>
</table></td></tr> </table></td></tr> </table><% else %> <table width="761" border="0" cellspacing="0" cellpadding="0" align="center" class="9p" bgcolor="#FFFFFF">
<tr bgcolor="#FF6633"> <td height="20" bgcolor="#EDB7D1"> <div align="center"><font color="#FFFFFF"><b>3鸟设社网站评测提示</b></font></div></td></tr>
<tr> <td class="2p"> </td></tr> <tr> <td class="4p"> </td></tr> <tr bgcolor="#FF6633">
<td bgcolor="#FFFFFF"> <div align="center"> <p> </p><p><font color="#cc3366">对不起，数据在处理中发生错误，请重试！</font></p><p> </p></div></td></tr>
<tr> <td class="4p"> </td></tr> <tr> <td height="20"> <div align="center"> </div></td></tr>
</table><%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%> <!--#include file="bottom.htm" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -