adminadmineditsave.asp

来自「该系统测试用户信息主要由数据库直接输入」· ASP 代码 · 共 74 行

ASP

74 行

<!--#include file="conn.asp"-->
 <%
  if session("adminname")="" then
  response.redirect "relogin.asp"
  end if

%>
<%


adminid=trim(request("adminid"))
pwd=trim(request("pwd"))

tname=trim(request("tname"))
email=trim(request("email"))

powerid= request("power")
            
   if instr(powerid,"-1")> 0 then 
     powerid=-1
    
  else 
      if instr(powerid,"0")> 0 then 
         powerid=0
         
      else
            if not isempty(request("power")) then
     		 

     		else
     		 
              powerid=-2
			
  	        end if 
  	  end if
  	end if

 
 
 

   Set rs=Server.CreateObject("Adodb.RecordSet")
 sql="select * from tbadmin where adminid="&adminid
   rs.open sql,conn,1,3
 
   rs("pwd")=pwd
   rs("tname")=tname
      rs("email")=email
 
   rs("power")=powerid

   rs.update
 

   Response.Redirect "adminadminedit.asp?adminid="&adminid


%>


<html>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建网页 1</title>
</head>

<body>

</body>

</html>

adminadmineditsave.asp - 源码说明

本页面展示了「该系统测试用户信息主要由数据库直接输入」中的 adminadmineditsave.asp 源码文件，采用 ASP 编程语言编写，共 74 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与系统测试相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?