📄 admin_edit.asp

📁 生成防伪码,并导出为EXCEL表格,可查寻

💻 ASP

字号:

<!--#include file=cookies.asp-->
<!--#include file=conn.asp-->
<!--#include file=md5.asp-->
<html><head><link href="css.css" rel="stylesheet" type="text/css">
<title>祥星送货单打印系统--管理员添加</title></head>
<body>
<table width="100%" class="inputb"><tr><td align=center>管理员设置</td></tr></table>
<br>
<%
Set rs=Server.createobject("adodb.recordset")
Sql="Select * from [admin] where id="&request("id")&""
rs.open Sql,conn,1,3
response.write"<form name=myform action=admin_edit.asp?action=edituser method=post>"
response.write"<table border=1 width=100% cellpadding=0 cellspacing=0 bordercolorlight=#cccccc bordercolordark=#ffffff><tr bgcolor=#f1f1f1><td colspan=3 align=center>修改管理员</td></tr>"
response.write"<tr bgcolor=#f1f1f1><td align=center>姓名：<input name=name type=text class=inputa value="&rs("name")&"><input name=id type=hidden  value="&request("id")&"></td><td align=center>密码：<input name=password type=text class=inputa></td><td align=center><input name=submit type=submit class=inputb value=修改></td></tr>"
response.write"</table></form><br>"
rs.close
set rs=nothing

if request("action")="edituser" then
id=request.form("id")
name=trim(replace(request.form("name"),"'",""))
password=md5(replace(request.form("password"),"'",""))
if name="" and password="" then
Response.write "<script language='javascript'>alert('请填写用户名!');" & chr(13)
Response.write "window.document.location.href='javascript:history.go(-1)';</script>"
response.End
end if
if password<>"" then
Sqlstr="update [admin] set name='"&name&"',pwd='"&password&"' where id="&request("id")&"" 
else
Sqlstr="update [admin] set name='"&name&"' where id="&request("id")&""
end if
conn.execute(sqlstr)
response.Write("<script language=javascript>alert('"&password&"');window.location.href='admin_add.asp';</script>")
end if

%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -