首頁 > 開發者 > ASP

asp資料修改儲存代碼

來源：互聯網
上載者：User
創建阿里雲帳戶，並獲得超過 40 款產品的免費試用版；而企業帳戶則可以享有總值 $1200 的免費試用版。立即註冊！

<!--#include file="conn.asp"-->
<%
if session("username")<>"admin" then
 response.write "<script>alert('您不是系統管理員，沒有此許可權！');history.back()</script>"
 session("passed")=false
else
%>
<html>
<head>
<title>使用者修改</title>
</head>
<body>
<%
dim uid
uid=request.querystring("userid")
sql="select * from users where id=" & uid
'定義recordset對象
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof then
 response.write ("<h2>不存在此使用者名稱！</h2>")
else
%>
<form method="post" action="usersave.asp" name=myform onsubmit="return chkfield()">
<p align="center">使用者基本資料</p>
<br><br><br>
<center>
<table border="0" width="371" id="table1">
 <tr>
  <td bgcolor="#c0c0c0" width="97" align="center">
   <font size="2">用 戶 名:</font>
  </td>
  <td width="260">
   <%=rs("username")%>
   <input type=hidden name=userid value=<%=rs("id")%>>
  </td>
 </tr>
 <tr>
  <td bgcolor="#c0c0c0" width="97" align="center">
   <font size="2">使用者姓名:</font>
  </td>
  <td width="260">
   <input type=text name=ename size=20 value="<%=rs("ename")%>">
  </td>
 </tr>
 <tr>
  <td bgcolor="#c0c0c0" width="97" align="center">
   <font size="2">電子郵箱:</font>
  </td>
  <td width="260">
   <input type=text name=email size=20 value="<%=rs("email")%>">
  </td>
 </tr>
</table>
</center>
<p align="center">
 <input type="submit" value="提交" name="b1">
 <input type="reset" value="重設" name="b2">
</p>
</form>
<%end if%>
</body>
</html>
<%
end if
%>

處理檔案

<!--#include file= "chkpwd.asp"-->
<html>

<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<title>使用者管理</title>
</head>

<body>
<%
userid = request.querystring("userid")
oripwd = request.form("oripwd")
pwd = request.form("pwd")
'判斷是否存在此使用者
set rs = server.createobject("adodb.recordset")
'sql = "select * from users where id = '"&userid&"'"
'rs.open sql,conn,1,1
rs.open "select * from users where id="&userid,conn,1,3
if rs.eof then
 response.write("<hr><center>不存在此使用者名稱！</h2><br><br><br>")
 response.write("<input type = button name = close onclick = window.close() value = 關閉>")
elseif (rs("userpwd")<>md5(oripwd)) then
 response.write("<hr><center>密碼錯誤！</h2><br><br><br>")
 response.write("<input type = button name = close onclick = window.close() value = 關閉>")
 else
  sql = "update users set userpwd= '"&md5(trim(pwd))&"' where id = "&userid
  set rs = server.createobject("adodb.recordset")
  rs.open sql,conn,1,3
  response.write("<hr><center>更改密碼成功！</h2><br><br><br>")
  response.write("<input type = button name = close onclick = window.close() value = 關閉>")
end if
%>
</body>

</html>

本文章原先以中文撰寫並發佈於 aliyun.com，亦設英文版本，僅作資訊用途。本網站不對文章的準確性，完整性或可靠性或其任何翻譯作出任何明示或暗示的陳述或保證。如對該文章有任何疑慮或投訴，請傳送電郵至 info-contact@alibabacloud.com 並提供相關疑慮或投訴的詳細說明。職員會於 5 個工作天內與您聯絡，一經驗證之後，即會刪除該侵權內容。

聯繫我們

該頁面正文內容均來源於網絡整理，並不代表阿里雲官方的觀點，該頁面所提到的產品和服務也與阿里云無關，如果該頁面內容對您造成了困擾，歡迎寫郵件給我們，收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容，歡迎發送郵件至： info-contact@alibabacloud.com 進行舉報並提供相關證據，工作人員會在 5 個工作天內聯絡您，一經查實，本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

Get Started for Free

  • Sales Support

    1 on 1 presale consultation

    Chat Contact Sales

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

    Open a Ticket

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.

    Learn More