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

📄 admin_usergogxuser.asp

📁 本人仅业余学习一些基础的ASP知识以供系统设计之用,并非专业人员,相关服务器设置、MSSQL/MySQL数据库方面的专业问题请自行解决。 本人仅提供本系统相关的一些技术问题的解释、解答。
💻 ASP
字号:
<!-- #include file="../conn.asp" --><!-- #include file="session.asp" --><!--#include file="../inc/config.asp"--><%
dim UserID
UserID=replace(trim(request("ID")),"'","")
set rs=server.createobject("adodb.recordset")
if IsSqlDataBase = 2 then
	sql="select id,UserName,Name,GO_GXuser,GO_GXuserAnswer from userinfo where ID="&UserID&""
else
	sql="select id,UserName,Name,GO_GXuser,GO_GXuserAnswer from [userinfo] where ID="&UserID&""
end if
rs.open sql,conn,1,1
if rs.eof and rs.bof then
Response.Write ("<script>alert('   操作错误!\n\n 用户不存在。');history.back();</script>")
	Response.end
End If
%><html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style2 {
	font-family: "隶书";
	color: #FF0000;
	font-size: 24px;
}
.style3 {color: #FF0000}
-->
</style>
</head>

<body>
<table border="1" width="100%" cellspacing="0" cellpadding="0" class="TableLine" bordercolor="#1f3566" bordercolordark="#FFFFFF">
              <tr bgcolor="#1C3566">
                <td width="8%" height=25 align=center><font color="white">ID</font></td>
                <td width="18%" height=25 align=center><font color="white">用户名</font></td>
                <td width="18%" height=25 align=center><font color="white">昵称</font></td>
                <td width="16%" height=25 align=center><font color="white">更新员</font></td>
                <td width="10%" height=25 align=center><font color="white">删除</font></td>
              </tr>
              <tr>
                <td height="22" align=center><%=rs("id")%> </td>
                <td align=center><%=rs("UserName")%></td>
                <td align=center><%=rs("Name")%></td>
                <td align=center><%if rs("GO_GXuser")=true then%><input class="button" type=button name=lock value="通过申请" onclick="javascript:window.open('admin_UserSave.asp?id=<%=rs("id")%>&act=GOGXuser','_self','')"><%else%><%end if%></td>
                <td align=center><input class="button" type=button name=del value=删除 onclick="javascript:window.open('admin_UserDel.asp?id=<%=rs("id")%>','_self','')"></td>
              </tr>
              <tr>
                <td height="22" align=center valign="top">申请更新作品及新章节部分内容</td>
                <td height="22" align=left colspan="4"> <%=rs("GO_GXuserAnswer")%></td>
              </tr>
            </table>

<%rs.close
set rs=nothing 
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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