📄 detail.asp

📁 ASP原码

💻 ASP

字号:

<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<link rel="stylesheet" href="header.css" type="text/css">
<%
	set cn=server.CreateObject("ADODB.connection")
	cn.Open DSN_ACLASS

	set rs=server.CreateObject("ADODB.recordset")
	rs.Open "select* from "&TBL_USER&" where ID="&request("user_id")&"", cn
%>

<HTML>
<BODY bgcolor="#FFFFFF" leftmargin="0" topmargin="10" >
<table width="568" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" height="47%">
  <tr> 
    <td width="692">&nbsp; </td>
  </tr>
  <tr> 
    <td width="692" valign="top"> 
      <table width="100%" border="1" align="center" bgcolor="#E3E3E3">
        <tr bgcolor="EFEFEF"> 
          <td width="32%">用户名</td>
          <td width="68%" bgcolor="EFEFEF">&nbsp; <%=rs("USERNAME")%></td>
        </tr>
        <tr bgcolor="EFEFEF"> 
          <td width="32%">昵称</td>
          <td width="68%">&nbsp; <%=rs("NICKNAME")%></td>
        </tr>
        <tr bgcolor="EFEFEF"> 
          <td width="32%">用户类型</td>
          <td width="68%">&nbsp; <%=NameFromID(cn, "DIC_USERTYPE","ID","NAME", rs("TYPE"))%></td>
        </tr>
        <tr bgcolor="EFEFEF"> 
          <td width="32%">性别</td>
          <td width="68%">&nbsp; <%=NameFromID(cn, "DIC_SEX","ID","NAME", rs("SEX"))%></td>
        </tr>
        <tr bgcolor="EFEFEF"> 
          <td width="32%">EMail</td>
          <td width="68%">&nbsp; <%=rs("MailAdd")%></td>
        </tr>
        <tr bgcolor="EFEFEF"> 
          <td colspan="2"> 
            <div align="center"> 
              <input type="button" value="返回" onClick="vbscript:OnReturn" name="button">
            </div>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>

<SCRIPT LANGUAGE=vbscript>

sub OnReturn
	history.back
end sub

</SCRIPT>

</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -