?? admin_edit.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 + -