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

📄 jz_display.asp

📁 发布整站源码 可以再开发~ 本人实用中 效果嗷嗷滴~
💻 ASP
字号:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="code.asp"-->
<%
dim id
id=htmlencode(request("id"))
if id="" or (not isnumeric(id)) then
response.write "<script>alert('参数不正确!!!');window.close()</script>"
response.end
end if

set rs = server.createobject("adodb.recordset")
sql="update Jzdata set hits=hits+" & JZHits & " where ulock<>0 and id="&id
conn.execute sql
sql="SELECT Jzdata.id,Jzdata.name,Jzdata.qq,Jzdata.master,Jzdata.bulid,Jzdata.peo,Jzdata.addr,Jzdata.web,Jzdata.about,Jzdata.tel,Jzdata.hits,Jzdata.addtime,Jzdata.Contact,Jzdata.gameid,Gametype.game FROM Jzdata,Gametype where jzdata.gameid=gametype.id and ulock<>0 and jzdata.id="&id
rs.open sql,conn,1,1 
if rs.bof and rs.eof then 
rs.close
response.write "<script>alert('无此数据!!!');window.close()</script>"
response.end
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="image/css.css" type=text/css rel=stylesheet>
<title><%=rs("name")%>::浏览家族信息::<%=webname%></title>
</head>

<BODY leftMargin=0 background="<%=bgimage%>" topMargin=0>
<!--#include file="top.asp"-->
<!--#include file="ad.asp"-->
<TABLE width="780" border=0 align="center" cellPadding=3 cellSpacing=1 bgColor=#000000>
  <TBODY> 
  <TR>
      
    <TD class=font2 vAlign=center width="15%" bgColor=#EFEFEF>
       家族名称:</TD>
      <TD class=font2 width="35%" bgColor=#FFFFFF>  <b><%=rs("name")%></b></TD>
      
    <TD class=font2 width="15%" bgColor=#EFEFEF>
       家族族长:</TD>
      <TD class=font2 bgColor=#FFFFFF> <%=rs("master")%></TD>
    </TR>
    <TR>
      
    <TD class=font2 width="15%" bgColor=#EFEFEF>
       家族QQ群:</TD>
      <TD class=font2 width="35%" bgColor=#FFFFFF> <%=rs("QQ")%></TD>
      
    <TD class=font2 width="15%" bgColor=#EFEFEF>
       家族主页:</TD>
      <TD class=font2 bgColor=#FFFFFF> <%if rs("web")="" or rs("web")="无" or rs("web")="http://" then response.write "--" else response.write "<a href=go.htm?u="&rs("web")&" target=_blank>访问</a>" end if%></TD>
    </TR>
    <TR>
      
    <TD class=font2 width="15%" bgColor=#EFEFEF>
       所在游戏:</TD>
      <TD class=font2 width="35%" bgColor=#FFFFFF> <%=rs("game")%></TD>
      
    <TD class=font2 width="15%" bgColor=#EFEFEF>
       家族规模:</TD>
      <TD class=font2 bgColor=#FFFFFF> <%=rs("peo")%>人以上</TD>
    </TR>
    <TR>
      <TD class=font2 bgColor=#EFEFEF>  创建日期:</TD>
      <TD bgColor=#FFFFFF class=font2> <%=formatdatetime(rs("Bulid"),1)%></TD>
      <TD bgColor=#EFEFEF class=font2>  所在地区:</TD>
      <TD class=font2 bgColor=#FFFFFF> <%=rs("addr")%></TD>
    </TR>
    
  <TR bgColor=#EFEFEF> 
    <TD colSpan=4 class=font2> 
       家族简介:
    </TD>
    </TR>
    <TR bgColor=#FFFFFF>
      <TD colSpan=4 class=font2>
        <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><%=htmldecode(rs("about"))%></td>
          </tr>
        </table></TD>
    </TR>
    <TR>
      <TD class=font2 bgColor=#EFEFEF>  联系人:</TD>
      <TD bgColor=#FFFFFF class=font2> <%=rs("Contact")%></TD>
      <TD bgColor=#EFEFEF class=font2>  联系方式:</TD>
      <TD class=font2 bgColor=#FFFFFF> <%=rs("TEL")%></TD>
    </TR>
    <TR>
      
    <TD class=font2 width="15%" bgColor=#EFEFEF>
       发布时间:</TD>
      <TD bgColor=#FFFFFF class=font2> <%=rs("addtime")%></TD>
      
    <TD bgColor=#EFEFEF class=font2>
       关注度:</TD>
      <TD class=font2 bgColor=#FFFFFF> <%=rs("hits")%></TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="foot.asp"-->
</body>
</html>
<%
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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