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

📄 admin_jz_display.asp

📁 本程序采用ACC数据核心构件!! 功能介绍: 程序代码重新设计与优化
💻 ASP
字号:
<!--#include file="../inc/config.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/code.asp"-->
<!--#include file="../inc/SqlIn.Asp"-->
<!--#include file="../inc/check.asp"-->
<%
dim id
id=htmlencode(request("id"))
if id="" or (not isnumeric(id)) then
response.write "<script>alert('参数不正确!!!');window.close()</script>"
call CloseConn()
response.end
end if

set rs = server.createobject("adodb.recordset")
sql="SELECT Gq_Jzdata.id,Gq_Jzdata.name,Gq_Jzdata.qq,Gq_Jzdata.master,Gq_Jzdata.bulid,Gq_Jzdata.peo,Gq_Jzdata.addr,Gq_Jzdata.web,Gq_Jzdata.tel,Gq_Jzdata.hits,Gq_Jzdata.addtime,Gq_Jzdata.top,Gq_Jzdata.ulock,Gq_Jzdata.gameid,Gq_gametype.game FROM Gq_Jzdata,Gq_gametype where Gq_Jzdata.gameid=Gq_gametype.id and ulock<>0 and Gq_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>"
call CloseConn()
response.end
else
%>
<html>
<head>
<title><%=webname%> ≡ 家族信息浏览</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="admin_style.css" rel="stylesheet" type="text/css">
</head>
<body leftMargin=0 bgcolor="#EFEFEF" topMargin=15>
<table width="98%" align="center" border="1" cellspacing="0" cellpadding="4" class=guiqibk style="border-collapse: collapse">
    <tr>
      <th colspan="2">浏览“<b><FONT color=#FF0000><%=rs("name")%></FONT></b>”信息</th>
    </tr>
    <tr>
      <td align="center" class="TableRow1">家族名称:</td>
      <td width="78%" class="TableRow1"><b><%=rs("name")%></b> <FONT color=#c0c0c0>(<%=rs("addtime")%>发布)</FONT></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">家族QQ群:</td>
      <td width="78%" class="TableRow1"><%=rs("QQ")%></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">所在游戏:</td>
      <td width="78%" class="TableRow1"><%=rs("game")%> </td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">家族规模:</td>
      <td width="78%" class="TableRow1"><%=rs("peo")%>人以上</td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">家族族长:</td>
      <td width="78%" class="TableRow1"><%=rs("master")%></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">创建日期:</td>
      <td width="78%" class="TableRow1"><%=formatdatetime(rs("Bulid"),1)%></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">所在地区:</td>
      <td width="78%" class="TableRow1"><%=rs("addr")%></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">联系方式:</td>
      <td width="78%" class="TableRow1"><%=rs("TEL")%></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">家族主页:</td>
      <td width="78%" class="TableRow1"><%if rs("web")="" or rs("web")="无" or rs("web")="http://" then response.write "--" else response.write "<a href="&rs("web")&" target=_blank>访问</a>" end if%></td>
    </tr>
    <tr>
      <td align="center" class="TableRow1">家族状态:</td>
      <td width="78%" class="TableRow1">浏览人气:<font color=#FF0000><%=rs("hits")%></font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;审核状态:
    <%if rs("ulock")=true then response.write "<font color=#CCCCCC>通过审核</font>" else response.write "<font color=red>等待审核</font>" end if%>
          &nbsp; &nbsp;&nbsp;固顶状态:
          <%if rs("top")=true then response.write "<font color=#0000FF>固顶中</font>" else response.write "<font color=red>未固顶</font>" end if%>
&nbsp; </td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td colspan="3" align="center"><A href="javascript:window.close()"><IMG height=29 alt=关闭窗口 src="images/close.gif" width=93 border=0></A></td>
    </tr>
</table>
<table width=98% align="center" border="0" cellspacing="0" cellpadding="0">
<tr align="middle">
<td height="30" valign="bottom">Copyright (c) 2004-2006 <a target="_blank" href="http://www.xuncms.cn"><b><font color="#708796">XunCms</font><font color="#cc0000">.Cn</font></b></font></a>. All Rights Reserved .</td>
</tr>
<tr align="middle">
<td>Powered by:<a href="http://www.xuncms.cn" target="_blank"><b><font color="#708796">讯图</font><font color="#cc0000">设计</font></b></font> XunCms <%=Version%></a></td>
</tr>
</table>
</body>
</html>
<%
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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